3

いくつかのデータを解析してマージする関数を作成しようとしていました。ただし、Rは予期しないシンボルエラー例外をスローします。この問題を解決するためにさまざまな方法を試しましたが、まだ機能しません。助けてください。

コードを参照してください

$aggall = function(df,grp){numcols = sapply(df,class) %in% 
c('integer', 'numeric') result = aggregate(df[,numcols],df[grp],mean) 
 counts = as.data.frame(table(df[grp])) names(counts)[1] = 
 grp merge(counts, result, sort=FALSE)}

エラー：「aggall = function（go、grp）{numcols = sapply（go、class）％in％c（'integer'、'numeric'）results」の予期しないシンボル

4

1 に答える 1

7

機能全体が1つの物理的なラインにあります。
したがって、Rそれを解析しようとすると、ある行がいつ終了し、次の行がいつ開始するかを知る方法がありません。

これを修正するには、別々の行を使用するか、それらの間にセミコロンを追加します。

または、formatRパッケージに代わって実行させることもできます。 （かなり素晴らしいパッケージ）：

install.packages("formatR")
library(formatR)
tidy.source("mySource.R", reindent.space=5)


aggall = function(df, grp) {
     numcols = sapply(df, class) %in% c("integer", "numeric")
     result = aggregate(df[, numcols], df[grp], mean)
     counts = as.data.frame(table(df[grp]))
     names(counts)[1] = grp
     merge(counts, result, sort = FALSE)
}
于 2013-03-26T20:25:50.490 に答える