Ich habe versucht, eine Funktion zum Parsen und Zusammenführen einiger Daten zu schreiben. Aber R löst eine unerwartete Symbolfehlerausnahme aus. Ich habe verschiedene Möglichkeiten zur Lösung dieses Problems ausprobiert und es funktioniert immer noch nicht. Bitte helfen Sie.

siehe Code

$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)}

Fehler: unerwartetes Symbol in den Ergebnissen "aggall = function (go, grp) {numcols = sapply (go, class)% in% c ('integer', 'numeric')"