Module:BiologicalAgeBiomarkers: Difference between revisions
No edit summary |
No edit summary |
||
Line 16: | Line 16: | ||
-- Column headers: Biomarker and System | -- Column headers: Biomarker and System | ||
wikitable = wikitable .. ' System !! Biomarker' | wikitable = wikitable .. ' System !! Biomarker !! Count ' | ||
for _, study in pairs(studies) do | for _, study in pairs(studies) do | ||
wikitable = wikitable .. ' !! ' .. p.template(frame, "pmid", study.pmid) | wikitable = wikitable .. ' !! ' .. p.template(frame, "pmid", study.pmid) | ||
Line 24: | Line 24: | ||
for i, row in ipairs(rows) do | for i, row in ipairs(rows) do | ||
wikitable = wikitable .. '|-\n' | wikitable = wikitable .. '|-\n' | ||
wikitable = wikitable .. ' | wikitable = wikitable .. '! ' .. row.name .. ' !! ' .. '' | ||
for _, study in ipairs(studies) do | for _, study in ipairs(studies) do | ||
local cellValue = study[row.key] or "" | local cellValue = study[row.key] or "" | ||
wikitable = wikitable .. ' | wikitable = wikitable .. ' !! ' .. p.template(frame, "VerticalText", cellValue) | ||
end | end | ||
wikitable = wikitable .. '\n' | wikitable = wikitable .. '\n' |
Revision as of 01:33, 21 February 2024
local p = {}
local data = require('Module:BiologicalAgeBiomarkers/Data')
local biomarkers = data.biomarkers
local rows = data.rows
local studies = data.studies
function p.template(frame, name, arg)
return frame:expandTemplate({title = name, args = { arg }})
end
function p.createCrossTable(frame)
-- Start of the wiki table
local wikitable = '{| class="wikitable sortable"\n!'
-- Column headers: Biomarker and System
wikitable = wikitable .. ' System !! Biomarker !! Count '
for _, study in pairs(studies) do
wikitable = wikitable .. ' !! ' .. p.template(frame, "pmid", study.pmid)
end
wikitable = wikitable .. '\n'
for i, row in ipairs(rows) do
wikitable = wikitable .. '|-\n'
wikitable = wikitable .. '! ' .. row.name .. ' !! ' .. ''
for _, study in ipairs(studies) do
local cellValue = study[row.key] or ""
wikitable = wikitable .. ' !! ' .. p.template(frame, "VerticalText", cellValue)
end
wikitable = wikitable .. '\n'
end
-- Generate rows for each biomarker
for _, system in ipairs(biomarkers) do
for _, bm in ipairs(system.data) do
wikitable = wikitable .. '|-\n'
wikitable = wikitable .. '| ' .. system.system .. ' || ' .. bm.name
local count = 0
for _, study in ipairs(studies) do
if study.biomarkers[bm.key] ~= nil then
count = count + 1
end
end
wikitable = wikitable .. string.format(' || %d', count)
for _, study in ipairs(studies) do
-- Retrieve data value for the current cell, using the nested structure
local cellValue = study.biomarkers[bm.key] or ""
if cellValue == "x" then
cellValue = 'style="background-color:gray;" | '
elseif cellValue ~= "" then
cellValue = 'style="background-color:gray;" | ' .. cellValue
end
wikitable = wikitable .. ' || ' .. cellValue
end
wikitable = wikitable .. '\n'
end
end
-- End of the table
wikitable = wikitable .. '\n|}'
return wikitable
end
return p