apply(data, d, f)

dataの各行、列(dが1なら行、2なら列)ごとにf(関数)を適用して、ベクトルを返す。

apply(iris[,-5], 2, mean)
## Sepal.Length  Sepal.Width Petal.Length  Petal.Width
##     5.843333     3.057333     3.758000     1.199333

spply(data, f)

dataの各要素ごとにf(関数)を適用して、ベクトルを返す。

sapply(iris[,-5], mean)
## Sepal.Length  Sepal.Width Petal.Length  Petal.Width
##     5.843333     3.057333     3.758000     1.199333

lpply(data, f)

dataの各要素ごとにf(関数)を適用して、リストを返す。

lapply(iris[,-5], mean)
## $Sepal.Length
## [1] 5.843333
##
## $Sepal.Width
## [1] 3.057333
##
## $Petal.Length
## [1] 3.758
##
## $Petal.Width
## [1] 1.199333

tapply(data, p, f)

pで指定される要素に対応するdataごとに、f(関数)を適用して、ベクトルを返す。

tapply(iris$Sepal.Length, iris$Species, mean)
##     setosa versicolor  virginica
##      5.006      5.936      6.588

「データから価値を創造する」一般社団法人データマーケティングラボラトリー

Copyright© DML All Rights Reserved.