projects
/
valse.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix errors in EMGLLF.c :)
[valse.git]
/
test
/
generate_test_data
/
generateRunSaveTest_EMGrank.R
diff --git
a/test/generate_test_data/generateRunSaveTest_EMGrank.R
b/test/generate_test_data/generateRunSaveTest_EMGrank.R
index
99da9bc
..
f75c8d1
100644
(file)
--- a/
test/generate_test_data/generateRunSaveTest_EMGrank.R
+++ b/
test/generate_test_data/generateRunSaveTest_EMGrank.R
@@
-33,7
+33,7
@@
generateRunSaveTest_EMGrank = function(n=200, p=15, m=10, k=3, mini=5, maxi=10,
write.table(as.integer(c(n,p,m,k)), paste(testFolder,"dimensions",sep=""),
row.names=F, col.names=F)
write.table(as.integer(c(n,p,m,k)), paste(testFolder,"dimensions",sep=""),
row.names=F, col.names=F)
- res = EMGrank(pi,rho,mini,maxi,xy$X,xy$Y,tau,rank)
+ res = EMGrank
_R
(pi,rho,mini,maxi,xy$X,xy$Y,tau,rank)
#save output
write.table(as.double(res$phi), paste(testFolder,"phi",sep=""), row.names=F,col.names=F)
#save output
write.table(as.double(res$phi), paste(testFolder,"phi",sep=""), row.names=F,col.names=F)