Template:LBGA/GroupTable

Revision as of 14:01, 5 October 2013 by Fukasawa (talk | contribs)

{{#lua:

local Tp = {}
local Ts = {}
local S0 = {}; S1 = {}; S2= {}; S3 = {}
function printTable(T, title) 
  print('==' .. title .. '==\n{| class="wikitable sortable"\n! ID || Polar group
Gro: glycerol || Sugar group
Glc: glucose Gul: gulose') for k,v in ipairs(T) do s = "\n|-\n| " .. v .. " || " if (Tp[v] ~= nil) then s = s .. Tp[v] end s = s .. " || " if (Ts[v] ~= nil) then s = s .. Ts[v] end print(s) end print("\n|}") end
for id, group, seq in stdin:gmatch("||([^\n]+)|([%w]+)Group=([^\n]+)") do
  if (string.match(group,"Polar")) then Tp[id] = seq end
  if (string.match(group,"Sugar")) then Ts[id] = seq end
  s = string.sub(id,7,7)
  if (s == "0") then table.insert(S0, id)
  elseif (s == "1") then table.insert(S1, id)
  elseif (s == "2") then table.insert(S2, id)
  else table.insert(S3, id) end
end
printTable(S0, "No Sugar")
printTable(S1, "One Sugar including inositol")
printTable(S2, "Two Sugars including inositol")
printTable(S3, "Three or more including inositol")

| SugarGroup=|PolarGroup= }}