X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=pkg%2Ftests%2Ftest.matharray.R;h=172ff92c4c8df5d00f0f403bc07988165ed8c98b;hb=ab84b5c02505bcf3b8ba7c25fd1bc676da446ea5;hp=3f51aa288281aa6c565ee5d027b2a8930f08f955;hpb=e40b409036f6b7bb91b8903db3f8726049b7cdc8;p=xtable.git

diff --git a/pkg/tests/test.matharray.R b/pkg/tests/test.matharray.R
index 3f51aa2..172ff92 100644
--- a/pkg/tests/test.matharray.R
+++ b/pkg/tests/test.matharray.R
@@ -9,21 +9,21 @@ class(V) <- c("xtableMatharray")
 class(V)
 
 ### Test without any additional arguments
-mth <- xtable(V)
+mth <- xtableMatharray(V)
 str(mth)
 print(mth)
 
 ### Test with arguments to xtable
-mth <- xtable(V, display = rep("E", 4))
+mth <- xtableMatharray(V, display = rep("E", 4))
 str(mth)
 print(mth)
 
-mth <- xtable(V, digits = 6)
+mth <- xtableMatharray(V, digits = 6)
 str(mth)
 print(mth)
 
 ### Test with additional print.xtableMatharray arguments
-mth <- xtable(V, digits = 6)
+mth <- xtableMatharray(V, digits = 6)
 str(mth)
 print(mth, format.args = list(decimal.mark = ","))
 print(mth, scalebox = 0.5)