X-Git-Url: https://git.auder.net/?p=valse.git;a=blobdiff_plain;f=src%2Ftest%2Fgenerate_test_data%2FgenerateRunSaveTest_constructionModelesLassoMLE.R;h=dbce359c592cb698cb0c0d1a3fb3224c69e7b99f;hp=210fe3c7272709c01c2c58c0a4418fd8717ae7e6;hb=825cf55fc9827ba99b6d771b513545d297234897;hpb=22d21a222df140221657af24d71fe05af54a6adc diff --git a/src/test/generate_test_data/generateRunSaveTest_constructionModelesLassoMLE.R b/src/test/generate_test_data/generateRunSaveTest_constructionModelesLassoMLE.R index 210fe3c..dbce359 100644 --- a/src/test/generate_test_data/generateRunSaveTest_constructionModelesLassoMLE.R +++ b/src/test/generate_test_data/generateRunSaveTest_constructionModelesLassoMLE.R @@ -1,3 +1,5 @@ +source("helpers/constructionModelesLassoMLE.R") + generateRunSaveTest_constructionModelesLassoMLE = function(n=200, p=15, m=10, k=3, mini=5, maxi=10, gamma=1.0, glambda=list(0.0,0.01,0.02,0.03,0.05,0.1,0.2,0.3,0.5,0.7,0.85,0.99)) { @@ -17,7 +19,7 @@ generateRunSaveTest_constructionModelesLassoMLE = function(n=200, p=15, m=10, k= params = valse:::basicInitParameters(n, p, m, k) xy = valse:::generateXYdefault(n, p, m, k) - testFolder = "data/" + testFolder = "../data/" dir.create(testFolder, showWarnings=FALSE, mode="0755") #save inputs write.table(as.double(params$phiInit), paste(testFolder,"phiInit",sep=""),