Balkenbeschriftung, Komma statt Punkt

[Dorle]

In der Balkenbeschriftung stört mich der Dezimalpunkt. Für den
schulischen Bereich müsste es ein Komma sein. Hierzu habe ich leider
nichts gefunden.

\documentclass{article}
\usepackage{filecontents}
\usepackage{pstricks, pst-bar, pstricks-add}
\usepackage{german}
\usepackage[cp850]{inputenc}

\begin{filecontents*}{demo.dat3}
16.4, 16.9, 17.1, 17.7, 18.1
\end{filecontents*}

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

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

\multido{\n=0.50+1.00,\ib=2004+1}{5}
{ \psset{ticksize=0 0}
\psxTick(\n){\ib}%
}

\psline(5,0)(5,20)
\def\data{16.4, 16.9, 17.1, 17.7, 18.1}
\rput(-0.52,0){%
\newcounter{xVal}
\setcounter{xVal}{0}
\psforeach{\n}{\data}%
{\refstepcounter{xVal}%
\uput[90](\thexVal,\n){\n}%
}
}
\end{pspicture}

\vskip-25ex
Das Diagramm zeigt für die
Jahre 2004 bis 2008 die
durchschnittliche Anzahl der
Arztbesuche in Deutschland. (2008 Österreich 6,8, Frankreich 6,3)\\[-4ex]
\end{document}

[voss]

In der Balkenbeschriftung stört mich der Dezimalpunkt. Für den
schulischen Bereich müsste es ein Komma sein. Hierzu habe ich leider
nichts gefunden.

In der Schule nimmt man aber auch ngerman ...

\documentclass[ngerman]{article}
\usepackage{babel}
\usepackage[utf8]{inputenc}
\usepackage{filecontents}
\usepackage{pst-bar, pstricks-add}

\begin{filecontents*}{demo.dat3}
2004,2005,2006,2007,2008
16.4, 16.9, 17.1, 17.7, 18.1
\end{filecontents*}
\newcounter{xVal}

\makeatletter
\def\dotToComma#1{\expandafter\dotToComma@i#1\@nil}
\def\dotToComma@i#1.#2\@nil{$#1,#2$}
\makeatother

\begin{document}
\renewcommand*\psbarlabelsep{2pt}
\psset{yunit=.24cm,yticksize=0 5cm}

\begin{pspicture}(-.5,-20)(5,20)
\readpsbardata{\data}{demo.dat3}
\psbarchart[barcolsep=0.6,barstyle={gray}]{\data}
\psaxes[axesstyle=frame,labels=y,Dy=5,xticksize=-2pt,showorigin=false](5,20)
\def\data{16.4, 16.9, 17.1, 17.7, 18.1}
\rput(-0.52,0){%
  \psforeach{\n}{\data}{\stepcounter{xVal}%
    \uput[90](\thexVal,\n){\dotToComma{\n}}}}
\end{pspicture}

\vskip-25ex
Das Diagramm zeigt für die
Jahre 2004 bis 2008 die
durchschnittliche Anzahl der
Arztbesuche in Deutschland. (2008 Österreich 6,8, Frankreich 6,3)\\[-4ex]
\end{document}

Herbert

[Dorle]

Vielen Dank Herbert,
ich bin wirklich sehr dankbar.
Gruß Günter