Convert nested list into list of rule

Convert nested list into list of rule

Usage

list2rules(obj)

Arguments

obj

(nested list) to convert into list of rules.

Examples

obj <- list(
  rule1 = list("X" = c("a", "b"), "Z" = "c", .to_NA = "xxxx"),
  rule2 = list(Missing = c(NA, "")),
  rule3 = list(Missing = c(NA, ""), .drop = TRUE),
  rule4 = list(Absent = c(NA, ""), .drop = TRUE, .to_NA = "yyyy")
)
list2rules(obj)
#> $rule1
#> Mapping of:
#> X  <-  a 
#> X  <-  b 
#> Z  <-  c 
#> NA <-  xxxx 
#> Convert to factor: TRUE 
#> Drop unused level: FALSE 
#> NA-replacing level in last position: TRUE 
#> 
#> $rule2
#> Mapping of:
#> Missing  <-  NA 
#> Missing  <-   
#> NA <-   
#> Convert to factor: TRUE 
#> Drop unused level: FALSE 
#> NA-replacing level in last position: TRUE 
#> 
#> $rule3
#> Mapping of:
#> Missing  <-  NA 
#> Missing  <-   
#> NA <-   
#> Convert to factor: TRUE 
#> Drop unused level: TRUE 
#> NA-replacing level in last position: TRUE 
#> 
#> $rule4
#> Mapping of:
#> Absent  <-  NA 
#> Absent  <-   
#> NA <-  yyyy 
#> Convert to factor: TRUE 
#> Drop unused level: TRUE 
#> NA-replacing level in last position: TRUE 
#>