PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : Balkenbeschriftung



Dorle
13-01-2010, 19:55
Ich möchte ein Balkendiagramm erstellen,
die Daten sollen über den Balken erscheinen.
Eigentlich müsste dieses einfach sein.
Die Daten sind leider verrutscht und es gelingt mir nicht,
sie über die Balken zu schieben.
Der Wert von \thexVal müsste um 0.5 verringert werden, aber wie nur?

\documentclass{article}
\usepackage{filecontents}
\usepackage{pstricks}
\usepackage{pst-bar}
\usepackage{pstricks-add}
\begin{document}

\begin{filecontents*}{demo.dat2}
158 167 183 188 190 201 203 210
\end{filecontents*}

\psxunit=1.cm

\renewcommand*\psbarlabelsep{2pt}
\psset{xunit=1,yunit=.02cm}
\psset{yticksize=0 8cm}

\begin{pspicture}(-.5,-30)(6,250)

\readpsbardata[header=false]{\data}{demo.dat2}
\psbarchart[barcolsep = 0.6, barstyle={gray}]{\data}
\psaxes[labels=y, axesstyle=axes,Oy=0, Dy=50,xticksize=-2 pt ,showorigin=false]{-}(8,250)

\multido{\n=0.50+1.00,\ib=1992+2}{8}
{ \rput(\n,-12.9){\ib}
}

\def\data{158, 167, 183, 188, 190, 201, 203, 210}

\psset{labelsep=1pt}
\newcounter{xVal}
\psforeach{\n}{\data}
{ \stepcounter{xVal}
\uput[u](\thexVal,\n){\n}
}
\end{pspicture}

\end{document}

mechanicus
13-01-2010, 20:18
Hi,


\documentclass{article}
\usepackage{filecontents}
\usepackage{pstricks}
\usepackage{pst-bar}
\usepackage{pstricks-add}

\begin{filecontents*}{demo.dat2}
158, 167, 183, 188, 190, 201, 203, 210
\end{filecontents*}

\begin{document}
\renewcommand*\psbarlabelsep{2pt}
\psset{xunit=1,yunit=.02cm}
\psset{yticksize=0 8cm}

\begin{pspicture}(-.5,-30)(6,250)
\readpsbardata[header=false]{\data}{demo.dat2}
\psbarchart[barcolsep = 0.6, barstyle={gray}]{\data}
\psaxes[labels=y,axesstyle=axes,Oy=0,Dy=50,xticksize=-2pt ,showorigin=false]{-}(8,250)

\multido{\n=0.50+1.00,\ib=1992+2}{8}
{ \psset{ticksize=0 0}
\psxTick(\n){\ib}%
}

\psline(1,0)(1,250)
\def\data{158, 167, 183, 188, 190, 201, 203, 210}
\rput(-0.5,0){%
\newcounter{xVal}
\setcounter{xVal}{0}
\psforeach{\n}{\data}%
{\refstepcounter{xVal}%
\uput[90](\thexVal,\n){\n}%
}}
\end{pspicture}

\end{document}

Gruß
Marco

Dorle
13-01-2010, 21:09
Vielen, vielen Dank Marco
Gruß Günter