Revision: 1776
http://sourceforge.net/p/r-gregmisc/code/1776
Author: warnes
Date: 2014-03-01 20:15:05 +0000 (Sat, 01 Mar 2014)
Log Message:
-----------
Fix cut-and-paste error.
Modified Paths:
--------------
trunk/gtools/tests/test_mixedorder.R
Modified: trunk/gtools/tests/test_mixedorder.R
===================================================================
--- trunk/gtools/tests/test_mixedorder.R 2014-03-01 20:12:46 UTC (rev 1775)
+++ trunk/gtools/tests/test_mixedorder.R 2014-03-01 20:15:05 UTC (rev 1776)
@@ -5,7 +5,7 @@
"Asprin 100mg/day", "Acetomycin 100mg/day",
"Acetomycin 1000mg/day")
-stopifnot( mixedorder(tmp)==c(4, 5, 1, 2, 3 ))
+stopifnot( mixedorder(Treatment)==c(5, 6, 2, 3, 4, 1) )
x <- rev(c("AA 0.50 ml", "AA 1.5 ml", "AA 500 ml", "AA 1500 ml",
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
