ファイルでいっぱいのディレクトリを読み取り、各データ ファイルで完全に観察されたケースの数を報告する R 関数を作成しています。この関数は、最初の列がファイルの名前で、2 番目の列が完了したケースの数であるデータ フレームを返します。
そのような、
id nobs
1 108
2 345
...
etc
ここに私が書いた関数があります:
complete <- function(directory, id = 1:332) {
for(i in 1:332) {
path<-paste(directory,"/",id,".csv",sep="")
mydata<-read.csv(path)
#nobs<-nrow(na.omit(mydata))
nobs<-sum(complete.cases(mydata))
i<-i+1
}
completedata<-c(id,nobs)
}
私は機能を実行します:
complete("specdata",id=1:332)
しかし、私はこのエラーが発生しています:
Error in file(file, "rt") : invalid 'description' argument
traceback()
コードをデバッグする関数も試しましたが、次の出力が得られます。
traceback()
# 4: file(file, "rt") at #6
# 3: read.table(file = file, header = header, sep = sep, quote = quote,
# dec = dec, fill = fill, comment.char = comment.char, ...) at #6
# 2: read.csv(path) at #6
# 1: complete("specdata", id = 1:332)