diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test
index 9dc7b910fba07909695e2b172deb13727417ada8..82a4c02981fb51b1b459c1a4dd58a8341dd6d387 100644
--- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test
+++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/ExpectedTestOutput.test
@@ -5402,7 +5402,7 @@ character(0)
#{ as.character(list(c(2L, 3L))) }
[1] "2:3"
-##com.oracle.truffle.r.test.builtins.TestBuiltin_ascharacter.testAsCharacter#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_ascharacter.testAsCharacter#
#{ as.character(list(c(2L, 3L, 5L))) }
[1] "c(2, 3, 5)"
@@ -5594,7 +5594,7 @@ character(0)
#argv <- list(c(-4, 4, 3.99, -1, -3.01));as.character(argv[[1]]);
[1] "-4" "4" "3.99" "-1" "-3.01"
-##com.oracle.truffle.r.test.builtins.TestBuiltin_ascharacter.testascharacter36#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_ascharacter.testascharacter36#
#argv <- list(list(exit.code = 0L, send = NULL));as.character(argv[[1]]);
[1] "0" "NULL"
@@ -16405,7 +16405,7 @@ invalid 'cutoff' value for 'deparse', using default
#{ det(matrix(c(1,-3,4,-5),nrow=2)) }
[1] 7
-##com.oracle.truffle.r.test.builtins.TestBuiltin_det.testDet#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_det.testDet#
#{ det(matrix(c(1,0,4,NA),nrow=2)) }
[1] NA
@@ -22525,7 +22525,7 @@ attr(,"Rd_tag")
#argv <- list(structure(c(NA, 2, NA, 1, NA, 0), .Dim = 2:3), structure(c(NA, 2, NA, 1, NA, 0), .Dim = 2:3), TRUE, TRUE, TRUE, TRUE, FALSE); .Internal(identical(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))
[1] TRUE
-##com.oracle.truffle.r.test.builtins.TestBuiltin_identical.testidentical20#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_identical.testidentical20#
#argv <- list(NaN, NaN, TRUE, TRUE, TRUE, TRUE, FALSE); .Internal(identical(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))
[1] TRUE
@@ -22593,7 +22593,7 @@ attr(,"Rd_tag")
#argv <- structure(list(x = structure(list(X1.4 = 1:4), .Names = 'X1.4', row.names = c(NA, -4L), class = 'data.frame'), y = structure(list(X1.4 = 1:4), .Names = 'X1.4', row.names = c('1', '2', '3', '4'), class = 'data.frame')), .Names = c('x', 'y'));do.call('identical', argv)
[1] FALSE
-##com.oracle.truffle.r.test.builtins.TestBuiltin_identical.testidentical37#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_identical.testidentical37#
#argv <- structure(list(x = structure(list(a = NA, b = NA_integer_, c = NA_real_, d = NA_complex_, e = 1, f = 1L, g = 1:3, h = c(NA, 1L, 2L, 3L), i = NA_character_, j = c('foo', NA, 'bar')), .Names = c('a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j')), y = structure(list(a = NA, b = NA_integer_, c = NA_real_, d = NA_complex_, e = 1, f = 1L, g = 1:3, h = c(NA, 1L, 2L, 3L), i = NA_character_, j = c('foo', NA, 'bar')), .Names = c('a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j'))), .Names = c('x', 'y'));do.call('identical', argv)
[1] TRUE
@@ -29292,7 +29292,7 @@ Error in lockEnvironment("foo", TRUE) : not an environment
[1,] 0.00000 0.47712
[2,] 0.30103 0.60206
-##com.oracle.truffle.r.test.builtins.TestBuiltin_log10.testLog10#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_log10.testLog10#
#{ x <- c(a=1, b=10) ; round( c(log(x), log10(x), log2(x)), digits=5 ) }
a b a b a b
0.00000 2.30259 0.00000 1.00000 0.00000 3.32193
@@ -39394,7 +39394,7 @@ complex(0)
#argv <- list(c(1, 8, 28, 56, 70, 56, 28, 8, 1)); .Internal(polyroot(argv[[1]]))
[1] -1-0i -1+0i -1+0i -1-0i -1-0i -1-0i -1-0i -1-0i
-##com.oracle.truffle.r.test.builtins.TestBuiltin_pretty.testpretty1#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_pretty.testpretty1#
#argv <- list(0L, 3L, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))
$l
[1] 0
@@ -39406,7 +39406,7 @@ $n
[1] 6
-##com.oracle.truffle.r.test.builtins.TestBuiltin_pretty.testpretty2#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_pretty.testpretty2#
#argv <- list(-0.03, 1.11, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))
$l
[1] -0.2
@@ -39418,7 +39418,7 @@ $n
[1] 7
-##com.oracle.truffle.r.test.builtins.TestBuiltin_pretty.testpretty3#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_pretty.testpretty3#
#argv <- list(-6.64448090063514e-06, 6.64454021993011e-06, 1, 0, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))
$l
[1] -1e-05
@@ -39430,7 +39430,7 @@ $n
[1] 2
-##com.oracle.truffle.r.test.builtins.TestBuiltin_pretty.testpretty4#Ignored.Unknown#
+##com.oracle.truffle.r.test.builtins.TestBuiltin_pretty.testpretty4#
#argv <- list(1.234e+100, 1.234e+100, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))
$l
[1] 1.2e+100
@@ -115471,6 +115471,26 @@ In qnorm(c(0.1, 0.9, 0.5, 1.00001, 0.99999), 100, c(20, 1)) : NaNs produced
#{ set.seed(7); round( rbinom(3,3,0.9), digits = 5 ) }
[1] 1 3 3
+##com.oracle.truffle.r.test.library.stats.TestStats.testRandom#
+#{ set.seed(7); round( rcauchy(3), digits = 5 ) }
+[1] -0.03486 3.00509 0.38038
+
+##com.oracle.truffle.r.test.library.stats.TestStats.testRandom#
+#{ set.seed(7); round( rcauchy(3, scale=4, location=1:3), digits = 5 ) }
+[1] 0.86057 14.02037 4.52150
+
+##com.oracle.truffle.r.test.library.stats.TestStats.testRandom#
+#{ set.seed(7); round( rgamma(3,0.5,rate=1:3), digits = 5 ) }
+[1] 3.63965 0.00938 0.02776
+
+##com.oracle.truffle.r.test.library.stats.TestStats.testRandom#
+#{ set.seed(7); round( rgamma(3,0.5,scale=1:3), digits = 5 ) }
+[1] 3.63965 0.03753 0.24984
+
+##com.oracle.truffle.r.test.library.stats.TestStats.testRandom#
+#{ set.seed(7); round( rgamma(3,1), digits = 5 ) }
+[1] 3.42520 0.95263 2.76594
+
##com.oracle.truffle.r.test.library.stats.TestStats.testRandom#
#{ set.seed(7); round( rnorm(3,c(1000,2,3),c(10,11)), digits = 5 ) }
[1] 1022.87247 -11.16449 -3.94293
@@ -115483,6 +115503,10 @@ In qnorm(c(0.1, 0.9, 0.5, 1.00001, 0.99999), 100, c(20, 1)) : NaNs produced
#{ set.seed(7); round( runif(3,1,10), digits = 5 ) }
[1] 9.90018 4.57971 2.04128
+##com.oracle.truffle.r.test.library.stats.TestStats.testRandom#
+#{ set.seed(7); round( runif(3,1:3,3:2), digits = 5 ) }
+[1] 2.97782 2.00000 3.00000
+
##com.oracle.truffle.r.test.library.stats.TestStats.testRandom#
#{ set.seed(7); runif(10) }
[1] 0.98890930 0.39774545 0.11569778 0.06974868 0.24374939 0.79201043
@@ -115620,26 +115644,6 @@ In qnorm(c(0.1, 0.9, 0.5, 1.00001, 0.99999), 100, c(20, 1)) : NaNs produced
#{ set.seed(9567, "Marsaglia-Multicarry"); sum(runif(100)) }
[1] 52.92218
-##com.oracle.truffle.r.test.library.stats.TestStats.testRandomIgnore#Ignored.Unknown#
-#{ set.seed(7); round( rcauchy(3), digits = 5 ) }
-[1] -0.03486 3.00509 0.38038
-
-##com.oracle.truffle.r.test.library.stats.TestStats.testRandomIgnore#Ignored.Unknown#
-#{ set.seed(7); round( rcauchy(3, scale=4, location=1:3), digits = 5 ) }
-[1] 0.86057 14.02037 4.52150
-
-##com.oracle.truffle.r.test.library.stats.TestStats.testRandomIgnore#Ignored.Unknown#
-#{ set.seed(7); round( rgamma(3,0.5,rate=1:3), digits = 5 ) }
-[1] 3.63965 0.00938 0.02776
-
-##com.oracle.truffle.r.test.library.stats.TestStats.testRandomIgnore#Ignored.Unknown#
-#{ set.seed(7); round( rgamma(3,0.5,scale=1:3), digits = 5 ) }
-[1] 3.63965 0.03753 0.24984
-
-##com.oracle.truffle.r.test.library.stats.TestStats.testRandomIgnore#Ignored.Unknown#
-#{ set.seed(7); round( rgamma(3,1), digits = 5 ) }
-[1] 3.42520 0.95263 2.76594
-
##com.oracle.truffle.r.test.library.stats.TestStats.testRandomIgnore#Ignored.Unknown#
#{ set.seed(7); round( rlnorm(3), digits = 5 ) }
[1] 9.84779 0.30217 0.49943
@@ -115648,10 +115652,6 @@ In qnorm(c(0.1, 0.9, 0.5, 1.00001, 0.99999), 100, c(20, 1)) : NaNs produced
#{ set.seed(7); round( rlnorm(3,sdlog=c(10,3,0.5)), digits = 5 ) }
[1] 8.578043e+09 2.759000e-02 7.067000e-01
-##com.oracle.truffle.r.test.library.stats.TestStats.testRandomIgnore#Ignored.Unknown#
-#{ set.seed(7); round( runif(3,1:3,3:2), digits = 5 ) }
-[1] 2.97782 2.00000 3.00000
-
##com.oracle.truffle.r.test.library.stats.TestStats.testRbinom#
#set.seed(123); rbinom(1,20,c(0.3,0.2))
[1] 5
diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_ascharacter.java b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_ascharacter.java
index 6deb046c20253c0a5cfe6b6d718e071506d28b21..41bcaeff061282aa915931433bb3373631865486 100644
--- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_ascharacter.java
+++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_ascharacter.java
@@ -197,7 +197,7 @@ public class TestBuiltin_ascharacter extends TestBase {
@Test
public void testascharacter36() {
- assertEval(Ignored.Unknown, "argv <- list(list(exit.code = 0L, send = NULL));as.character(argv[[1]]);");
+ assertEval("argv <- list(list(exit.code = 0L, send = NULL));as.character(argv[[1]]);");
}
@Test
@@ -262,7 +262,7 @@ public class TestBuiltin_ascharacter extends TestBase {
assertEval("{ as.character(list(c(\"hello\", \"hi\"))) }");
assertEval("{ as.character(list(list(c(\"hello\", \"hi\")))) }");
assertEval("{ as.character(list(c(2L, 3L))) }");
- assertEval(Ignored.Unknown, "{ as.character(list(c(2L, 3L, 5L))) }"); // GnuR prints no L
+ assertEval("{ as.character(list(c(2L, 3L, 5L))) }");
assertEval("{ x<-as.character(Sys.time()) }");
assertEval("{ f<-function(x) { sys.call() }; as.character(f(7)) }");
diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_det.java b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_det.java
index 03c916578780d4c15100169745c7226f424c5881..bc9640f6a04b95851c0127e2cc03d9de885e18ca 100644
--- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_det.java
+++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_det.java
@@ -41,6 +41,6 @@ public class TestBuiltin_det extends TestBase {
public void testDet() {
assertEval("{ det(matrix(c(1,2,4,5),nrow=2)) }");
assertEval("{ det(matrix(c(1,-3,4,-5),nrow=2)) }");
- assertEval(Ignored.Unknown, "{ det(matrix(c(1,0,4,NA),nrow=2)) }");
+ assertEval("{ det(matrix(c(1,0,4,NA),nrow=2)) }");
}
}
diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_identical.java b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_identical.java
index 6811de383289d6f4fd895805930c125ee5e77f33..d2fdc75685a637c5ee7d4bb80484fef5a580ecc2 100644
--- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_identical.java
+++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_identical.java
@@ -114,7 +114,7 @@ public class TestBuiltin_identical extends TestBase {
@Test
public void testidentical20() {
- assertEval(Ignored.Unknown, "argv <- list(NaN, NaN, TRUE, TRUE, TRUE, TRUE, FALSE); .Internal(identical(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
+ assertEval("argv <- list(NaN, NaN, TRUE, TRUE, TRUE, TRUE, FALSE); .Internal(identical(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
}
@Test
@@ -196,9 +196,8 @@ public class TestBuiltin_identical extends TestBase {
@Test
public void testidentical37() {
- assertEval(Ignored.Unknown,
- "argv <- structure(list(x = structure(list(a = NA, b = NA_integer_, c = NA_real_, d = NA_complex_, e = 1, f = 1L, g = 1:3, h = c(NA, 1L, 2L, 3L), i = NA_character_, j = c('foo', NA, 'bar')), .Names = c('a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j')), y = structure(list(a = NA, b = NA_integer_, c = NA_real_, d = NA_complex_, e = 1, f = 1L, g = 1:3, h = c(NA, 1L, 2L, 3L), i = NA_character_, j = c('foo', NA, 'bar')), .Names = c('a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j'))), .Names = c('x', 'y'));" +
- "do.call('identical', argv)");
+ assertEval("argv <- structure(list(x = structure(list(a = NA, b = NA_integer_, c = NA_real_, d = NA_complex_, e = 1, f = 1L, g = 1:3, h = c(NA, 1L, 2L, 3L), i = NA_character_, j = c('foo', NA, 'bar')), .Names = c('a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j')), y = structure(list(a = NA, b = NA_integer_, c = NA_real_, d = NA_complex_, e = 1, f = 1L, g = 1:3, h = c(NA, 1L, 2L, 3L), i = NA_character_, j = c('foo', NA, 'bar')), .Names = c('a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j'))), .Names = c('x', 'y'));" +
+ "do.call('identical', argv)");
}
@Test
diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_log10.java b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_log10.java
index 11f19dd5403a7f4c9364119db2c3be4f59bb5790..a7cf88d1a1eacf5fd0e1e9d05c139a66f037154b 100644
--- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_log10.java
+++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_log10.java
@@ -63,7 +63,7 @@ public class TestBuiltin_log10 extends TestBase {
assertEval("{ as.integer(log10(200)*100000) } ");
assertEval("{ m <- matrix(1:4, nrow=2) ; round( log10(m), digits=5 ) }");
- assertEval(Ignored.Unknown, "{ x <- c(a=1, b=10) ; round( c(log(x), log10(x), log2(x)), digits=5 ) }");
+ assertEval("{ x <- c(a=1, b=10) ; round( c(log(x), log10(x), log2(x)), digits=5 ) }");
assertEval("{ log10(c(1+1i, -1-1i)) }");
}
diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_pretty.java b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_pretty.java
index 5151c51755823f045cc95948e1b2794b79dbeba0..e539220c8de8c727fd2174d91f79b4ca406baabe 100644
--- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_pretty.java
+++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/builtins/TestBuiltin_pretty.java
@@ -19,23 +19,21 @@ public class TestBuiltin_pretty extends TestBase {
@Test
public void testpretty1() {
- assertEval(Ignored.Unknown, "argv <- list(0L, 3L, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
+ assertEval("argv <- list(0L, 3L, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
}
@Test
public void testpretty2() {
- assertEval(Ignored.Unknown, "argv <- list(-0.03, 1.11, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
+ assertEval("argv <- list(-0.03, 1.11, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
}
@Test
public void testpretty3() {
- assertEval(Ignored.Unknown,
- "argv <- list(-6.64448090063514e-06, 6.64454021993011e-06, 1, 0, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
+ assertEval("argv <- list(-6.64448090063514e-06, 6.64454021993011e-06, 1, 0, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
}
@Test
public void testpretty4() {
- assertEval(Ignored.Unknown,
- "argv <- list(1.234e+100, 1.234e+100, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
+ assertEval("argv <- list(1.234e+100, 1.234e+100, 5, 1, 0.75, c(1.5, 2.75), 0); .Internal(pretty(argv[[1]], argv[[2]], argv[[3]], argv[[4]], argv[[5]], argv[[6]], argv[[7]]))");
}
}
diff --git a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/library/stats/TestStats.java b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/library/stats/TestStats.java
index 3ab6478a9f128b4f225e287d530217da3861d220..6f4026193737e607d2b00be8b42d240769ab2f21 100644
--- a/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/library/stats/TestStats.java
+++ b/com.oracle.truffle.r.test/src/com/oracle/truffle/r/test/library/stats/TestStats.java
@@ -143,25 +143,24 @@ public class TestStats extends TestBase {
assertEval("{ set.seed(7); round( runif(3), digits = 5 ) }");
assertEval("{ set.seed(7); round( runif(3,1,10), digits = 5 ) }");
+ assertEval("{ set.seed(7); round( runif(3,1:3,3:2), digits = 5 ) }");
assertEval("{ set.seed(7); round( rnorm(3,c(1000,2,3),c(10,11)), digits = 5 ) }");
assertEval("{ set.seed(7); round( rbinom(3,3,0.9), digits = 5 ) }");
assertEval("{ set.seed(7); round( rbinom(3,10,(1:5)/5), digits = 5 ) }");
+
+ assertEval("{ set.seed(7); round( rgamma(3,1), digits = 5 ) }");
+ assertEval("{ set.seed(7); round( rgamma(3,0.5,scale=1:3), digits = 5 ) }");
+ assertEval("{ set.seed(7); round( rgamma(3,0.5,rate=1:3), digits = 5 ) }");
+
+ assertEval("{ set.seed(7); round( rcauchy(3), digits = 5 ) }");
+ assertEval("{ set.seed(7); round( rcauchy(3, scale=4, location=1:3), digits = 5 ) }");
}
@Test
public void testRandomIgnore() {
- assertEval(Ignored.Unknown, "{ set.seed(7); round( runif(3,1:3,3:2), digits = 5 ) }");
-
- assertEval(Ignored.Unknown, "{ set.seed(7); round( rgamma(3,1), digits = 5 ) }");
- assertEval(Ignored.Unknown, "{ set.seed(7); round( rgamma(3,0.5,scale=1:3), digits = 5 ) }");
- assertEval(Ignored.Unknown, "{ set.seed(7); round( rgamma(3,0.5,rate=1:3), digits = 5 ) }");
-
assertEval(Ignored.Unknown, "{ set.seed(7); round( rlnorm(3), digits = 5 ) }");
assertEval(Ignored.Unknown, "{ set.seed(7); round( rlnorm(3,sdlog=c(10,3,0.5)), digits = 5 ) }");
-
- assertEval(Ignored.Unknown, "{ set.seed(7); round( rcauchy(3), digits = 5 ) }");
- assertEval(Ignored.Unknown, "{ set.seed(7); round( rcauchy(3, scale=4, location=1:3), digits = 5 ) }");
}
@Test