X-Git-Url: https://git.auder.net/?p=morpheus.git;a=blobdiff_plain;f=pkg%2FR%2FoptimParams.R;fp=pkg%2FR%2FoptimParams.R;h=79e2876fa6372a9b566591bc8e28a1ae1ead56a7;hp=039070c5280b847af077056b2cfcc89b6c73b589;hb=2989133a738da99b78594cb00afdd3d87916b8bd;hpb=2591fa8343c69ddb94dec5e55871d34c55eff9a3 diff --git a/pkg/R/optimParams.R b/pkg/R/optimParams.R index 039070c..79e2876 100644 --- a/pkg/R/optimParams.R +++ b/pkg/R/optimParams.R @@ -279,9 +279,7 @@ setRefClass( ci=c(-1,rep(0,K-1)) ) if (loop < loopMax) #avoid computing an extra W W <<- computeW(expArgs(op_res$par)) - x_init <- op_res$par - #print(op_res$value) #debug - #print(expArgs(op_res$par)) #debug + #x_init <- op_res$par #degrades performances (TODO: why?) } expArgs(op_res$par)