Analysis in R: “magicfor” package, which is useful for managing “for” command processing

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"
#&#30465;&#30053;
$ 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()
#&#20869;&#23481;&#12434;&#30906;&#35469;
TestResultDF

I hope this makes your analysis a little easier !!