X-Git-Url: https://git.auder.net/?p=valse.git;a=blobdiff_plain;f=src%2Ftest%2Fgenerate_test_data%2FgenerateRunSaveTest_constructionModelesLassoMLE.R;fp=src%2Ftest%2Fgenerate_test_data%2FgenerateRunSaveTest_constructionModelesLassoMLE.R;h=b6ff68c790fd4dc89c26f3d0f98f6405cca6d79e;hp=104cb3ffc17b3aaad797a6b36043a0dc0d70781f;hb=9ade3f1b66fa07ad9f1a3b09fc05462c783841de;hpb=c3b2c1ab166494627b3b41f309fd747e1df61aa2 diff --git a/src/test/generate_test_data/generateRunSaveTest_constructionModelesLassoMLE.R b/src/test/generate_test_data/generateRunSaveTest_constructionModelesLassoMLE.R index 104cb3f..b6ff68c 100644 --- a/src/test/generate_test_data/generateRunSaveTest_constructionModelesLassoMLE.R +++ b/src/test/generate_test_data/generateRunSaveTest_constructionModelesLassoMLE.R @@ -4,7 +4,8 @@ generateRunSaveTest_constructionModelesLassoMLE = function(n=200, p=15, m=10, k= delimiter = " " #Generate phiInit,piInit,... - params = basicInitParameters(n, p, m, k) + require(valse) + params = valse:::basic_Init_Parameters(n, p, m, k) #save inputs write.table(paste(testFolder,"phiInit",sep=""), params$phiInit, sep=delimiter)