17

dplyr パッケージを使用して、グループ化されていない data.frame 内のすべての列に関数を適用しようとしていますaggregate()。

aggregate(. ~ Species, data = iris, mean)

meanグループ化に使用されないすべての列に適用されます。(はい、集約を使用できることは知っていますが、dplyr を理解しようとしています。)

私はsummarizeこのように使用できます：

species <- group_by(iris, Species)
summarize(species,
          Sepal.Length = mean(Sepal.Length),
          Sepal.Width = mean(Sepal.Width))

しかし、の表記と同様に、グループ化されていないすべてのmean()列に適用する方法はありますか? 集計したい 30 列の data.frame があるため、個々のステートメントを書き出すのは理想的ではありません。. ~aggregate()

4

2 に答える 2

35

実験的な dplyr を試してみたい場合は、新しい (そしてまだ実験的な) を試すことができますsummarise_each():

devtools::install_github("hadley/dplyr", ref = "colwise")

library(dplyr)
iris %.%
  group_by(Species) %.%
  summarise_each(funs(mean))
## Source: local data frame [3 x 5]
## 
##      Species Sepal.Length Sepal.Width Petal.Length Petal.Width
## 1     setosa        5.006       3.428        1.462       0.246
## 2 versicolor        5.936       2.770        4.260       1.326
## 3  virginica        6.588       2.974        5.552       2.026

iris %.%
  group_by(Species) %.%
  summarise_each(funs(min, max))
## Source: local data frame [3 x 9]
## 
##      Species Sepal.Length_min Sepal.Width_min Petal.Length_min
## 1     setosa              4.3             2.3              1.0
## 2 versicolor              4.9             2.0              3.0
## 3  virginica              4.9             2.2              4.5
## Variables not shown: Petal.Width_min (dbl), Sepal.Length_max (dbl),
##   Sepal.Width_max (dbl), Petal.Length_max (dbl), Petal.Width_max (dbl)

フィードバックは大歓迎です！

これは dplyr 0.2 で表示されます。

于 2014-03-25T21:48:14.377 に答える