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

Материал из Поле цифровой дидактики
Новая страница: «local p = {} function p.main(frame) local args = frame.args local csvUrl = args.url or 'YOUR_CSV_URL_HERE' local viewMode = args.mode or 'table' -- 'table' или 'graph' -- Получаем данные из CSV через ExternalData local data, errors = mw.ext.externalData.getWebData { url = csvUrl, format = 'CSV with header' } if errors then return '<strong>Ошибка загрузки данны...»
 
Нет описания правки
 
(не показаны 2 промежуточные версии этого же участника)
Строка 4: Строка 4:
     local args = frame.args
     local args = frame.args
     local csvUrl = args.url or 'YOUR_CSV_URL_HERE'
     local csvUrl = args.url or 'YOUR_CSV_URL_HERE'
     local viewMode = args.mode or 'table'  -- 'table' или 'graph'
     local view = args.view or 'table'


     -- Получаем данные из CSV через ExternalData
     -- Получаем данные из CSV через ExternalData
Строка 20: Строка 20:
     end
     end


     local output = {}
     if view == 'graph' then
        -- Генерируем Graphviz digraph
        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(graphEdges, string.format('  "A_%s" -> "P_%s";', aid, pid))
            end
        end


    -- Режим 1: Таблица
        local graphContent = table.concat(graphEdges, '\n')
    if viewMode == 'table' or viewMode == 'both' then
        return string.format([[<graphviz>
digraph G {
  layout = "neato";
  node [shape=none];
%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',
Строка 33: Строка 52:
             )
             )
         end
         end
        tableHtml = tableHtml .. '|}\n'
        table.insert(output, tableHtml)
    end


    -- Режим 2: График Graphviz
         return tableHtml .. '|}\n'
    if viewMode == 'graph' or viewMode == 'both' then
        local graphContent = 'digraph G {\n  layout = "neato";\n'
       
        for i, row in ipairs(data) do
            local author = row.author_id or ''
            local page = row.pageid or ''
            if author ~= '' and page ~= '' then
                -- Авторы - овалы, страницы - прямоугольники
                graphContent = graphContent .. string.format('  "%s" [shape=oval, label="Author: %s"];\n', author, author)
                graphContent = graphContent .. string.format('  "%s" [shape=box, label="%s"];\n', page, row.page_title or page)
                graphContent = graphContent .. string.format('  "%s" -> "%s";\n', author, page)
            end
         end
       
        graphContent = graphContent .. '}\n'
        table.insert(output, string.format('<graphviz>%s</graphviz>', graphContent))
     end
     end
    return table.concat(output, '\n\n')
end
end


return p
return p

Текущая версия от 20:10, 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'

    -- Получаем данные из 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 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(graphEdges, string.format('  "A_%s" -> "P_%s";', aid, pid))
            end
        end

        local graphContent = table.concat(graphEdges, '\n')
        return string.format([[<graphviz>
digraph G {
  layout = "neato";
  node [shape=none];
%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