R - вернуть несколько объектов в другую (родительскую) среду

Question

Я пишу функцию, в которой я верну несколько объектов. Обычный способ - сохранить их как список и вернуть список. Однако это означает, что мне придется удалить список из списка для доступа к этим объектам.

Можно ли вместо этого сохранить их в другой среде вне самой функции?

Я думаю, что буду используйте эту функцию непосредственно внутри моего кода или внутри другой функции. Идея заключалась бы в том, чтобы передать sh эти объекты в прямую родительскую среду, поэтому функцию, если я выполняю эту функцию внутри другой функции, или глобальную среду, если я выполняю встроенную функцию в своем коде.

Наилучшее ,

---

Редактировать: Привет, я добавил фиктивный список. Это на самом деле данные, которые я использую. Первый элемент содержит набор данных после модификации с помощью функции и вектор, содержащий имена столбцов, которые были добавлены, которые я использую в своем коде. Прежде всего, я задал вопрос: я хочу извлечь набор данных и вектор и заменить исходный набор данных или вектор, если они уже существуют, или создать их, если их нет.

I скорее всего, вызовет это внутри функции, которая будет использовать их дальше. Обычно я делал бы это с помощью al oop, но я бы предпочел функцию для этого, которую я могу вызвать в любое время.

Как бы вы это сделали? Я пытался с unlist, но так и не достиг того, что я хочу.

---

list(dummy2 = structure(list(interaction = c("Rutilus rutilus<-Hydrachnidia", 
"Rutilus rutilus<-Hydrachnidia", "Rutilus rutilus<-Hydrachnidia", 
"Rutilus rutilus<-Hydrachnidia", "Rutilus rutilus<-Hydrachnidia", 
"Rutilus rutilus<-Hydrachnidia"), PREDATOR = c("Rutilus rutilus", 
"Rutilus rutilus", "Rutilus rutilus", "Rutilus rutilus", "Rutilus rutilus", 
"Rutilus rutilus"), PREY = c("Hydrachnidia", "Hydrachnidia", 
"Hydrachnidia", "Hydrachnidia", "Hydrachnidia", "Hydrachnidia"
), interaction_type = c("eats", "eats", "preysOn", "preysOn", 
"preysOn", "eats"), source = c("Globi", "Globi", "Globi", "Globi", 
"Globi", "Globi"), pred_prey_lifestage = c("NA<-NA", "larvae<-larvae", 
"larvae<-larvae", "larvae<-NA", "NA<-NA", "NA<-NA"), interaction_lifestage = c("NA<-NA", 
"larvae<-larvae", "larvae<-larvae", "larvae<-NA", "NA<-NA", "NA<-NA"
), pred_lifestage = c(NA, "larvae", "larvae", "larvae", NA, NA
), prey_lifestage = c(NA, "larvae", "larvae", NA, NA, NA), lat = c(NA_character_, 
NA_character_, NA_character_, NA_character_, NA_character_, NA_character_
), lon = c(NA_character_, NA_character_, NA_character_, NA_character_, 
NA_character_, NA_character_), ref = c("Rowan Dunn, D. (1954). The Feeding Habits of some of the Fishes and some Members of the Bottom Fauna of Llyn Tegid (Bala Lake), Merionethshire. Journal of Animal Ecology, 23(2), 224�233.", 
"Northcott, D. S., The role of aquatic macrophytes in the availabillty of food for young fish, 1981, PhD thesis, City of London Polytechnic, UK", 
"Northcott, D. S., The role of aquatic macrophytes in the availabillty of food for young fish, 1981, PhD thesis, City of London Polytechnic, UK", 
"Northcott, D. S., The role of aquatic macrophytes in the availabillty of food for young fish, 1981, PhD thesis, City of London Polytechnic, UK", 
"Northcott, D. S., The role of aquatic macrophytes in the availabillty of food for young fish, 1981, PhD thesis, City of London Polytechnic, UK", 
"Northcott, D. S., The role of aquatic macrophytes in the availabillty of food for young fish, 1981, PhD thesis, City of London Polytechnic, UK"
), data_provider = c("Gray C, Ma A, Perkins D, Hudson L, Figueroa D, Woodward G (2015). Database of trophic interactions. Zenodo. https://doi.org/10.5281/zenodo.13751. Accessed at <https://github.com/globalbioticinteractions/gray2015/archive/95bfd96cc46e5d58482fd2bdad0677eeb74ba0f4.zip> on 16 Feb 2020.", 
"Gray C, Ma A, Perkins D, Hudson L, Figueroa D, Woodward G (2015). Database of trophic interactions. Zenodo. https://doi.org/10.5281/zenodo.13751. Accessed at <https://github.com/globalbioticinteractions/gray2015/archive/95bfd96cc46e5d58482fd2bdad0677eeb74ba0f4.zip> on 16 Feb 2020.", 
"Gray C, Ma A, Perkins D, Hudson L, Figueroa D, Woodward G (2015). Database of trophic interactions. Zenodo. https://doi.org/10.5281/zenodo.13751. Accessed at <https://github.com/globalbioticinteractions/gray2015/archive/95bfd96cc46e5d58482fd2bdad0677eeb74ba0f4.zip> on 16 Feb 2020.", 
"Gray C, Ma A, Perkins D, Hudson L, Figueroa D, Woodward G (2015). Database of trophic interactions. Zenodo. https://doi.org/10.5281/zenodo.13751. Accessed at <https://github.com/globalbioticinteractions/gray2015/archive/95bfd96cc46e5d58482fd2bdad0677eeb74ba0f4.zip> on 16 Feb 2020.", 
"Gray, C., Ma, A., Perkins, D., Hudson, L., Figueroa, D., & Woodward, G. (2015). Database of trophic interactions [Data set]. Zenodo. http://doi.org/10.5281/zenodo.13751. Accessed at <https://zenodo.org/record/13751/files/trophic.links.2014-11-10.csv> on 16 Feb 2020.", 
"Gray, C., Ma, A., Perkins, D., Hudson, L., Figueroa, D., & Woodward, G. (2015). Database of trophic interactions [Data set]. Zenodo. http://doi.org/10.5281/zenodo.13751. Accessed at <https://zenodo.org/record/13751/files/trophic.links.2014-11-10.csv> on 16 Feb 2020."
)), row.names = c(351L, 361L, 362L, 366L, 376L, 377L), class = "data.frame"), 
    dummy2.addi = c("interaction", "interaction_lifestage"))

Answer 1

Да, есть возможность сделать это:

assign(x, value, pos = -1, envir = as.environment(pos),
       inherits = FALSE, immediate = TRUE)

Другая возможность

foo <- function(){
    someVariableInParentEnvironment <<- 5
}

assign() имеет возможность записи в любую среду, которую вы хотите.

Однако

Вы должны действительно подумать, прежде чем сделать это. Я бы порекомендовал не делать этого, если только в небольших функциях не используются небольшие скрипты, которые вы используете. Проблема в том, что вы теряете из виду, где какая переменная существует.