
我正在嘗試在 UNIX 中聚合一個包含以下資料的檔案。如果密鑰相同,我需要添加金額。
Key,amount,date,Time
abc-xyz-12234,45,15-08-91,23:00
pqr-vgh-5241,15,15-08-91,21:00
abc-xyz-12234,35,15-08-91,23:00
pqr-vgh-5241,24,15-08-91,21:00
abc-xyz-12234,655,15-08-91,23:00
lkj-erf-8542,281,15-08-91,10:00
pqr-vgh-5241,40,15-08-91,21:00
輸出應如下所示
abc-xyz-12234,735,15-08-91,23:00
pqr-vgh-5241,79,15-08-91,21:00
lkj-erf-8542,281,15-08-91,10:00
我嘗試了以下命令,但它只給了我 uniq
cat file | grep "abc-xyz-12234" | uniq
答案1
另一個可能的解決方案awk
可能是:
awk 'BEGIN { FS = OFS = "," }
NR != 1 { y[$1] += $2; $2 = y[$1]; x[$1] = $0; }
END { for (i in x) { print x[i]; } }' file
缺點是它不會保留您的訂單。所以結果可能是:
pqr-vgh-5241,79,15-08-91,21:00
abc-xyz-12234,735,15-08-91,23:00
lkj-erf-8542,281,15-08-91,10:00
答案2
你可以用 awk 來做到這一點:
#!/bin/sh
sort | awk -F, '
function result() {
if ( key != "" ) {
printf "%s,%d,%s\n", key, value, datetime;
}
}
BEGIN { key = ""; value = 0; datetime = ""; }
$2 ~ /^[0-9]+/ {
if ( $1 == key ) {
value += $2;
} else {
result();
key = $1;
value = $2;
datetime = $3 "," $4;
}
}
END { result(); }
'
給予
./foo <input
abc-xyz-12234,735,15-08-91,23:00
lkj-erf-8542,281,15-08-91,10:00
pqr-vgh-5241,79,15-08-91,21:00
答案3
這是 Perl 中的一種方法。這樣稱呼它./script file.ext
:
use warnings;
use strict;
my %data;
my @order;
while (<>){
next if $. == 1;
my @line = split /,/;
if (defined $data{$line[0]}){
$data{$line[0]}->[1] += $line[1];
}
else {
$data{$line[0]} = \@line;
push @order, $line[0];
}
}
for (@order){
print join(',', @{$data{$_}});
}
答案4
這使用 Miller ( ) 來計算按、和欄位分組的每組記錄mlr
的欄位總和。 Miller 會將總和作為新欄位 新增到欄位清單的結尾,因此我們也會對欄位重新排序並重新標記它們。amount
Key
date
Time
amount_sum
mlr --csv \
stats1 -a sum -f amount -g Key,date,Time then \
reorder -f Key,amount_sum then \
label Key,amount file
給出問題中數據的輸出:
Key,amount,date,Time
abc-xyz-12234,735,15-08-91,23:00
pqr-vgh-5241,79,15-08-91,21:00
lkj-erf-8542,281,15-08-91,10:00
如果您不想在輸出中包含標頭,請mlr
與它的--headerless-csv-output
選項一起使用。