我正在尝试获取右侧的饼图和条形图,其中显示饼图其中一个切片的详细信息(放大)(请参阅附图)。我已经使用了 Bordaigorl 提供的代码这里获得饼图(见下面的 MWE)。现在我正在努力获取右侧的条形图。我该如何获得它?谢谢 这是我的 MWE:
\documentclass{book}
\usepackage{pgfplots}
\pgfplotsset{compat=1.3}
\usepackage{tikz}
\makeatletter
\tikzstyle{chart}=[
legend label/.style={font={\scriptsize},anchor=west,align=left},
legend box/.style={rectangle, draw, minimum size=5pt},
axis/.style={black,semithick,->},
axis label/.style={anchor=east,font={\tiny}},
]
\tikzstyle{bar chart}=[
chart,
bar width/.code={
\pgfmathparse{##1/2}
\global\let\bar@w\pgfmathresult
},
bar/.style={very thick, draw=white},
bar label/.style={font={\bf\small},anchor=north},
bar value/.style={font={\footnotesize}},
bar width=.75,
]
\tikzstyle{pie chart}=[
chart,
slice/.style={line cap=round, line join=round, very thick,draw=white},
pie title/.style={font={}},
slice type/.style 2 args={
##1/.style={fill=##2},
values of ##1/.style={}
}
]
\pgfdeclarelayer{background}
\pgfdeclarelayer{foreground}
\pgfsetlayers{background,main,foreground}
\newcommand{\pie}[3][]{
\begin{scope}[#1]
\pgfmathsetmacro{\curA}{90}
\pgfmathsetmacro{\r}{1}
\def\c{(0,0)}
\node[pie title] at (90:1.3) {#2};
\foreach \v/\s in{#3}{
\pgfmathsetmacro{\deltaA}{\v/100*360}
\pgfmathsetmacro{\nextA}{\curA + \deltaA}
\pgfmathsetmacro{\midA}{(\curA+\nextA)/2}
\path[slice,\s] \c
-- +(\curA:\r)
arc (\curA:\nextA:\r)
-- cycle;
\pgfmathsetmacro{\d}{max((\deltaA * -(.5/50) + 1) , .5)}
\begin{pgfonlayer}{foreground}
\path \c -- node[pos=\d,pie values,values of \s]{$\v\%$} +(\midA:\r);
\end{pgfonlayer}
\global\let\curA\nextA
}
\end{scope}
}
\newcommand{\legend}[2][]{
\begin{scope}[#1]
\path
\foreach \n/\s in {#2}
{
++(0,-10pt) node[\s,legend box] {} +(5pt,0) node[legend label] {\n}
}
;
\end{scope}
}
\begin{document}
\begin{tikzpicture}
[
pie chart,
slice type={hardcoal}{blue!20},
slice type={lignite}{red!20},
slice type={nuclear}{gray!40},
slice type={res}{green!20},
slice type={ps}{red!50!yellow},
slice type={ng}{yellow!60},
pie values/.style={font={\small}},
scale=2
]
\pie[xshift=1.2cm,values of ps/.style={rotate=45,font=\scriptsize},
values of ng/.style={rotate=60},values of nuclear/.style={pos=0.75},
values of hardcoal/.style={pos=0.75},align=center]{}{18.8/hardcoal,24.9/lignite,15.5/nuclear,25.7/res,5.4/ps,9.6/ng}
\legend[shift={(0cm,-1cm)}]{{Hard coal}/hardcoal, {Lignite}/lignite, {Nuclear}/nuclear}
\legend[shift={(1.25cm,-1cm)}]{{Renewables}/res, {Pumped storage, Heating oil, others}/ps,{Natural gas}/ng}
\end{tikzpicture}
\end{document}
答案1
这轮图我写的包,可以使用。
定义一个命令\WCtest
,其输出取决于百分比是否大于 25。此命令用于键data
和wheel data
。此处,使用 来获取百分比\WCperc
。
切片之间的间隙是通过键获得的gap=0.02
。
切片的颜色由键决定slices style=slice\WCcount
。这里颜色定义为slice1
等,并\WCcount
给出切片的当前编号。
该条也是\wheelchart
通过使用 键绘制的ybar={2}{5}
,该键给出宽度为 2 和高度为 5。该条是用 键定位的at={(5,-2.5)}
,它定义了条左下方的点。
\documentclass[border=6pt]{standalone}
\usepackage{wheelchart}
\definecolor{slice1}{RGB}{100,108,33}
\definecolor{slice2}{RGB}{126,27,74}
\definecolor{slice3}{RGB}{161,109,52}
\definecolor{slice4}{RGB}{103,103,103}
\definecolor{slice5}{RGB}{130,72,9}
\definecolor{slice6}{RGB}{0,0,77}
\definecolor{bar1}{RGB}{166,166,166}
\definecolor{bar2}{RGB}{194,153,109}
\definecolor{bar3}{RGB}{1,105,178}
\definecolor{bar4}{RGB}{176,182,144}
\definecolor{bar5}{RGB}{244,244,244}
\definecolor{bar6}{RGB}{168,177,194}
\usepackage{siunitx}
\begin{document}
\begin{tikzpicture}
\sffamily
\def\WCtest#1#2{%
\pgfmathparse{\WCpercentage>25?"#1":"#2"}%
\pgfmathresult%
}
\wheelchart[
anchor xsep=15,
counterclockwise,
data=\WCtest{}{\WCvarB{} \WCperc},
gap=0.02,
perc precision=1,
pie,
slices style=slice\WCcount,
start half=0,
wheel data=\WCtest{\WCvarB\\\WCperc}{},
wheel data style={white,align=center}
]{%
25.7/Renewables,
5.4/{Heating oil,\\Pumped storage\\and others},
9.6/Natural gas,
18.9/Hard coal,
24.9/Lignite,
15.5/Nuclear%
}
\foreach\n in {1,-1}{
\draw ({\n*25.7*1.8}:3)--(5,{\n*2.5});
}
\wheelchart[
at={(5,-2.5)},
data=\WCvarB{} \qty{\WCvarA}{\percent},
data sep=0,
data style={anchor=west},
slices style=bar\WCcount,
ybar={2}{5}
]{%
1.0/Municipal waste,
5.6/Photovoltaic,
3.1/Hydro,
6.8/Biomass,
0.2/Wind offshore,
8.9/Wind onshore%
}
\end{tikzpicture}
\end{document}