assignで動的に値を生成して、getをうまく活用すれば取れる、が、あまりきれいではない。 > f <- function(){ + for(i in 1:10){ + assign(paste0("variable_", i), i) + } + variable_names <- ls(pattern="^variable_.*") + sapply(variable_names, functi…