生成變量名稱（類似於get（））

Question

如何將此代碼替換爲循環？

m1 <- ggplot(foo) 
m2 <- ggplot(foo) 
... 
m9 <- ggplot(foo) 

我想我需要這樣的東西get()更換魔（），但得到沒有在這裏工作。

for (i in 1:9){ 
    magic(i) <- ggplot(foo) 
} 

Answer 1

使用列表：

out <- list() 

for (i in 1:9){ 
    out[[i]] <- ggplot(foo) 
} 

Answer 2

這將工作：

p <- qplot(data = mtcars, wt, mpg) 
for(i in 1:9) assign(paste0("m",i),p) 
ls() 
[1] "i" "m1" "m2" "m3" "m4" "m5" "m6" "m7" "m8" "m9" "p" 

Answer 3

像這樣的東西應該工作：

for (i in 1:9) { 
    name <- paste("m", i, sep="") 
    assign(name, ggplot(foo)) 
}