}
}
#Generate X and Y
- generateIOdef = generateIOdefault(n, p, m, k)
+ require(valse)
+ generateIOdef = valse:::generateIOdefault(n, p, m, k)
A1 = matrix(0,p,L)
for(i in 1:L){
write.table(paste(testFolder,"phi",sep=""), construct$phi, sep=delimiter)
write.table(paste(testFolder,"lvraisemblance",sep=""), construct$lvraisemblance, sep=delimiter)
-}
\ No newline at end of file
+}