book/src/labtar_hist.tex
author Eugen Sawin <sawine@me73.com>
Fri, 25 Mar 2011 15:57:06 +0100
changeset 6 189c28168c97
permissions -rw-r--r--
Corrections.
sawine@1
     1
% GNUPLOT: LaTeX picture with Postscript
sawine@1
     2
\begingroup
sawine@1
     3
  \makeatletter
sawine@1
     4
  \providecommand\color[2][]{%
sawine@1
     5
    \GenericError{(gnuplot) \space\space\space\@spaces}{%
sawine@1
     6
      Package color not loaded in conjunction with
sawine@1
     7
      terminal option `colourtext'%
sawine@1
     8
    }{See the gnuplot documentation for explanation.%
sawine@1
     9
    }{Either use 'blacktext' in gnuplot or load the package
sawine@1
    10
      color.sty in LaTeX.}%
sawine@1
    11
    \renewcommand\color[2][]{}%
sawine@1
    12
  }%
sawine@1
    13
  \providecommand\includegraphics[2][]{%
sawine@1
    14
    \GenericError{(gnuplot) \space\space\space\@spaces}{%
sawine@1
    15
      Package graphicx or graphics not loaded%
sawine@1
    16
    }{See the gnuplot documentation for explanation.%
sawine@1
    17
    }{The gnuplot epslatex terminal needs graphicx.sty or graphics.sty.}%
sawine@1
    18
    \renewcommand\includegraphics[2][]{}%
sawine@1
    19
  }%
sawine@1
    20
  \providecommand\rotatebox[2]{#2}%
sawine@1
    21
  \@ifundefined{ifGPcolor}{%
sawine@1
    22
    \newif\ifGPcolor
sawine@1
    23
    \GPcolorfalse
sawine@1
    24
  }{}%
sawine@1
    25
  \@ifundefined{ifGPblacktext}{%
sawine@1
    26
    \newif\ifGPblacktext
sawine@1
    27
    \GPblacktexttrue
sawine@1
    28
  }{}%
sawine@1
    29
  % define a \g@addto@macro without @ in the name:
sawine@1
    30
  \let\gplgaddtomacro\g@addto@macro
sawine@1
    31
  % define empty templates for all commands taking text:
sawine@1
    32
  \gdef\gplbacktext{}%
sawine@1
    33
  \gdef\gplfronttext{}%
sawine@1
    34
  \makeatother
sawine@1
    35
  \ifGPblacktext
sawine@1
    36
    % no textcolor at all
sawine@1
    37
    \def\colorrgb#1{}%
sawine@1
    38
    \def\colorgray#1{}%
sawine@1
    39
  \else
sawine@1
    40
    % gray or color?
sawine@1
    41
    \ifGPcolor
sawine@1
    42
      \def\colorrgb#1{\color[rgb]{#1}}%
sawine@1
    43
      \def\colorgray#1{\color[gray]{#1}}%
sawine@1
    44
      \expandafter\def\csname LTw\endcsname{\color{white}}%
sawine@1
    45
      \expandafter\def\csname LTb\endcsname{\color{black}}%
sawine@1
    46
      \expandafter\def\csname LTa\endcsname{\color{black}}%
sawine@1
    47
      \expandafter\def\csname LT0\endcsname{\color[rgb]{1,0,0}}%
sawine@1
    48
      \expandafter\def\csname LT1\endcsname{\color[rgb]{0,1,0}}%
sawine@1
    49
      \expandafter\def\csname LT2\endcsname{\color[rgb]{0,0,1}}%
sawine@1
    50
      \expandafter\def\csname LT3\endcsname{\color[rgb]{1,0,1}}%
sawine@1
    51
      \expandafter\def\csname LT4\endcsname{\color[rgb]{0,1,1}}%
sawine@1
    52
      \expandafter\def\csname LT5\endcsname{\color[rgb]{1,1,0}}%
sawine@1
    53
      \expandafter\def\csname LT6\endcsname{\color[rgb]{0,0,0}}%
sawine@1
    54
      \expandafter\def\csname LT7\endcsname{\color[rgb]{1,0.3,0}}%
sawine@1
    55
      \expandafter\def\csname LT8\endcsname{\color[rgb]{0.5,0.5,0.5}}%
sawine@1
    56
    \else
sawine@1
    57
      % gray
sawine@1
    58
      \def\colorrgb#1{\color{black}}%
sawine@1
    59
      \def\colorgray#1{\color[gray]{#1}}%
sawine@1
    60
      \expandafter\def\csname LTw\endcsname{\color{white}}%
sawine@1
    61
      \expandafter\def\csname LTb\endcsname{\color{black}}%
sawine@1
    62
      \expandafter\def\csname LTa\endcsname{\color{black}}%
sawine@1
    63
      \expandafter\def\csname LT0\endcsname{\color{black}}%
sawine@1
    64
      \expandafter\def\csname LT1\endcsname{\color{black}}%
sawine@1
    65
      \expandafter\def\csname LT2\endcsname{\color{black}}%
sawine@1
    66
      \expandafter\def\csname LT3\endcsname{\color{black}}%
sawine@1
    67
      \expandafter\def\csname LT4\endcsname{\color{black}}%
sawine@1
    68
      \expandafter\def\csname LT5\endcsname{\color{black}}%
sawine@1
    69
      \expandafter\def\csname LT6\endcsname{\color{black}}%
sawine@1
    70
      \expandafter\def\csname LT7\endcsname{\color{black}}%
sawine@1
    71
      \expandafter\def\csname LT8\endcsname{\color{black}}%
sawine@1
    72
    \fi
sawine@1
    73
  \fi
sawine@1
    74
  \setlength{\unitlength}{0.0500bp}%
sawine@1
    75
  \begin{picture}(4320.00,3024.00)%
sawine@1
    76
    \gplgaddtomacro\gplbacktext{%
sawine@1
    77
      \csname LTb\endcsname%
sawine@1
    78
      \put(1342,704){\makebox(0,0)[r]{\strut{}$0$}}%
sawine@1
    79
      \put(1342,961){\makebox(0,0)[r]{\strut{}$100$}}%
sawine@1
    80
      \put(1342,1218){\makebox(0,0)[r]{\strut{}$200$}}%
sawine@1
    81
      \put(1342,1475){\makebox(0,0)[r]{\strut{}$300$}}%
sawine@1
    82
      \put(1342,1732){\makebox(0,0)[r]{\strut{}$400$}}%
sawine@1
    83
      \put(1342,1989){\makebox(0,0)[r]{\strut{}$500$}}%
sawine@1
    84
      \put(1342,2246){\makebox(0,0)[r]{\strut{}$600$}}%
sawine@1
    85
      \put(1342,2503){\makebox(0,0)[r]{\strut{}$700$}}%
sawine@1
    86
      \put(1342,2760){\makebox(0,0)[r]{\strut{}$800$}}%
sawine@1
    87
      \put(1474,484){\makebox(0,0){\strut{}$0$}}%
sawine@1
    88
      \put(1833,484){\makebox(0,0){\strut{}$5$}}%
sawine@1
    89
      \put(2193,484){\makebox(0,0){\strut{}$10$}}%
sawine@1
    90
      \put(2552,484){\makebox(0,0){\strut{}$15$}}%
sawine@1
    91
      \put(2912,484){\makebox(0,0){\strut{}$20$}}%
sawine@1
    92
      \put(3271,484){\makebox(0,0){\strut{}$25$}}%
sawine@1
    93
      \put(3631,484){\makebox(0,0){\strut{}$30$}}%
sawine@1
    94
      \put(3990,484){\makebox(0,0){\strut{}$35$}}%
sawine@1
    95
      \put(440,1732){\rotatebox{90}{\makebox(0,0){\strut{}Häufigkeit}}}%
sawine@1
    96
      \put(2732,154){\makebox(0,0){\strut{}Separationszeit (min)}}%
sawine@1
    97
    }%
sawine@1
    98
    \gplgaddtomacro\gplfronttext{%
sawine@1
    99
    }%
sawine@1
   100
    \gplbacktext
sawine@1
   101
    \put(0,0){\includegraphics{labtar_hist}}%
sawine@1
   102
    %\gplfronttext
sawine@1
   103
  \end{picture}%
sawine@1
   104
\endgroup