Mercurial > repos > lecorguille > xcms_report

comparison xcms_report.r @ 4:37b8abfc6adf draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author lecorguille
date Wed, 23 Dec 2015 07:11:07 -0500
parents f9b3dae104eb
children
comparison
equal deleted inserted replaced
3:3df956bfffd4 4:37b8abfc6adf
61 writehtml("</style>") 61 writehtml("</style>")
62 writehtml("</HEAD>") 62 writehtml("</HEAD>")
63 63
64 writehtml("<BODY>") 64 writehtml("<BODY>")
65 writehtml("<h1>___ XCMS analysis report using Workflow4Metabolomics ___</h1>") 65 writehtml("<h1>___ XCMS analysis report using Workflow4Metabolomics ___</h1>")
66 if (!is.null(user_email)) writehtml("By: ",user_email," - ") 66 # to pass the planemo shed_test
67 writehtml("Date: ",format(Sys.time(), "%y%m%d-%H:%M:%S")) 67 if (user_email != "test@bx.psu.edu") {
68 if (!is.null(user_email)) writehtml("By: ",user_email," - ")
69 writehtml("Date: ",format(Sys.time(), "%y%m%d-%H:%M:%S"))
70 }
68 71
69 72
70 writehtml("<h2>Samples used:</h2>") 73 writehtml("<h2>Samples used:</h2>")
71 writehtml("<table") 74 writehtml("<table")
72 writehtml("<tr><th>sample</th><th>filename</th></tr>") 75 writehtml("<tr><th>sample</th><th>filename</th></tr>")