R语言 plyr包 m_ply mdply

R语言 m_ply的使用

plyr包也算得上是R语言的神器，可以并行，可以显示进程，尤其是可以自定义返回值。其中最长使用的是ldply, llply等单参数函数，今天想介绍多参数传递的函数m_ply、 mdply、maply、mlply。
m_ply 系列函数来源于基础包的 mapply 函数。

mapply

# 双参数
 f = function(a, b){
      return(c(2*a, 3*b))
   }
  mapply(f, 1:4, 2:5)
  #每一列为一组结果
#       [,1] [,2] [,3] [,4]
#[1,]    2    4    6    8
#[2,]    6    9   12   15

mapply(f, 1:4, 2)
#      [,1] [,2] [,3] [,4]
#[1,]    2    4    6    8   
#[2,]    6    6    6    6

可见mapply的使用，多个参数，要么长度相同， 要么其中的参数固定不变。

m_ply

m_ply函数我们以mdply为例

mdply(.data, #实参在data.frame中传递
 .fun = NULL,# 使用的函数
  ..., .expand = TRUE,
   .progress = "none",# 是否显示进度条，可以设置为 text
  .inform = FALSE, 
  .parallel = FALSE,# 是否使用并行
   .paropts = NULL)
#例子
 f = function(a, b){
      return(c(2*a, 3*b))
   }
mdply(data.frame(a=1:4, b=2:5),f）
 # a,b 两列，每一行为一组数据

# 每一行为一组结果， V1， V2为返回值
#a b V1 V2
#1 1 2  2  6
#2 2 3  4  9
#3 3 4  6 12
#4 4 5  8 15

# 2列可变参数，一个固定参数的情况
mdply(data.frame(mean = 1:5, sd = 1:5), rnorm, n = 2)

#n为固定参数，分别以1，2，3，4，5为均值和标准差生成2个随机数。
#   mean sd     V1         V2
#1    1  1  2.467133  0.3460016
#2    2  2  5.298599  4.3033986
#3    3  3  2.431185  6.6862659
#4    4  4 -2.372333 11.8205677
#5    5  5  2.396693  1.8423787