Necessary changes to generate/run C tests.

[valse.git] / reports / essai16mars.R

diff --git a/reports/essai16mars.R b/reports/essai16mars.R
index 88659ab..59bbb53 100644 (file)
--- a/reports/essai16mars.R
+++ b/reports/essai16mars.R
@@ -3,8 +3,13 @@ q = 8
 k = 2
 D = 20
 
-meanX = rep(0,p)
-covX = 0.1*diag(p)
+meanX = matrix(nrow=p,ncol=k)
+meanX[,1] = rep(0,p)
+meanX[,2] = rep(1,p)
+
+covX = array(dim=c(p,p,k))
+covX[,,1] = 0.1*diag(p)
+covX[,,2] = 0.5*diag(p)
 
 covY = array(dim = c(q,q,k))
 covY[,,1] = 0.1*diag(q)