comparison xcms_summary.r @ 25:3a53e63555c7 draft

planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 392e432529877680e80a7b338e20d69a42e53767
author lecorguille
date Mon, 03 Apr 2017 07:53:49 -0400
parents a2908411620e
children 3d4339594010
comparison
equal deleted inserted replaced
24:5cc59ee748b6 25:3a53e63555c7
91 md5sumHtml = "" 91 md5sumHtml = ""
92 md5sumLegend="" 92 md5sumLegend=""
93 } else if (is.null(md5sumList$removalBadCharacters)) { 93 } else if (is.null(md5sumList$removalBadCharacters)) {
94 md5sumHeaderHtml = paste("<th>md5sum<sup>*</sup></th>") 94 md5sumHeaderHtml = paste("<th>md5sum<sup>*</sup></th>")
95 md5sumHtml = paste("<td>",md5sumList$origin,"</td>") 95 md5sumHtml = paste("<td>",md5sumList$origin,"</td>")
96 md5sumLegend = "<br/><sup>*</sup>The program md5sum is designed to verify data integrity. So you can check if the data were uploaded correctly or if the data were chancged during the process." 96 md5sumLegend = "<br/><sup>*</sup>The program md5sum is designed to verify data integrity. So you can check if the data were uploaded correctly or if the data were changed during the process."
97 } else { 97 } else {
98 md5sumHeaderHtml = paste("<th>md5sum<sup>*</sup></th><th>md5sum<sup>**</sup> after bad characters removal</th>") 98 md5sumHeaderHtml = paste("<th>md5sum<sup>*</sup></th><th>md5sum<sup>**</sup> after bad characters removal</th>")
99 md5sumHtml = paste("<td>",md5sumList$origin,"</td><td>",md5sumList$removalBadCharacters,"</td>") 99 md5sumHtml = paste("<td>",md5sumList$origin,"</td><td>",md5sumList$removalBadCharacters,"</td>")
100 md5sumLegend = "<br/><sup>*</sup>The program md5sum is designed to verify data integrity. So you can check if the data were uploaded correctly or if the data were chancged during the process.<br/><sup>**</sup>Because some bad characters (eg: accent) were removed from your original file, the checksum have changed too.<br/>" 100 md5sumLegend = "<br/><sup>*</sup>The program md5sum is designed to verify data integrity. So you can check if the data were uploaded correctly or if the data were changed during the process.<br/><sup>**</sup>Because some bad characters (eg: accent) were removed from your original file, the checksum have changed too.<br/>"
101 } 101 }
102 102
103 writehtml("<tr>",sampleNameHeaderHtml,"<th>filename</th>",md5sumHeaderHtml,"</tr>") 103 writehtml("<tr>",sampleNameHeaderHtml,"<th>filename</th>",md5sumHeaderHtml,"</tr>")
104 writehtml(paste("<tr>",sampleNameHtml,"<td>",xset@filepaths,"</td>",md5sumHtml,"</tr>")) 104 writehtml(paste("<tr>",sampleNameHtml,"<td>",xset@filepaths,"</td>",md5sumHtml,"</tr>"))
105 105