Mercurial > repos > mmonsoor > probmetab
comparison lib.r @ 10:2964f7864315 draft default tip
planemo upload commit 00684d80f032fee5bd1cb86e05a477fcdcb1c3fc
author | lecorguille |
---|---|
date | Fri, 07 Apr 2017 08:49:46 -0400 |
parents | fe21deb6b625 |
children |
comparison
equal
deleted
inserted
replaced
9:fe21deb6b625 | 10:2964f7864315 |
---|---|
120 y = 1:nrow(wl$wm) | 120 y = 1:nrow(wl$wm) |
121 conn = gibbs.samp(x, y, 5000, w, wl$wm) | 121 conn = gibbs.samp(x, y, 5000, w, wl$wm) |
122 ansConn = export.class.table(conn, reactionM, ionAnnot, DB=DB,html=listArguments[["html"]],filename="AnalysisExample",prob=listArguments[["prob"]]) | 122 ansConn = export.class.table(conn, reactionM, ionAnnot, DB=DB,html=listArguments[["html"]],filename="AnalysisExample",prob=listArguments[["prob"]]) |
123 if(listArguments[["html"]]){ | 123 if(listArguments[["html"]]){ |
124 #Zip the EICS plot | 124 #Zip the EICS plot |
125 system(paste('zip -r "Analysis_Report.zip" "AnalysisExample_fig"')) | 125 system(paste('zip -rq "Analysis_Report.zip" "AnalysisExample_fig"')) |
126 } | 126 } |
127 | 127 |
128 # calculate the correlations and partial correlations and cross reference then with reactions | 128 # calculate the correlations and partial correlations and cross reference then with reactions |
129 mw=which(w==1,arr.ind=TRUE) | 129 mw=which(w==1,arr.ind=TRUE) |
130 #reac2cor function : Use the intensity of putative molecules in repeated samples to calculate correlations and partial | 130 #reac2cor function : Use the intensity of putative molecules in repeated samples to calculate correlations and partial |