Модуль:ExtGraph: различия между версиями

Материал из Поле цифровой дидактики
Нет описания правки
Нет описания правки
Строка 20: Строка 20:
     end
     end


     local output = {}
     if view == 'graph' then
        -- Генерируем Graphviz digraph
        local graphNodes = {}
        local graphEdges = {}
       
        for _, row in ipairs(data) do
            local aid = row.author_id or ''
            local pid = row.pageid or ''
            if aid ~= '' and pid ~= '' then
                table.insert(graphNodes, string.format('  "%s" [shape=none];', aid))
                table.insert(graphEdges, string.format('  "%s" -> "%s";', aid, pid))
            end
        end


    -- Таблица (по умолчанию)
        local graphContent = table.concat(graphNodes, '\n') .. '\n' .. table.concat(graphEdges, '\n')
    if view == 'table' or view == 'both' then
        return string.format([[<graphviz>
digraph G {
  layout = "neato";
%s
}
</graphviz>]], graphContent)
    else
        -- Оригинальная таблица
         local tableHtml = '{| class="wikitable sortable"\n! author_id !! pageid !! page_title !! category\n'
         local tableHtml = '{| class="wikitable sortable"\n! author_id !! pageid !! page_title !! category\n'
         for i, row in ipairs(data) do
         for i, row in ipairs(data) do
             tableHtml = tableHtml .. string.format('|-\n| %s || %s || %s || %s\n',
             tableHtml = tableHtml .. string.format('|-\n| %s || %s || %s || %s\n',
Строка 32: Строка 52:
                 row.category or ''
                 row.category or ''
             )
             )
        end
        tableHtml = tableHtml .. '|}\n'
        table.insert(output, tableHtml)
    end
    -- Граф (второй режим)
    if view == 'graph' or view == 'both' then
        local graphNodes = {}
        local graphEdges = {}
       
        for i, row in ipairs(data) do
            local aid = row.author_id or ''
            local pid = row.pageid or ''
           
            if aid ~= '' and pid ~= '' then
                -- Узлы с shape
                graphNodes[aid] = 'author_' .. aid .. ' [shape=box,label="' .. aid .. '"]'
                graphNodes['page_' .. pid] = 'page_' .. pid .. ' [shape=ellipse,label="' .. pid .. '"]'
               
                -- Ребро
                table.insert(graphEdges, string.format('author_%s -> page_%s', aid, pid))
            end
         end
         end


         local graphContent = 'digraph G {\n  layout = "neato";\n'
         return tableHtml .. '|}\n'
       
        -- Узлы
        for _, nodeDef in pairs(graphNodes) do
            graphContent = graphContent .. '  ' .. nodeDef .. ';\n'
        end
       
        -- Рёбра
        for _, edge in ipairs(graphEdges) do
            graphContent = graphContent .. '  ' .. edge .. ';\n'
        end
       
        graphContent = graphContent .. '}\n'
        table.insert(output, '<graphviz>' .. graphContent .. '</graphviz>')
     end
     end
    return table.concat(output, '\n\n')
end
end


return p
return p

Версия от 20:01, 25 февраля 2026

Для документации этого модуля может быть создана страница Модуль:ExtGraph/doc

local p = {}

function p.main(frame)
    local args = frame.args
    local csvUrl = args.url or 'YOUR_CSV_URL_HERE'
    local view = args.view or 'table'  -- 'table' или 'graph'

    -- Получаем данные из CSV через ExternalData
    local data, errors = mw.ext.externalData.getWebData {
        url = csvUrl,
        format = 'CSV with header'
    }

    if errors then
        return '<strong>Ошибка загрузки данных:</strong> ' .. table.concat(errors, '<br>')
    end

    if not data or #data == 0 then
        return 'Нет данных для отображения.'
    end

    if view == 'graph' then
        -- Генерируем Graphviz digraph
        local graphNodes = {}
        local graphEdges = {}
        
        for _, row in ipairs(data) do
            local aid = row.author_id or ''
            local pid = row.pageid or ''
            if aid ~= '' and pid ~= '' then
                table.insert(graphNodes, string.format('  "%s" [shape=none];', aid))
                table.insert(graphEdges, string.format('  "%s" -> "%s";', aid, pid))
            end
        end

        local graphContent = table.concat(graphNodes, '\n') .. '\n' .. table.concat(graphEdges, '\n')
        return string.format([[<graphviz>
digraph G {
  layout = "neato";
%s
}
</graphviz>]], graphContent)
    else
        -- Оригинальная таблица
        local tableHtml = '{| class="wikitable sortable"\n! author_id !! pageid !! page_title !! category\n'

        for i, row in ipairs(data) do
            tableHtml = tableHtml .. string.format('|-\n| %s || %s || %s || %s\n',
                row.author_id or '',
                row.pageid or '',
                row.page_title or '',
                row.category or ''
            )
        end

        return tableHtml .. '|}\n'
    end
end

return p