Mercurial > repos > lecorguille > xcms_summary
comparison xcms_summary.r @ 6:254b81d1275a draft
planemo upload
| author | lecorguille |
|---|---|
| date | Thu, 25 Feb 2016 08:51:15 -0500 |
| parents | 11df21afc204 |
| children | dc6b3773f8de |
comparison
equal
deleted
inserted
replaced
| 5:11df21afc204 | 6:254b81d1275a |
|---|---|
| 93 md5sumHeaderHtml = paste("<th>md5sum<sup>*</sup></th>") | 93 md5sumHeaderHtml = paste("<th>md5sum<sup>*</sup></th>") |
| 94 md5sumHtml = paste("<td>",md5sumList$origin,"</td>") | 94 md5sumHtml = paste("<td>",md5sumList$origin,"</td>") |
| 95 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." | 95 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 } else { | 96 } else { |
| 97 md5sumHeaderHtml = paste("<th>md5sum<sup>*</sup></th><th>md5sum<sup>**</sup> after bad characters removal</th>") | 97 md5sumHeaderHtml = paste("<th>md5sum<sup>*</sup></th><th>md5sum<sup>**</sup> after bad characters removal</th>") |
| 98 md5sumHtml = paste("<td>",md5sumList$origin,"</td><td>",md5sumList$origin,"</td>") | 98 md5sumHtml = paste("<td>",md5sumList$origin,"</td><td>",md5sumList$removalBadCharacters,"</td>") |
| 99 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/>" | 99 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 } | 100 } |
| 101 | 101 |
| 102 writehtml("<tr>",sampleNameHeaderHtml,"<th>filename</th>",md5sumHeaderHtml,"</tr>") | 102 writehtml("<tr>",sampleNameHeaderHtml,"<th>filename</th>",md5sumHeaderHtml,"</tr>") |
| 103 writehtml(paste("<tr>",sampleNameHtml,"<td>",xset@filepaths,"</td>",md5sumHtml,"</tr>")) | 103 writehtml(paste("<tr>",sampleNameHtml,"<td>",xset@filepaths,"</td>",md5sumHtml,"</tr>")) |
