неиспользованный аргумент при выполнении описательной статистики на R

Question

Я продолжаю получать аргумент об ошибке неиспользованный для моей функции by, мне нужно загрузить пакет, у меня уже есть dplyr, plyr, tidyr, data.table и pacman ... нужна помощь, спасибо

DHB<- TA[, .(mean= mean(sum_tbret, na.rm = TRUE),
                  sd= sd(sum_tbret, na.rm = TRUE),
                  var= var(sum_tbret, na.rm=TRUE),
                  median= as.double(median(sum_tbret, na.rm = TRUE)),  ####Median has problems with data.table so need to tell it to convert to double
                  lq= quantile(sum_tbret, 0.25, na.rm = TRUE),
                  uq= quantile(sum_tbret, 0.75, na.rm = TRUE)),
              by =  "dhb2015"]

Error in `[.data.frame`(TA, , .(mean = mean(sum_tbret, na.rm = TRUE),  : 
  unused argument (by = "lb2018")

Answer 1

Исходя из ошибки, это все равно data.frame, мы можем преобразовать в data.table с setDT - преобразует на месте (или as.data.table), и тогда метод data.table будет работать

library(data.table)
setDT(TA)[, .(mean= mean(sum_tbret, na.rm = TRUE),
              sd= sd(sum_tbret, na.rm = TRUE),
              var= var(sum_tbret, na.rm=TRUE),
              median= as.double(median(sum_tbret, na.rm = TRUE)),  
              lq= quantile(sum_tbret, 0.25, na.rm = TRUE),
              uq= quantile(sum_tbret, 0.75, na.rm = TRUE)),
          by =  dhb2015]