Abrufen des Spaltennamens im Lapply mit .SD

Ich möchte eine Funktion für alle Spalten in data.table anwenden. Daher benutze ich .SD mit lapply. Aber innerlich kann ich die Spalte meines Tisches nicht abrufen.Abrufen des Spaltennamens im Lapply mit .SD

Zum Beispiel

x = data.table(a=1:10, b=10:1, id=1:5) 
x[,lapply(.SD,function(t){t*id}),.SDcols=c(1,2)] 
Error in ..FUN(a) : object 'id' not found

ich wie folgt vorgehen:

x[,lapply(.SD,function(t){t*x$id}),.SDcols=c(1,2)]

können wir besser machen?

Quelle

2013-07-02 Nicolas

entfernen Sie einfach .SDcols=c(1,2). dass entfernt die dritte Säule (id)

> x[,lapply(.SD,function(t){t*id})] 
    a b id 
1: 1 10 1 
2: 4 18 4 
3: 9 24 9 
4: 16 28 16 
5: 25 30 25 
6: 6 5 1 
7: 14 8 4 
8: 24 9 9 
9: 36 8 16 
10: 50 5 25

nicht den id haben, mit allen folgenden arbeiten:

x[,lapply(.SD[,list(a,b)], `*`, id)] 

x[,lapply(.SD[,-3, with=F], `*`, id)] 

x[,lapply(.SD, `*`,id)][, list(a,b)]

Quelle

2013-07-02 08:02:30 Michele

Dank! Gibt es eine Möglichkeit zu vermeiden, die Funktion auf die Spalte i anzuwenden? – Nicolas

@Nicolas bitte überprüfen Sie meine Bearbeitung. Kleiner Tipp, wenn Sie auf Geschwindigkeit achten, versuchen Sie immer, Ihrer Funktion die kompakteste Struktur zu geben, die Sie können (oft bedeutet es schneller Code). – Michele

Ich mag die erste der drei Alternativen, die Sie geben, obwohl die Verwendung von '.SD' redundant wird. Ich denke 'x [, lapply (liste (a, b),' * ', id)]' ist die beste Lösung, und es beinhaltet nichts mehr als die Verwendung von '.SDcols' an erster Stelle. –

Abrufen des Spaltennamens im Lapply mit .SD

Antwort

Verwandte Themen