Nowo dodana kolumna „J” o data.table powinny być dostępne w zakresie

Question

mam ten kod:

dat<-dat[,list(colA,colB 
        ,RelativeIncome=Income/.SD[Nation=="America",Income] 
        ,RelativeIncomeLog2=log2(Income)-log2(.SD[Nation=="America",Income])) #Read 1) 
       ,by=list(Name,Nation)] 

1) Chciałbym móc powiedzieć "RelativeIncomeLog2=log2(RelativeIncome)", ale "RelativeIncome" nie jest dostępny Zakres j?

2) Próbowałem zamiast tego (zgodnie z FAQ na temat data.table). Teraz "RelativeIncome" jest dostępny, ale nie dodać kolumny:

 dat<-dat[,{colA;colB;RelativeIncome=Income/.SD[Nation=="America",Income]; 
       ,RelativeIncomeLog2=log2(RelativeIncome)])) 
       ,by=list(Name,Nation)] 

Answer 1

Można tworzyć i przypisywać obiekty j, wystarczy użyć { nawiasów klamrowych }.

Następnie można przekazać te obiekty (lub funkcje & obliczeń obiektów) z j i przypisać je jako kolumny tabeli data.table. Aby przypisać więcej niż jeden raz kolumnie na raz, po prostu:

• owinąć LHS w c(.)upewnić się, że nazwy kolumn są ciągi i
• ostatnia linia j (czyli „powrót” wartość) powinien być listą.

---

dat[ , c("NewIncomeComlumn", "AnotherNewColumn") := { 
       RelativeIncome  <- Income/.SD[Nation == "A", Income]; 
       RelativeIncomeLog2 <- log2(RelativeIncome); 
       ## this last line is what will be asigned. 
       list(RelativeIncomeLog2 * 100, c("A", "hello", "World")) 
       # assigned values are recycled as needed. 
       # If the recycling does not match up, a warning is issued. 
       } 
       , by = list(Name, Nation) 
       ] 

---

Można losely myśleć j jako funkcja w środowisku dat

Można również uzyskać dużo bardziej skomplikowane i złożone, jeśli wymagane. Można również włączyć by argumenty, jak również za pomocą by=list(<someName>=col)

W rzeczywistości, podobne do funkcji, po prostu tworzenia obiektu w j i przypisując mu wartość, nie nie oznacza, że ​​będzie on dostępny poza j. Aby można go było przypisać do pliku data.table, musisz go zwrócić. j automatycznie zwraca ostatnią linię; jeśli ten ostatni wiersz jest listą, każdy element listy będzie traktowany jak kolumna. Jeśli przypisujesz przez odniesienie (tj. Używając :=), osiągniesz oczekiwane rezultaty.

---

Na oddzielnej nocie, zauważyłem następujące w kodzie:

Income/.SD[Nation == "America", Income] 

# Which instead could simply be: 
Income/Income[Nation == "America"] 

.SD jest wielki, że jest wspaniałym skrótem. Jednak, aby go wywołać, nie potrzebując wszystkich kolumn, które on zawiera, należy obciążyć twój kod dodatkowymi kosztami pamięci. Jeśli używasz tylko jednej kolumny, rozważ jawne nazwanie tej kolumny lub dodaj argument .SDcols (po j) i nazwij kolumny, które są tam potrzebne.