Как давать имена переменным на лету?

Можно ли на лету создавать новые имена переменных?

Я хотел бы читать фреймы данных из списка в новые переменные с числами в конце. Что-то вроде orca1, orca2, orca3 ...

Если я попробую что-то вроде

paste("orca",i,sep="")=list_name[[i]]

Я получаю эту ошибку

target of assignment expands to non-language object

Есть ли другой способ обойти это?

Использование assign:

assign(paste("orca", i, sep = ""), list_name[[i]])

Мне кажется , что вы могли бы быть лучше со списком , а не использовать orca1, orca2и т.д., ... то это было бы orca[1], orca[2]...

Обычно вы составляете список переменных, различаемых только числом, потому что это число будет удобным способом доступа к ним позже.

orca <- list()
orca[1] <- "Hi"
orca[2] <- 59

В противном случае assignэто именно то, что вам нужно.

Не создавайте фреймы данных. Сохраните список, назовите его элементы, но не прикрепляйте его.

Самая большая причина этого в том, что если вы создаете переменные на ходу, почти всегда позже вам придется перебирать каждую из них, чтобы выполнить что-то полезное. Здесь вам снова придется перебирать каждое из имен, которые вы создали на лету.

Намного проще назвать элементы списка и перебирать имена.

Что касается attach, это действительно плохая практика программирования в R и может привести к большим проблемам, если вы не будете осторожны.

FAQ говорит:

Если у вас есть

varname <- c("a", "b", "d")

ты можешь сделать

get(varname[1]) + 2

для

a + 2

или

assign(varname[1], 2 + 2)

для

a <- 2 + 2

Похоже, вы используете GET, когда хотите оценить формулу, которая использует переменную (например, конкатенацию), и ASSIGN, когда хотите присвоить значение предварительно объявленной переменной.

Синтаксис для assign: assign (x, value)

Икс: имя переменной в виде символьной строки. Принуждение не выполняется, и будет использован первый элемент вектора символов длиной больше единицы с предупреждением.

значение: значение, которое будет присвоено x.

Еще одно хитрое решение - назвать элементы списка, а attachон:

list_name = list(
    head(iris),
    head(swiss),
    head(airquality)
    )

names(list_name) <- paste("orca", seq_along(list_name), sep="")
attach(list_name)

orca1
#   Sepal.Length Sepal.Width Petal.Length Petal.Width Species
# 1          5.1         3.5          1.4         0.2  setosa
# 2          4.9         3.0          1.4         0.2  setosa
# 3          4.7         3.2          1.3         0.2  setosa
# 4          4.6         3.1          1.5         0.2  setosa
# 5          5.0         3.6          1.4         0.2  setosa
# 6          5.4         3.9          1.7         0.4  setosa

А этот вариант?

list_name<-list()
for(i in 1:100){
    paste("orca",i,sep="")->list_name[[i]]
}

Работает отлично. В приведенном вами примере первая строка отсутствует, а затем выдается сообщение об ошибке.