diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /info/examples/PSTricks_en/36-00-85.ltx |
Initial commit
Diffstat (limited to 'info/examples/PSTricks_en/36-00-85.ltx')
-rw-r--r-- | info/examples/PSTricks_en/36-00-85.ltx | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/info/examples/PSTricks_en/36-00-85.ltx b/info/examples/PSTricks_en/36-00-85.ltx new file mode 100644 index 0000000000..183f0cfebd --- /dev/null +++ b/info/examples/PSTricks_en/36-00-85.ltx @@ -0,0 +1,55 @@ +%% +%% A DANTE-Edition example +%% +%% Example 36-00-85 on page 803. +%% +%% Copyright (C) 2011 Herbert Voss +%% +%% It may be distributed and/or modified under the conditions +%% of the LaTeX Project Public License, either version 1.3 +%% of this license or (at your option) any later version. +%% +%% See http://www.latex-project.org/lppl.txt for details. +%% +%% +%% ==== +% Show page(s) 1 +%% +\documentclass[]{article} +\pagestyle{empty} +\setlength\textwidth{201.70511pt} +\setlength\parindent{0pt} + +\usepackage{pstricks-add} +\makeatletter +\pst@def{ScalePoints}<% Rückgängig machen. + /y ED /x ED + counttomark dup dup cvi eq not { exch pop } if + /m exch def /n m 2 div cvi def + n { y mul m 1 roll x mul m 1 roll /m m 2 sub def } repeat> +\makeatother + \def\Data{% + 0 0 20 0 40 0 % P0 P1 P2 + 10 2 30 2.5 50 1.8 % P3 P4 P5 + 30 4 48.5 3.7 70 4 % P6 P7 P8 + 10 5.3 30 5 50 5.1 % P9 P10 P11 +} + + +\begin{document} +\psset{xunit=1mm, yunit=5mm} +\begin{pspicture}(0,-1)(70,7.5) + \psaxes[Dx=10,Dy=2]{->}(0,0)(0,-0.5)(70,7.5) + \psset{linewidth=1pt} +% horizontal + \listplot[nStart=0,nEnd=2]{\Data} + \listplot[linecolor=red,nStart=3,nEnd=5]{\Data} + \listplot[linecolor=blue,nStart=6,nEnd=8]{\Data} + \listplot[linecolor=green,nStart=9,nEnd=11]{\Data} +% vertikal + \psset{nStep=3} + \listplot[nStart=0,nEnd=9]{\Data} + \listplot[linecolor=red,nStart=1,nEnd=10]{\Data} + \listplot[linecolor=blue,nStart=2,nEnd=11]{\Data} +\end{pspicture} +\end{document} |