Sandbox
From Metabolomics.JP
(Difference between revisions)
m |
|||
| Line 1: | Line 1: | ||
| − | {{#replace: | + | {{#replace: |
| + | {{#lua: | ||
| + | local ruler = stdin:match("[%S ,]+"); | ||
| + | local axis = {}; | ||
| + | local i = 1; | ||
| + | for formula in string.gmatch(ruler, "([%S]+)") do | ||
| + | axis[i] = formula; | ||
| + | i = i + 1; | ||
| + | end | ||
| + | print("#-\n"); | ||
| + | print("## sample"); | ||
| + | for i=1, table.getn(axis) do | ||
| + | print("## " .. axis[i]); | ||
| + | end | ||
| + | for i=1, table.getn(axis) do | ||
| + | print("#-\n"); | ||
| + | print("##" .. axis[i]); | ||
| + | for j=1, table.getn(axis) do | ||
| + | print("## "); | ||
| + | if (j < i) then | ||
| + | print(j .. " " .. i); | ||
| + | end | ||
| + | end | ||
| + | print("\n"); | ||
| + | end | ||
| + | | C7H14NO3 C7H11O3 C5H8NO2 C4H8NO2 C7H13 C4H10NO C6H11 C6H7 C4H7O C5H9 C3H8N C4H7 | ||
| + | }} | ||
| + | |#|{{#bar:}}}} | ||
<!---- | <!---- | ||
Revision as of 10:28, 12 May 2009
