Как использовать аргументы функции при использовании sapply?
У меня есть набор данных, который я создал с помощью привязки столбцов, используяcbindX
функция отgdata
пакет. Эта функция позволяет мне связывать столбцы с разным количеством строк. Так,NA
вводятся, когда в определенном столбце нет значений. Теперь я хочу рассчитать стандартное отклонение для каждого столбца. Я пытался с помощью
sapply(dataset,sd)
Это возвращает стандартное отклонение для столбца, имеющего все строки со значениями иNA
для столбцов, имеющих меньше строк. Я пытался использоватьna.rm
спор сsd
функция:
sapply(dataset,sd(na.rm=T))
и получил сообщение об ошибке
Error in is.data.frame(x) : argument "x" is missing, with no default
Например:
firstcol <- matrix(c(1:150),ncol=1)
secondcol <- matrix(c(1:300),ncol=1)
thirdcol <- matrix(c(1:450),ncol=1)
fourthcol <- matrix(c(1:600),ncol=1)
fifthcol <- matrix(c(1:30),ncol=1)
sixthcol <- matrix(c(1:30),ncol=1)
seventhcol <- matrix(c(1:30),ncol=1)
library(gdata)
allcolscomb <- data.frame(cbindX (firstcol,secondcol,thirdcol,fourthcol,fifthcol,sixthcol,seventhcol))
names(allcolscomb) <- c("1stcol","2ndcol","3rdcol","4thcol","5thcol","6thcol","7thcol")
sapply(allcolscomb,sd)
sapply(allcolscomb,sd(na.rm=T))
Как я могу вычислить стандартное отклонение, используяsapply
функционировать?