Kin*_*ord 2 global r save lapply
我有这些数据集:A <- 4, B <- 3, C <- 2.
所以我把它们放在一个列表中
D<-list(A,B,C)并想要应用这个函数:
s<-function(x) {
t<-8
x<-as.data.frame(x*t)
}
lapply(D,s)
Run Code Online (Sandbox Code Playgroud)
当我应用该lapply功能时,它只是打印它们.
如何将结果保存在全局环境中而不是打印它们?
因此,结果应为A值32 B,值为24 C,值为16.
小智 6
而不是lapply(D,s),使用:
D <- lapply(D, s)
names(D) <- c("A", "B", "C")
list2env(D, envir = .GlobalEnv)
Run Code Online (Sandbox Code Playgroud)