Code:
\documentclass{article}
\usepackage{filecontents}
\begin{filecontents*}{test.dat}
85.0 3813.1707 5088.506
85.99999 3743.248 5134.1787
86.99999 3615.955 4944.0117
88.00001 3529.1985 4813.0967
89.00001 3149.343 4625.746
90.0 3212.553 4566.2495
90.99999 3258.5784 4846.491
91.99999 2979.494 4518.473
93.00001 2759.3594 3731.42
94.00001 2911.7422 4376.805
95.0 2861.577 4585.0776
95.99999 2775.4565 4260.9053
96.99999 3089.479 4882.842
98.00001 3433.3342 4961.0654
99.00001 3754.1475 5273.308
100.0 3926.045 5102.5513
\end{filecontents*}
\usepackage{pstricks,pstricks-add}
\usepackage{subfig}
\begin{document}
\readdata{\data}{test.dat}
\begin{figure}[!htb]
\centering
\psset{llx=-1cm,lly=-0.75cm}
\subfloat[Titel]{%
\pstScalePoints(1,0.001){}{}
\psgraph[dy=\psyunit,Dy=1000,dx=5\psxunit,Dx=5,Ox=80]%
{->}(80,0)(100,6){0.375\textwidth}{0.375\textwidth}
\listplot[plotNo=1, plotNoMax=2, linestyle=dashed,
dash=3pt 2pt, linecolor=blue, linewidth=1pt]{\data}
\listplot[plotNo=2, plotNoMax=2,
linecolor=red, linewidth=1pt]{\data}
\endpsgraph}\quad
\subfloat[Titel]{%
\pstScalePoints(1,0.001){}{}
\psgraph[dy=\psyunit,Dy=1000,dx=5\psxunit,Dx=5,Ox=80]%
{->}(80,0)(100,6){0.375\textwidth}{0.375\textwidth}
\listplot[plotNo=1, plotNoMax=2, linestyle=dashed,
dash=3pt 2pt, linecolor=blue, linewidth=1pt]{\data}
\listplot[plotNo=2, plotNoMax=2,
linecolor=red, linewidth=1pt]{\data}
\endpsgraph}
\subfloat[Titel]{%
\pstScalePoints(1,0.001){}{}
\psgraph[dy=\psyunit,Dy=1000,dx=5\psxunit,Dx=5,Ox=80]%
{->}(80,0)(100,6){0.375\textwidth}{0.375\textwidth}
\listplot[plotNo=1, plotNoMax=2, linestyle=dashed,
dash=3pt 2pt, linecolor=blue, linewidth=1pt]{\data}
\listplot[plotNo=2, plotNoMax=2,
linecolor=red, linewidth=1pt]{\data}
\endpsgraph}\quad
\subfloat[Titel]{%
\pstScalePoints(1,0.001){}{}
\psgraph[dy=\psyunit,Dy=1000,dx=5\psxunit,Dx=5,Ox=80]%
{->}(80,0)(100,6){0.375\textwidth}{0.375\textwidth}
\listplot[plotNo=1, plotNoMax=2, linestyle=dashed,
dash=3pt 2pt, linecolor=blue, linewidth=1pt]{\data}
\listplot[plotNo=2, plotNoMax=2,
linecolor=red, linewidth=1pt]{\data}
\endpsgraph}
\caption{Eine Unterschrift für alles ... }
\end{figure}
\end{document}
Lesezeichen