pst-plot (10nov11)

git-svn-id: svn://tug.org/texlive/trunk@24581 c570f23f-e606-0410-a88d-b1316a301751

4 files changed, 28 insertions, 14 deletions

diff --git a/Master/texmf-dist/doc/generic/pst-plot/Changes b/Master/texmf-dist/doc/generic/pst-plot/Changes
index cfe2251c2fa..3453473a8c1 100644
--- a/Master/texmf-dist/doc/generic/pst-plot/Changes
+++ b/Master/texmf-dist/doc/generic/pst-plot/Changes
@@ -1,4 +1,5 @@
 ----- pst-plot.tex
+1.34  2011-11-07  - fix bug with special values in \psBoxplot 
 1.33  2011-11-02  - fix bug with x|ylabelsep 
 1.32  2011-10-31  - take values Ox and Oy into account for 
                     plot styles LineToXAxis and LineToYAxis
diff --git a/Master/texmf-dist/doc/generic/pst-plot/pst-plot-doc.pdf b/Master/texmf-dist/doc/generic/pst-plot/pst-plot-doc.pdf
index 367fafe8fad..63ffa6ea946 100644
--- a/Master/texmf-dist/doc/generic/pst-plot/pst-plot-doc.pdf
+++ b/Master/texmf-dist/doc/generic/pst-plot/pst-plot-doc.pdf
diff --git a/Master/texmf-dist/doc/generic/pst-plot/pst-plot-doc.tex b/Master/texmf-dist/doc/generic/pst-plot/pst-plot-doc.tex
index 7fc4cb2c7b7..387a9f31a6d 100644
--- a/Master/texmf-dist/doc/generic/pst-plot/pst-plot-doc.tex
+++ b/Master/texmf-dist/doc/generic/pst-plot/pst-plot-doc.tex
@@ -305,7 +305,7 @@ The only special optional arguments, beside all other which are valid for drawin
 and filling areas, are \Lkeyword{IQLfactor}, \Lkeyword{barwidth}, and 
 \Lkeyword{arrowlength}, where the latter is a factor
 which is multiplied with the barwidth for the line ends. 
-The \Lkeyword{IQLfactor}, preset to 1.5, defines the area for the outliers.
+The \Lkeyword{IQLfactor}, preset to 1.5, defines the area for the outliners.
 
 %\begin{LTXexample}[pos=t,preset=\centering]
 \begin{pspicture}(-1,-1)(12,14)
diff --git a/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex b/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
index 809ac605698..12eaf98bae8 100644
--- a/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
+++ b/Master/texmf-dist/tex/generic/pst-plot/pst-plot.tex
@@ -1,4 +1,4 @@
-% $Id: pst-plot.tex 598 2011-11-03 12:58:47Z herbert $
+% $Id: pst-plot.tex 601 2011-11-07 10:26:05Z herbert $
 %% BEGIN pst-plot.tex
 %%
 %% plotting functions and data with PSTricks.
@@ -20,8 +20,8 @@
 \ifx\PSTFPloaded\endinput\else   \input pst-fp.tex  \fi
 \ifx\MultidoLoaded\endinput\else \input multido.tex \fi
 %
-\def\fileversion{1.33}
-\def\filedate{2011/11/02}
+\def\fileversion{1.34}
+\def\filedate{2011/11/07}
 \message{ v\fileversion, \filedate\space (tvz,hv)}
 %
 \edef\TheAtCode{\the\catcode`\@}
@@ -331,18 +331,31 @@ D\space##1%
    0 1 m 1 sub { % Index on stack
      dup /Index ED
      NArray exch get LowerQuartil sub abs IQL sub 0 gt { 
-       newpath 0 NArray Index get 2 0 360 arc gsave 
-       1 0 0 setrgbcolor fill grestore
-       stroke closepath 
-       NArray Index 1 add get /MinVal ED }{ exit } ifelse
+       gsave
+%       newpath 
+       0 NArray Index get 2 0 360 arc gsave 
+       1 0 0 setrgbcolor fill stroke 
+       grestore
+       NArray Index LowerQuartil UpperQuartil LowerQuartil sub \pst@IQLfactor\space mul sub 
+       dup /MinVal ED put % replace with 1.5 IQL
+%       NArray Index 1 add get /MinVal ED 
+    } { exit } ifelse
    } for
    m 1 sub -1 0 {	% Index on stack
      dup /Index ED
      NArray exch get UpperQuartil sub abs IQL sub 0 gt { 
-       newpath 0 NArray Index get 2 0 360 arc gsave 
-       1 0 0 setrgbcolor fill grestore 
-       stroke closepath
-       NArray Index 1 sub get /MaxVal ED }{ exit } ifelse
+%       newpath 
+	gsave
+	0 NArray Index get 2 0 360 arc gsave 
+       1 0 0 setrgbcolor fill stroke 
+       grestore
+       NArray Index UpperQuartil LowerQuartil sub \pst@IQLfactor\space mul UpperQuartil add 
+       dup /MaxVal ED put % replace with 1.5 IQL
+%       closepath
+%       NArray Index 1 sub get dup 
+%       IQL 1.5 mul UpperQuartil add gt { pop IQL 1.5 mul UpperQuartil add dup
+%         NArray } if  /MaxVal ED 
+     }{ exit } ifelse
    } for
 %
    Endwidth neg MaxVal moveto			% we are on top
@@ -357,7 +370,7 @@ D\space##1%
    \pst@number\pslinewidth SLW
    \pst@usecolor\pslinecolor
    \tx@setStrokeTransparency 
-   \tx@setStrokeTransparency
+%   \tx@setStrokeTransparency
    \@nameuse{psls@\pslinestyle}
    stroke
    grestore
@@ -373,7 +386,7 @@ D\space##1%
    \pst@number\pslinewidth SLW
    \pst@usecolor\pslinecolor
    \tx@setStrokeTransparency
-   \tx@setStrokeTransparency
+%   \tx@setStrokeTransparency
    \@nameuse{psls@solid}
 }}%
 %