假设我有以下数据框:
x <- data.frame(let = sample(LETTERS, 100, replace = T),
num = sample(1:10, 100, replace = T))
我想创建几个子集,x
其中每个新数据框都以x$let
. 到目前为止,我已经想出了这个简单的功能:
ss <- function(letra){
return(subset(x, let == letra))
}
这是非常基本的,并没有按照我的意愿命名。我的问题是:如何使以下过程自动化?
a <- ss('A')
b <- ss('B')
c <- ss('C')
...
z <- ss('Z')