Wie verwende ich Argumente einer Funktion, wenn ich sapply verwende?
Ich habe einen Datensatz, den ich durch Spaltenbindung mit dem @ erstellt habcbindX
-Funktion aus demgdata
package. Mit dieser Funktion kann ich Spalten mit unterschiedlicher Zeilenanzahl binden. So,NA
s werden eingefügt, wenn in einer bestimmten Spalte keine Werte vorhanden sind. Jetzt möchte ich die Standardabweichung für jede Spalte berechnen. Ich habe versucht mit
sapply(dataset,sd)
Dies gibt die Standardabweichung für die Spalte mit allen Zeilen mit Werten und @ zurücNA
für die Spalten mit weniger Zeilen. Ich habe versucht, dasna.rm
Argument mit demsd
Funktion:
sapply(dataset,sd(na.rm=T))
und bekam die Fehlermeldung
Error in is.data.frame(x) : argument "x" is missing, with no default
Beispielsweise
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))
Wie kann ich die Standardabweichung mit dem @ berechnesapply
Funktion?