Running 'test.margintable.R' [157s]
  Running 'test.matharray.R' [148s]
  Running 'test.xalign.xdigits.xdisplay.R' [0s]
  Running 'test.xtable.R' [0s]
  Running 'test.xtable.data.frame.R' [0s]
  Running 'test.xtable.xtableFtable.R' [140s]
Running the tests in 'tests/test.margintable.R' failed.
Complete output:
  > ### Test of feature request #2168 implementation
  > ### Enables use of margintable floating environment
  > ### DJS, 17/08/2012
  > library(xtable)
  > x <- matrix(rnorm(6), ncol = 2)
  > x.small <- xtable(x, label='tabsmall', caption = 'A margin table')
  > print(x.small, floating.environment = 'margintable',
  +       table.environments = "",
  +       table.placement = NULL)
  % latex table generated in R 4.4.0 by xtable 1.8-4 package
  % Sat Mar 23 23:53:09 2024
  \begin{margintable}
  \centering
  \begin{tabular}{rrr}
    \hline
   & 1 & 2 \\ 
    \hline
  1 & 0.48 & 0.93 \\ 
    2 & -0.29 & 0.91 \\ 
    3 & -0.85 & 1.42 \\ 
     \hline
  \end{tabular}
  \caption{A margin table} 
  \label{tabsmall}
  \end{margintable}
  > ## % latex table generated in R 2.15.0 by xtable 1.7-1 package
  > ## % Fri Aug 17 01:42:42 2012
  > ## \begin{margintable}
  > ## \centering
  > ## \begin{tabular}{rrr}
  > ##   \hline
  > ##  & 1 & 2 \\
  > ##   \hline
  > ## 1 & 1.42 & -1.11 \\
  > ##   2 & -0.57 & 0.23 \\
  > ##   3 & -0.67 & -0.60 \\
  > ##    \hline
  > ## \end{tabular}
  > ## \caption{A margin table}
  > ## \label{tabsmall}
  > ## \end{margintable}
  > print(x.small, floating.environment = 'margintable',
  +       table.environments = "")
  % latex table generated in R 4.4.0 by xtable 1.8-4 package
  % Sat Mar 23 23:53:09 2024
  \begin{margintable}
  \centering
  \begin{tabular}{rrr}
    \hline
   & 1 & 2 \\ 
    \hline
  1 & 0.48 & 0.93 \\ 
    2 & -0.29 & 0.91 \\ 
    3 & -0.85 & 1.42 \\ 
     \hline
  \end{tabular}
  \caption{A margin table} 
  \label{tabsmall}
  \end{margintable}
  Warning message:
  In print.xtable(x.small, floating.environment = "margintable", table.environments = "") :
    margintable does not allow for table placement; setting table.placement to NULL
  > ## % latex table generated in R 2.15.0 by xtable 1.7-1 package
  > ## % Fri Aug 17 01:42:46 2012
  > ## \begin{margintable}
  > ## \centering
  > ## \begin{tabular}{rrr}
  > ##   \hline
  > ##  & 1 & 2 \\
  > ##   \hline
  > ## 1 & 1.42 & -1.11 \\
  > ##   2 & -0.57 & 0.23 \\
  > ##   3 & -0.67 & -0.60 \\
  > ##    \hline
  > ## \end{tabular}
  > ## \caption{A margin table}
  > ## \label{tabsmall}
  > ## \end{margintable}
  > ## Warning message:
  > ## In print.xtable(x.small, floating.environment = "margintable", table.environments = "") :
  > ##   margintable does not allow for table placement; setting table.placement to NULL
  > 
  > 
  > proc.time()
     user  system elapsed 
     0.20    0.01    0.20 
Running the tests in 'tests/test.matharray.R' failed.
Complete output:
  > require(xtable)
  Loading required package: xtable
  > V <- matrix(c(1.140380e-03,  3.010497e-05,  7.334879e-05,
  +               3.010497e-05,  3.320683e-04, -5.284854e-05,
  +               7.334879e-05, -5.284854e-05,  3.520928e-04), nrow = 3)
  > ### Simple test of print.xtableMatharray
  > print.xtableMatharray(xtable(V, display = rep("E", 4)))
  \begin{array}{rrr}
    1.14E-03 & 3.01E-05 & 7.33E-05 \\ 
    3.01E-05 & 3.32E-04 & -5.28E-05 \\ 
    7.33E-05 & -5.28E-05 & 3.52E-04 \\ 
    \end{array}
  > 
  > class(V) <- c("xtableMatharray")
  > class(V)
  [1] "xtableMatharray"
  > 
  > ### Test without any additional arguments
  > mth <- xtableMatharray(V)
  > str(mth)
  Classes 'xtableMatharray', 'xtable' and 'data.frame':	3 obs. of  3 variables:
   $ 1: num  1.14e-03 3.01e-05 7.33e-05
   $ 2: num  3.01e-05 3.32e-04 -5.28e-05
   $ 3: num  7.33e-05 -5.28e-05 3.52e-04
   - attr(*, "align")= chr [1:4] "r" "r" "r" "r"
   - attr(*, "digits")= num [1:4] 0 2 2 2
   - attr(*, "display")= chr [1:4] "s" "f" "f" "f"
  > print(mth)
  \begin{array}{rrr}
    0.00 & 0.00 & 0.00 \\ 
    0.00 & 0.00 & -0.00 \\ 
    0.00 & -0.00 & 0.00 \\ 
    \end{array}
  > 
  > ### Test with arguments to xtable
  > mth <- xtableMatharray(V, display = rep("E", 4))
  > str(mth)
  Classes 'xtableMatharray', 'xtable' and 'data.frame':	3 obs. of  3 variables:
   $ 1: num  1.14e-03 3.01e-05 7.33e-05
   $ 2: num  3.01e-05 3.32e-04 -5.28e-05
   $ 3: num  7.33e-05 -5.28e-05 3.52e-04
   - attr(*, "align")= chr [1:4] "r" "r" "r" "r"
   - attr(*, "digits")= num [1:4] 0 2 2 2
   - attr(*, "display")= chr [1:4] "E" "E" "E" "E"
  > print(mth)
  \begin{array}{rrr}
    1.14E-03 & 3.01E-05 & 7.33E-05 \\ 
    3.01E-05 & 3.32E-04 & -5.28E-05 \\ 
    7.33E-05 & -5.28E-05 & 3.52E-04 \\ 
    \end{array}
  > 
  > mth <- xtableMatharray(V, digits = 6)
  > str(mth)
  Classes 'xtableMatharray', 'xtable' and 'data.frame':	3 obs. of  3 variables:
   $ 1: num  1.14e-03 3.01e-05 7.33e-05
   $ 2: num  3.01e-05 3.32e-04 -5.28e-05
   $ 3: num  7.33e-05 -5.28e-05 3.52e-04
   - attr(*, "align")= chr [1:4] "r" "r" "r" "r"
   - attr(*, "digits")= num [1:4] 6 6 6 6
   - attr(*, "display")= chr [1:4] "s" "f" "f" "f"
  > print(mth)
  \begin{array}{rrr}
    0.001140 & 0.000030 & 0.000073 \\ 
    0.000030 & 0.000332 & -0.000053 \\ 
    0.000073 & -0.000053 & 0.000352 \\ 
    \end{array}
  > 
  > ### Test with additional print.xtableMatharray arguments
  > mth <- xtableMatharray(V, digits = 6)
  > str(mth)
  Classes 'xtableMatharray', 'xtable' and 'data.frame':	3 obs. of  3 variables:
   $ 1: num  1.14e-03 3.01e-05 7.33e-05
   $ 2: num  3.01e-05 3.32e-04 -5.28e-05
   $ 3: num  7.33e-05 -5.28e-05 3.52e-04
   - attr(*, "align")= chr [1:4] "r" "r" "r" "r"
   - attr(*, "digits")= num [1:4] 6 6 6 6
   - attr(*, "display")= chr [1:4] "s" "f" "f" "f"
  > print(mth, format.args = list(decimal.mark = ","))
  \begin{array}{rrr}
    0,001140 & 0,000030 & 0,000073 \\ 
    0,000030 & 0,000332 & -0,000053 \\ 
    0,000073 & -0,000053 & 0,000352 \\ 
    \end{array}
  > print(mth, scalebox = 0.5)
  \scalebox{0.5}{
  \begin{array}{rrr}
    0.001140 & 0.000030 & 0.000073 \\ 
    0.000030 & 0.000332 & -0.000053 \\ 
    0.000073 & -0.000053 & 0.000352 \\ 
    \end{array}
  }
  > print(mth, comment = TRUE)
  % latex table generated in R 4.4.0 by xtable 1.8-4 package
  \begin{array}{rrr}
    0.001140 & 0.000030 & 0.000073 \\ 
    0.000030 & 0.000332 & -0.000053 \\ 
    0.000073 & -0.000053 & 0.000352 \\ 
    \end{array}
  > print(mth, timestamp = "2000-01-01")
  \begin{array}{rrr}
    0.001140 & 0.000030 & 0.000073 \\ 
    0.000030 & 0.000332 & -0.000053 \\ 
    0.000073 & -0.000053 & 0.000352 \\ 
    \end{array}
  > print(mth, comment = TRUE, timestamp = "2000-01-01")
  % latex table generated in R 4.4.0 by xtable 1.8-4 package
  % 2000-01-01
  \begin{array}{rrr}
    0.001140 & 0.000030 & 0.000073 \\ 
    0.000030 & 0.000332 & -0.000053 \\ 
    0.000073 & -0.000053 & 0.000352 \\ 
    \end{array}
  > 
  > 
  > 
  > 
  > 
  > 
  > proc.time()
     user  system elapsed 
     0.28    0.04    0.31 
Running the tests in 'tests/test.xtable.xtableFtable.R' failed.
Complete output:
  > ### Test code for xtableFtable function
  > ### David Scott, <d.scott@auckland.ac.nz>, 2016-01-14
  > library(xtable)
  > 
  > 
  > tbl <- ftable(mtcars$cyl, mtcars$vs, mtcars$am, mtcars$gear, row.vars = c(2, 4),
  +               dnn = c("Cylinders", "V/S", "Transmission", "Gears"))
  > 
  > ## debug(xtableFtable)
  > xftbl <- xtableFtable(tbl)
  > str(xftbl)
   'xtableFtable' int [1:6, 1:6] 0 0 0 1 2 0 0 0 1 0 ...
   - attr(*, "row.vars")=List of 2
    ..$ V/S  : chr [1:2] "0" "1"
    ..$ Gears: chr [1:3] "3" "4" "5"
   - attr(*, "col.vars")=List of 2
    ..$ Cylinders   : chr [1:3] "4" "6" "8"
    ..$ Transmission: chr [1:2] "0" "1"
   - attr(*, "ftableAlign")= chr [1:10] "l" "l" "l" "l |" ...
   - attr(*, "ftableDigits")= num 0
   - attr(*, "quote")= logi FALSE
   - attr(*, "ftableDisplay")= chr [1:10] "s" "s" "s" "s" ...
   - attr(*, "method")= chr "non.compact"
   - attr(*, "lsep")= chr " $\\vert$ "
   - attr(*, "nChars")= num [1:2] 3 4
  > unclass(xftbl)
       [,1] [,2] [,3] [,4] [,5] [,6]
  [1,]    0    0    0    0   12    0
  [2,]    0    0    0    2    0    0
  [3,]    0    1    0    1    0    2
  [4,]    1    0    2    0    0    0
  [5,]    2    6    2    0    0    0
  [6,]    0    1    0    0    0    0
  attr(,"row.vars")
  attr(,"row.vars")$`V/S`
  [1] "0" "1"
  
  attr(,"row.vars")$Gears
  [1] "3" "4" "5"
  
  attr(,"col.vars")
  attr(,"col.vars")$Cylinders
  [1] "4" "6" "8"
  
  attr(,"col.vars")$Transmission
  [1] "0" "1"
  
  attr(,"ftableAlign")
   [1] "l"   "l"   "l"   "l |" "r"   "r"   "r"   "r"   "r"   "r"  
  attr(,"ftableDigits")
  [1] 0
  attr(,"quote")
  [1] FALSE
  attr(,"ftableDisplay")
   [1] "s" "s" "s" "s" "d" "d" "d" "d" "d" "d"
  attr(,"method")
  [1] "non.compact"
  attr(,"lsep")
  [1] " $\\vert$ "
  attr(,"nChars")
  [1] 3 4
  > print.xtableFtable(xftbl)
  % latex table generated in R 4.4.0 by xtable 1.8-4 package
  % Sat Mar 23 23:58:15 2024
  \begin{table}[ht]
  \centering
  \begin{tabular}{lll |rrrrrr}
    \hline
       &       & Cylinders    & \multicolumn{1}{l}{  4} & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{  6} & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{  8} & \multicolumn{1}{l}{   } \\ 
        &       & Transmission & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} \\ 
    V/S & Gears &              & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } \\ 
     \hline
  0   & 3     &              &  0 &  0 &  0 &  0 & 12 &  0 \\ 
        & 4     &              &  0 &  0 &  0 &  2 &  0 &  0 \\ 
        & 5     &              &  0 &  1 &  0 &  1 &  0 &  2 \\ 
    1   & 3     &              &  1 &  0 &  2 &  0 &  0 &  0 \\ 
        & 4     &              &  2 &  6 &  2 &  0 &  0 &  0 \\ 
        & 5     &              &  0 &  1 &  0 &  0 &  0 &  0 \\ 
     \hline
  \end{tabular}
  \end{table}
  > xftbl <- xtableFtable(tbl, method = "row.compact")
  > print.xtableFtable(xftbl)
  % latex table generated in R 4.4.0 by xtable 1.8-4 package
  % Sat Mar 23 23:58:15 2024
  \begin{table}[ht]
  \centering
  \begin{tabular}{lll |rrrrrr}
    \hline
       &       & Cylinders    & \multicolumn{1}{l}{  4} & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{  6} & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{  8} & \multicolumn{1}{l}{   } \\ 
    V/S & Gears & Transmission & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} \\ 
     \hline
  0   & 3     &              &  0 &  0 &  0 &  0 & 12 &  0 \\ 
        & 4     &              &  0 &  0 &  0 &  2 &  0 &  0 \\ 
        & 5     &              &  0 &  1 &  0 &  1 &  0 &  2 \\ 
    1   & 3     &              &  1 &  0 &  2 &  0 &  0 &  0 \\ 
        & 4     &              &  2 &  6 &  2 &  0 &  0 &  0 \\ 
        & 5     &              &  0 &  1 &  0 &  0 &  0 &  0 \\ 
     \hline
  \end{tabular}
  \end{table}
  > xftbl <- xtableFtable(tbl, method = "col.compact")
  > print.xtableFtable(xftbl)
  % latex table generated in R 4.4.0 by xtable 1.8-4 package
  % Sat Mar 23 23:58:15 2024
  \begin{table}[ht]
  \centering
  \begin{tabular}{ll |rrrrrr}
    \hline
       & Cylinders    & \multicolumn{1}{l}{  4} & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{  6} & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{  8} & \multicolumn{1}{l}{   } \\ 
        & Transmission & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} \\ 
    V/S & Gears        & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{   } \\ 
     \hline
  0   & 3            &  0 &  0 &  0 &  0 & 12 &  0 \\ 
        & 4            &  0 &  0 &  0 &  2 &  0 &  0 \\ 
        & 5            &  0 &  1 &  0 &  1 &  0 &  2 \\ 
    1   & 3            &  1 &  0 &  2 &  0 &  0 &  0 \\ 
        & 4            &  2 &  6 &  2 &  0 &  0 &  0 \\ 
        & 5            &  0 &  1 &  0 &  0 &  0 &  0 \\ 
     \hline
  \end{tabular}
  \end{table}
  > xftbl <- xtableFtable(tbl, method = "compact")
  > print.xtableFtable(xftbl)
  % latex table generated in R 4.4.0 by xtable 1.8-4 package
  % Sat Mar 23 23:58:15 2024
  \begin{table}[ht]
  \centering
  \begin{tabular}{ll |rrrrrr}
    \hline
       & Cylinders                   & \multicolumn{1}{l}{  4} & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{  6} & \multicolumn{1}{l}{   } & \multicolumn{1}{l}{  8} & \multicolumn{1}{l}{   } \\ 
    V/S & Gears $\vert$ Transmission & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} & \multicolumn{1}{l}{  0} & \multicolumn{1}{l}{  1} \\ 
     \hline
  0   & 3                           &  0 &  0 &  0 &  0 & 12 &  0 \\ 
        & 4                           &  0 &  0 &  0 &  2 &  0 &  0 \\ 
        & 5                           &  0 &  1 &  0 &  1 &  0 &  2 \\ 
    1   & 3                           &  1 &  0 &  2 &  0 &  0 &  0 \\ 
        & 4                           &  2 &  6 &  2 &  0 &  0 &  0 \\ 
        & 5                           &  0 &  1 &  0 &  0 &  0 &  0 \\ 
     \hline
  \end{tabular}
  \end{table}
  > ## debug(print.xtableFtable)
  > ## undebug(print.xtableFtable)
  > ## debug(print.xtable)
  > ## undebug(print.xtable)
  > 
  > 
  > proc.time()
     user  system elapsed 
     0.10    0.09    0.20