Как я могу пройти тест Shapiro-Wilk? - PullRequest
Новая
       65

Как я могу пройти тест Shapiro-Wilk?

0 голосов
/ 16 апреля 2020

Я хочу сделать тест Шапиро-Уилк для моих регрессий. Вот мой код 

library(data.table)

Regresiones_shapirotest_1<- 
data.table(tabla.Enero)[, 
                      .(Lm = lapply(.SD, function(x) resid(lm(tabla.Enero$PPNA ~  x)))),
                      .SDcols = 15:93]

Я могу получить тестовые значения только в консоли 

 Regresiones_shapirotest_1 [, lapply(Lm, shapiro.test)]   [2]


 write.xlsx (Regresiones_shapirotest_1 , file = "shapirotest.xlsx", sheetName = "Hoja1",
        Col.names = TRUE, row.names = TRUE, append = FALSE)

Но когда я пытаюсь экспортировать их в файл .xlsx, он экспортирует много значения, которые не имеют ничего общего с консольными значениями. что я делаю не так?

...