Running examples in 'desctable-Ex.R' failed
The error most likely occurred in:

> ### Name: desctable
> ### Title: Generate a statistics table
> ### Aliases: desctable desctable.default desctable.grouped_df
> 
> ### ** Examples
> 
> iris %>%
+   desctable
                        N    Mean/%        sd  Med IQR
1        Sepal.Length 150        NA        NA 5.80 1.3
2         Sepal.Width 150  3.057333 0.4358663   NA  NA
3        Petal.Length 150        NA        NA 4.35 3.5
4         Petal.Width 150        NA        NA 1.30 1.5
5             Species 150        NA        NA   NA  NA
6     Species: setosa  50 33.333333        NA   NA  NA
7 Species: versicolor  50 33.333333        NA   NA  NA
8  Species: virginica  50 33.333333        NA   NA  NA
> 
> # Does the same as stats_auto here
> iris %>% 
+   desctable(stats = list("N"      = length,
+                          "%/Mean" = is.factor ~ percent | (is.normal ~ mean),
+                          "sd"     = is.normal ~ sd,
+                          "Med"    = is.normal ~ NA | median,
+                          "IQR"    = is.normal ~ NA | IQR))
                        N    %/Mean        sd  Med IQR
1        Sepal.Length 150        NA        NA 5.80 1.3
2         Sepal.Width 150  3.057333 0.4358663   NA  NA
3        Petal.Length 150        NA        NA 4.35 3.5
4         Petal.Width 150        NA        NA 1.30 1.5
5             Species 150        NA        NA   NA  NA
6     Species: setosa  50 33.333333        NA   NA  NA
7 Species: versicolor  50 33.333333        NA   NA  NA
8  Species: virginica  50 33.333333        NA   NA  NA
> 
> # With labels
> mtcars %>% desctable(labels = c(hp  = "Horse Power",
+                                 cyl = "Cylinders",
+                                 mpg = "Miles per gallon"))
                     N      Mean        sd     Med       IQR
1  Miles per gallon 32 20.090625 6.0269481      NA        NA
2         Cylinders 32        NA        NA   6.000   4.00000
3              disp 32        NA        NA 196.300 205.17500
4       Horse Power 32        NA        NA 123.000  83.50000
5              drat 32  3.596563 0.5346787      NA        NA
6                wt 32        NA        NA   3.325   1.02875
7              qsec 32 17.848750 1.7869432      NA        NA
8                vs 32        NA        NA   0.000   1.00000
9                am 32        NA        NA   0.000   1.00000
10             gear 32        NA        NA   4.000   1.00000
11             carb 32        NA        NA   2.000   2.00000
> 
> # With grouping on a factor
> iris %>%
+   group_by(Species) %>%
+   desctable(stats = stats_default)
Error in eval(grps[[1]]) : object 'Species' not found
Calls: %>% ... vars_select_eval -> map_if -> map -> .Call -> .f -> eval -> eval
Execution halted