This package saves the results of each “for” command in a “list”, “data.frame” or “vector”. In particular, we recommend the “magic_result” command, which save the results in a “list”.
To use this method, simply enclose the processing content of the “for” command with the “magic_for” command and one of the “magic_result”, “magic_result_as_dataframe”, or “magic_result_as_vector” commands.
This is a very useful package. Just checking the contents of the “magic_for” command is helpful.
・”magicfor” package
https://github.com/hoxo-m/magicfor
Package version is 0.1.0. Checked with R version 4.2.2.
Install Package
Run the following command.
#Install Package install.packages("devtools") devtools::install_github("hoxo-m/magicfor")
Example
See the command and package help for details.
#Loading the library library("magicfor") ###Creating Data##### n <- 100 TestData <- data.frame(Group = sample(paste0("Group", 1:5), n, replace = TRUE), Data1 = rnorm(n), Data2 = rnorm(n) + rnorm(n) + rnorm(n), Data3 = sample(1:5, n, replace = TRUE), Data4 = sample(LETTERS[1:26], n, replace = TRUE)) ####### ###For example, store the results in a list##### #Executed before "for" command:magic_for command magic_for(print) #"for" command for(i in seq(unique(TestData[, 4]))) { Data <- subset(TestData, TestData[, 4] == i) print(Data) } #magic_result command TestResult <- magic_result() #check str(TestResult) List of 3 $ Data :List of 5 ..$ :'data.frame': 26 obs. of 5 variables: $ ExCharData:List of 5 ..$ : chr "T" #省略 $ Char :List of 5 ..$ :'data.frame': 7 obs. of 5 variables: #Get in "data.frame": magic_result_as_dataframe command TestResultDF <- magic_result_as_dataframe() #内容を確認 TestResultDF
I hope this makes your analysis a little easier !!