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 | 
