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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: Assocs
> ### Title: Association Measures
> ### Aliases: Assocs print.Assocs
> ### Keywords: multivariate
> 
> ### ** Examples
> 
> options(scipen=8)
> 
> # Example taken from: SAS/STAT(R) 9.2 User's Guide, Second Edition, The FREQ Procedure
> # http://support.sas.com/documentation/cdl/en/statugfreq/63124/PDF/default/statugfreq.pdf
> # Hair-Eye-Color pp. 1816
> 
> tob <- as.table(matrix(c(
+   69, 28, 68, 51,  6,
+   69, 38, 55, 37,  0,
+   90, 47, 94, 94, 16
+ ), nrow=3, byrow=TRUE,
+    dimnames=list(eye=c("blue","green","brown"),
+                  hair=c("fair","red","medium","dark","black")) ))
> Desc(tob)
------------------------------------------------------------------------------ 
tob (table)

Summary: 
n: 762, rows: 3, columns: 5

Pearson's Chi-squared test:
  X-squared = 20.925, df = 8, p-value = 0.00735
Likelihood Ratio:
  X-squared = 25.973, df = 8, p-value = 0.001061
Mantel-Haenszel Chi-squared:
  X-squared = 3.7838, df = 1, p-value = 0.05175

Phi-Coefficient        0.166
Contingency Coeff.     0.163
Cramer's V             0.117

                                                          
        hair    fair    red   medium   dark   black    Sum
eye                                                       
                                                          
blue    freq      69     28       68     51       6    222
        perc    9.1%   3.7%     8.9%   6.7%    0.8%  29.1%
        p.row  31.1%  12.6%    30.6%  23.0%    2.7%      .
        p.col  30.3%  24.8%    31.3%  28.0%   27.3%      .
                                                          
green   freq      69     38       55     37       0    199
        perc    9.1%   5.0%     7.2%   4.9%    0.0%  26.1%
        p.row  34.7%  19.1%    27.6%  18.6%    0.0%      .
        p.col  30.3%  33.6%    25.3%  20.3%    0.0%      .
                                                          
brown   freq      90     47       94     94      16    341
        perc   11.8%   6.2%    12.3%  12.3%    2.1%  44.8%
        p.row  26.4%  13.8%    27.6%  27.6%    4.7%      .
        p.col  39.5%  41.6%    43.3%  51.6%   72.7%      .
                                                          
Sum     freq     228    113      217    182      22    762
        perc   29.9%  14.8%    28.5%  23.9%    2.9% 100.0%
        p.row      .      .        .      .       .      .
        p.col      .      .        .      .       .      .
                                                          

Error in Rev.table(prop.table(margin.table(x, 1)) * (1 - (nrow(x) - 1) *  : 
  'x' is not an array
Calls: <Anonymous> ... eval -> plot.Desc.table -> PlotMosaic -> Rev -> Rev.table
Execution halted