Jak nazywać zmienne w locie?

Czy jest możliwe tworzenie nowych nazw zmiennych w locie?

Chciałbym wczytać ramki danych z listy do nowych zmiennych z numerami na końcu. Coś jak orca1, orca2, orca3 ...

Jeśli spróbuję czegoś takiego

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

Otrzymuję ten błąd

target of assignment expands to non-language object

Czy jest inny sposób obejścia tego?

Zastosowanie assign:

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

Wydaje mi się, że może być lepiej z listy zamiast używać orca1, orca2itp ... to byłoby orca[1], orca[2]...

Zwykle tworzysz listę zmiennych różniących się tylko liczbą, ponieważ ta liczba byłaby wygodnym sposobem późniejszego dostępu do nich.

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

W przeciwnym razie assignjest to, czego chcesz.

Nie twórz ramek danych. Zachowaj listę, nazwij jej elementy, ale nie dołączaj jej.

Głównym tego powodem jest to, że jeśli tworzysz zmienne w ruchu, prawie zawsze będziesz później musiał powtórzyć każdy z nich, aby wykonać coś pożytecznego. Tam ponownie będziesz zmuszony do iteracji przez każdą z nazw, które utworzyłeś w locie.

O wiele łatwiej jest nazwać elementy listy i iterować po nazwach.

Jeśli chodzi o dołączanie, jest to naprawdę zła praktyka programowania w R i może prowadzić do wielu problemów, jeśli nie będziesz ostrożny.

FAQ mówi:

Jeśli masz

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

możesz to zrobić

get(varname[1]) + 2

dla

a + 2

lub

assign(varname[1], 2 + 2)

dla

a <- 2 + 2

Wygląda więc na to, że używasz GET, gdy chcesz oszacować formułę, która używa zmiennej (takiej jak konkatenacja), i ASSIGN, gdy chcesz przypisać wartość do wstępnie zadeklarowanej zmiennej.

Składnia przypisania: przypisać (x, wartość)

x: nazwa zmiennej podana jako ciąg znaków. Żadne wymuszenie nie jest wykonywane, a pierwszy element wektora znakowego o długości większej niż jeden zostanie użyty z ostrzeżeniem.

wartość: wartość do przypisania x.

Innym trudnym rozwiązaniem jest nazwanie elementów listy i attachto:

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

A ta opcja?

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

Działa doskonale. W podanym przykładzie brakuje pierwszej linii, a następnie pojawia się komunikat o błędzie.