data.table Gruppe von Nicht-ID-Spalte in Tabelle verbunden

Question

Betrachten wir die beiden folgenden data.tables:

x <- data.table(id=c(1,2,3,4),cost=c(0.7,0.2,0.5,0.9)) 
y <- data.table(id=c(1,2,3,4),group=c(1,2,1,2)) 
setkey(x,id) 
setkey(y,id) 

Ich möchte Kosten normalisieren, indem der Mittelwert subtrahiert wird, die von der Gruppe in y gruppiert.

Mein Versuch ist wie folgt jedoch R einen Fehler gibt, dass es nicht ‚Gruppe‘ finden:

x[y,cost:=(cost-mean(cost)),by=.(group)] 

Gibt es einen guten Weg, um diesen Vorgang auszuführen, ohne eine Spalte x hinzufügen?

Answer 1

Funktioniert das für Sie?

output <- y[x][, normcost:=(cost-mean(cost)), by=group] 

output 
# id group cost normcost 
# 1: 1  1 0.7  0.10 
# 2: 2  2 0.2 -0.35 
# 3: 3  1 0.5 -0.10 
# 4: 4  2 0.9  0.35