require(valse)
params = valse:::basic_Init_Parameters(n, p, m, k)
io = generateIOdefault(n, p, m, k)
require(valse)
params = valse:::basic_Init_Parameters(n, p, m, k)
io = generateIOdefault(n, p, m, k)
write.table(as.double(params$phiInit), paste(testFolder,"phiInit",sep=""),
row.names=F, col.names=F)
write.table(as.double(params$rhoInit), paste(testFolder,"rhoInit",sep=""),
write.table(as.double(params$phiInit), paste(testFolder,"phiInit",sep=""),
row.names=F, col.names=F)
write.table(as.double(params$rhoInit), paste(testFolder,"rhoInit",sep=""),