使用R的内置ToothGrowth示例数据集,这适用于:
ddply(ToothGrowth, .(supp,dose), function(df) mean(df$len))
Run Code Online (Sandbox Code Playgroud)
但我想将子集因子变为变量,例如
factor1 = 'supp'
factor2 = 'dose'
ddply(ToothGrowth, .(factor1,factor2), function(df) mean(df$len))
Run Code Online (Sandbox Code Playgroud)
这不起作用.该怎么做?
我想也许是这样的:
factorCombo = paste('.(',factor1,',',factor2,')', sep='')
ddply(ToothGrowth, factorCombo, function(df) mean(df$len))
Run Code Online (Sandbox Code Playgroud)
但它也不起作用.我认为我很接近,但不确定正确的做法.我想整个命令可以放入一个字符串,然后是字符串的eval()调用,但希望有更优雅的方法吗?
尝试:
x <- c("supp", "dose")
ddply(ToothGrowth, x, function(df) mean(df$len))
Run Code Online (Sandbox Code Playgroud)