Module:BiologicalAgeBiomarkers: Difference between revisions
No edit summary Tag: Manual revert |
No edit summary |
||
Line 12: | Line 12: | ||
function p.createCrossTable(frame) | function p.createCrossTable(frame) | ||
for _, study in ipairs(studies) do | |||
local count = 0 | |||
for _ in pairs(study.biomarkers) do | |||
count = count + 1 | |||
end | |||
study.count = count | |||
end | |||
-- Start of the wiki table | -- Start of the wiki table | ||
local wikitable = '{| class="wikitable sortable"\n' | local wikitable = '{| class="wikitable sortable"\n' |
Revision as of 03:06, 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)
for _, study in ipairs(studies) do
local count = 0
for _ in pairs(study.biomarkers) do
count = count + 1
end
study.count = count
end
-- Start of the wiki table
local wikitable = '{| class="wikitable sortable"\n'
local sep = ''
for i, row in ipairs(rows) do
wikitable = wikitable .. sep
sep = '|-\n'
wikitable = wikitable .. '! colspan="3" | ' .. row.name .. '\n'
for _, study in ipairs(studies) do
local cellValue = study[row.key] or ""
wikitable = wikitable .. '! ' .. p.template(frame, "VerticalText", cellValue) .. '\n'
end
end
-- Column headers: Biomarker and System
wikitable = wikitable .. '|-\n'
wikitable = wikitable .. '! System !! Biomarker !! Count '
for _, study in pairs(studies) do
wikitable = wikitable .. ' !! ' .. p.template(frame, "pmid", study.pmid)
end
wikitable = wikitable .. '\n'
-- 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; color: transparent;" | ' .. cellValue
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