如何调整轮图中的文本大小并使用数据工具应用适当的过滤？

Question

包裹轮图（我写的）加载了包，tikz因此\usepackage{tikz}被删除。

外圈文字的字体大小可以通过|\huge|键改变arc data。此 MWE 中不需要~周围的文字。\WCvarC

对于的真正分支\IfBooleanTF，\boolean{true}已添加。

不使用，而是在命令开始时将\dtlrownum计数器rpdmStagesRadius设置为。此计数器在命令的第四个参数中增加。然后不再使用该键。0\RDMactivityCircle\wheelchart\DTLforeachfor loop end

对于这个 MWE，\usetikzlibrary{decorations.markings}和\usepackage{etoolbox}是不必要的，因此它们被删除。

命令\rdmStages包含在命令中\RDMstages。这里，stages不需要每次都使用来重复。而且由于使用了，因此不需要slices style=stages多次重复。然后用替换。20value=1\WCvarC\WCvarA

该密钥yshift=2em被替换为above。

\documentclass[border=6pt,dvipsnames]{standalone}
\usepackage{fontspec}
\setmainfont{TeX Gyre Heros}
\usepackage{wheelchart}
\usetikzlibrary{decorations.text}
\usepackage{datatool}
\colorlet{stages}{Blue}
\colorlet{service}{Magenta}
\colorlet{datasteward}{Green}
\colorlet{consulting}{Cyan}
\colorlet{project}{Orange}
\colorlet{natInf}{Purple}
%counter for having slightly different colors for the categories
\newcounter{rpdmCategoryService}\setcounter{rpdmCategoryService}{100}
\newcounter{rpdmCategoryDatasteward}\setcounter{rpdmCategoryDatasteward}{100}
\newcounter{rpdmCategoryConsulting}\setcounter{rpdmCategoryConsulting}{100}
\newcounter{rpdmCategoryProject}\setcounter{rpdmCategoryProject}{100}
\newcounter{rpdmCategoryNFDI}\setcounter{rpdmCategoryNFDI}{100}
%counting the amount of items/activities to adjust radius of the outer stages
\newcounter{rpdmStagesRadius}
\setcounter{rpdmStagesRadius}{0}
\usepackage{xstring}
\DeclareRobustCommand{\rpdmCheckCategory}[1]{%
\IfEqCase{#1}{%
{service}{\addtocounter{rpdmCategoryService}{-5}\def\rpdmSliceColor{service!\therpdmCategoryService}}
{datasteward}{\addtocounter{rpdmCategoryDatasteward}{-5}\def\rpdmSliceColor{datasteward!\therpdmCategoryDatasteward}}
{consulting}{\addtocounter{rpdmCategoryConsulting}{-5}\def\rpdmSliceColor{consulting!\therpdmCategoryConsulting}}
{project}{\addtocounter{rpdmCategoryProject}{-5}\def\rpdmSliceColor{project!\therpdmCategoryProject}}
{natInf}{\addtocounter{rpdmCategoryNFDI}{-5}\def\rpdmSliceColor{natInf!\therpdmCategoryNFDI}}
}[\def\rpdmSliceColor{red}]
}
\begin{filecontents}[overwrite]{activities.csv}
category,startangle,totalangle,name,begin,end
datasteward,-90,180,project1,2014,2024
service,0,90,project2,2019,
datasteward,-90,180,project3,2019,
natInf,40,280,project4,2020,
natInf,40,280,project5,2020,
natInf,40,280,project6,2020,
service,0,90,project7,2021,
service,0,90,project8,2021,
project,90,270,project9,2021,2024
service,0,90,project10,2023,
service,0,90,project11,2021,
natInf,40,280,project12,2021,
natInf,40,280,project13,2021,
datasteward,-90,180,project14,2019,2023
datasteward,-90,180,project15,2023,
project,90,270,project16,2023,
project,-60,270,project17,2020,2023
project,90,270,project18,2022,
consulting,90,120,project19,2022,
consulting,90,120,project20,2022,
consulting,90,120,project21,2023,
project,0,240,project22,2023,
project,0,240,project23,2023,
\end{filecontents}
\DTLloaddb{activities}{activities.csv}
%RDM stages
\NewDocumentCommand{\RDMstages}{}{%
  \wheelchart[
    arc data=|\huge|\WCvarA,
    arc data dir={\WCmidangle<180?1:-1},
    arc data pos=0.5,
    arc data style={text color=white},
    data=,
    gap=.1,
    radius={2+\therpdmStagesRadius}{4+\therpdmStagesRadius},
    slices arrow={.5}{0},
    slices style=stages,
    value=1
  ]{Plan,Production,Analysis,Storage,Access,Re-use}%
}
\NewDocumentCommand{\RDMactivityCircle}{som}{%
  \setcounter{rpdmCategoryService}{100}
  \setcounter{rpdmCategoryDatasteward}{100}
  \setcounter{rpdmCategoryConsulting}{100}
  \setcounter{rpdmCategoryProject}{100}
  \setcounter{rpdmCategoryNFDI}{100}
  \setcounter{rpdmStagesRadius}{0}
  \begin{tikzpicture}
  \DTLsort{begin,startangle}{activities}%
  \DTLforeach%
    [%
      %For the starred version there should be no filtering
      \IfBooleanTF{#1}{\boolean{true}}{\DTLisinlist{\WCcategory}{#3}}
    ]%
    {activities}%
    {%
      \WCcategory=category,%
      \WCstart=startangle,%
      \WCend=totalangle,%
      \WCname=name,%
      \WCsince=begin,%
      \WCtil=end%
    }%
    {%
      \addtocounter{rpdmStagesRadius}{1}%
      \wheelchart[
        arc data=\WCname,
        arc data dir={\WCmidangle<180?1:-1},
        arc data pos=0.5,
        arc data style={text color=white},
        before slices=\rpdmCheckCategory{\WCcategory},
        data=,
        gap radius=0.05,
        radius={1+\therpdmStagesRadius}{2+\therpdmStagesRadius},
        slices end arc={1}{0},
        slices start arc={1}{0},
        slices style=\rpdmSliceColor,
        start angle=\WCstart,
        total angle=\WCend
      ]{1}%
    }%
  \RDMstages%
  \IfValueT{#2}{\node[align=center,font=\bfseries,above] at (current bounding box.north) {\Huge #2};}%
  \end{tikzpicture}%
}
\begin{document}
\RDMactivityCircle*{}
\RDMactivityCircle[Projects]{project}
\RDMactivityCircle[Consulting]{consulting}
\RDMactivityCircle[National Infrastructures]{natInf}
\RDMactivityCircle[Services and Infrastructures]{service}
\RDMactivityCircle[Data Stewards]{datasteward}
\end{document}

Answer 1