texlive[43479] Master/texmf-dist: pst-func (12mar17)
commits+karl at tug.org
commits+karl at tug.org
Sun Mar 12 22:54:22 CET 2017
Revision: 43479
http://tug.org/svn/texlive?view=revision&revision=43479
Author: karl
Date: 2017-03-12 22:54:21 +0100 (Sun, 12 Mar 2017)
Log Message:
-----------
pst-func (12mar17)
Modified Paths:
--------------
trunk/Master/texmf-dist/doc/generic/pst-func/Changes
trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.bib
trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.pdf
trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.tex
trunk/Master/texmf-dist/tex/generic/pst-func/pst-func.tex
Modified: trunk/Master/texmf-dist/doc/generic/pst-func/Changes
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-func/Changes 2017-03-12 21:54:04 UTC (rev 43478)
+++ trunk/Master/texmf-dist/doc/generic/pst-func/Changes 2017-03-12 21:54:21 UTC (rev 43479)
@@ -1,5 +1,6 @@
..... pst-func.tex
-0.83 2017-03-07 - added some more macros for binomial distributions
+0.84 2017-03-11 - some more modifications to the binomial distributions (ts)
+0.83 2017-03-07 - added some more macros for binomial distributions (ts)
0.82 2016-05-01 - psk at PontName->\psk at func@PointName (same name in pst-eucl)
0.81 2014-05-20 - changed \pstVerb to \pst at Verb in \psZero to allow
variables from tx at Dict
Modified: trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.bib
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.bib 2017-03-12 21:54:04 UTC (rev 43478)
+++ trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.bib 2017-03-12 21:54:21 UTC (rev 43479)
@@ -14,7 +14,7 @@
@STRING{theatertage = {{\TeX}-Theatertage} }
@Article{ dtk02.2:jackson.voss:plot-funktionen,
- author = {Laura E. Jackson and Herbert Vo{\ss}},
+ author = {Laura E. Jackson and Herbert Voß},
title = {Die {P}lot-{F}unktionen von {\texttt{pst-plot}}},
journal = dtk,
year = 2002,
@@ -34,7 +34,7 @@
}
@Article{ dtk02.1:voss:mathematischen,
- author = {Herbert Vo{\ss}},
+ author = {Herbert Voß},
title = {Die mathematischen {F}unktionen von {P}ost{S}cript},
journal = dtk,
year = 2002,
@@ -48,7 +48,7 @@
abstract = { \PS, faktisch genauso alt wie {\TeX}, ist im
Verh{\"a}ltnis dazu allgemein noch weniger bekannt, wenn es
darum geht zu beurteilen, was es denn nun im eigentlichen
- Sinne ist. Au{\ss}erdem wird h{\"a}ufig vergessen, dass
+ Sinne ist. Außerdem wird h{\"a}ufig vergessen, dass
sich mit den \PS-Funktionen viele Dinge erledigen lassen,
bei denen sonst auf externe Programme zur{\"u}ckgegriffen
wird. Dies wird im Folgenden f{\"u}r die mathematischen
@@ -57,24 +57,15 @@
}
@Book{tlgc2,
- author = {Michel Goosens and Frank Mittelbach and Sebastian Rahtz and Denis Roegel and Herbert Vo{\ss}},
+ author = {Michel Goosens and Frank Mittelbach and Sebastian Rahtz and Denis Roegel and Herbert Voß},
title = {The {\LaTeX} {G}raphics {C}ompanion},
publisher = {{Addison-Wesley Publishing Company}},
- edition = second,
+ edition = 2,
year = {2007},
address = {Reading, Mass.}
}
- at Book{voss:chaos,
- author = {Herbert Vo{\ss}},
- title = {Chaos und {F}raktale selbst programmieren: von {M}andelbrotmengen
- {\"u}ber {F}arbmanipulationen zur perfekten Darstellung},
- publisher = {{Franzis Verlag}},
- year = {1994},
- address = {Poing}
-}
-
@Article{girou:01:,
author = {Denis Girou},
title = {Pr\'esentation de {PST}ricks},
@@ -104,44 +95,41 @@
year = 1989,
}
- at Manual{pstricks,
+ at online{pstricks,
Title = {PSTricks - {\PS} macros for generic {\TeX}},
Author = {{Timothy van} Zandt},
Organization = {},
- Address = {\url{http://www.tug.org/application/PSTricks}},
- Note = {},
+ url = {http://www.tug.org/application/PSTricks},
year = 1993
}
- at Manual{pst-plot,
+ at ctan{pst-plot,
Title = {\texttt{pst-plot}: Plotting two dimensional functions and data},
- Author = {{Timothy van} Zandt},
+ Author = {{Timothy van} Zandt and Herbert Voß},
Organization = {},
- Address = {\url{CTAN:graphics/pstricks/generic/pst-plot.tex}},
- Note = {},
+ url = {/graphics/pstricks/generic/pst-plot.tex},
year = 1999
}
- at Manual{multido,
+ at ctan{multido,
Title = {\texttt{multido.tex} - a loop macro, that supports fixed-point addition},
Author = {{Timothy van} Zandt},
- Organization = {},
- Address = {\url{CTAN:/graphics/pstricks/generic/multido.tex}},
+ url = {/graphics/pstricks/generic/multido.tex},
Note = {},
year = 1997
}
@Book{PSTricks2,
- author = {Herbert Vo\ss},
+ author = {Herbert Voß},
title = {\texttt{PSTricks} -- {G}rafik f\"ur \TeX{} und \LaTeX},
- edition = {6.},
+ edition = {7},
publisher = {DANTE -- Lehmanns},
- year = {2010},
- address = {Heidelberg/Berlin}
+ year = {2016},
+ publisher = {Heidelberg and Berlin}
}
@Book{voss:math,
- author = {Herbert Vo\ss},
+ author = {Herbert Voß},
title = {Typesetting mathematics with \LaTeX},
publisher = {UIT},
year = {2010},
@@ -149,7 +137,7 @@
}
@Book{PSTricks2-UIT,
- author = {Herbert Vo\ss},
+ author = {Herbert Voß},
title = {PSTricks -- Graphics for \TeX\ and \LaTeX},
publisher = {UIT},
year = {2011},
@@ -157,7 +145,7 @@
}
@Book{LaTeXRef-UIT,
- author = {Herbert Vo\ss},
+ author = {Herbert Voß},
title = {{\LaTeX} quick reference},
publisher = {UIT},
year = {2012},
@@ -164,18 +152,17 @@
address = {Cambridge}
}
- at Manual{wolfram,
+ at online{wolfram,
author = {Eric Weisstein},
title = {Wolfram MathWorld},
publisher = {{Wolfram}},
year = {2007},
- address = {\url{http://mathworld.wolfram.com}}
+ url = {http://mathworld.wolfram.com}
}
- at Manual{pst-tools,
+ at ctan{pst-tools,
author = {Herbert Voß},
title = {\texttt{pst-tools} -- Helper functions},
- publisher = {CTAN},
year = {2012},
- address = {\url{CTAN:/graphics/pstricks/contrib/pst-tools}}
+ url = {/graphics/pstricks/contrib/pst-tools}
}
Modified: trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.pdf
===================================================================
(Binary files differ)
Modified: trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.tex
===================================================================
--- trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.tex 2017-03-12 21:54:04 UTC (rev 43478)
+++ trunk/Master/texmf-dist/doc/generic/pst-func/pst-func-doc.tex 2017-03-12 21:54:21 UTC (rev 43479)
@@ -20,6 +20,10 @@
\psGauss[sigma=1, linecolor=blue, linewidth=2pt]{-1.75}{1.75}
\end{pspicture}}
+\usepackage[style=dtk]{biblatex}
+\addbibresource{pst-func-doc.bib}
+
+
\lstset{language=PSTricks,
morekeywords={psGammaDist,psChiIIDist,psTDist,psFDist,psBetaDist,psPlotImpl},basicstyle=\footnotesize\ttfamily}
%
@@ -1036,15 +1040,14 @@
\subsection{Binomial distribution}\label{sec:bindistri}
-These five macros plot binomial probability mass function \Lcs{psBinomial} and \Lcs{psBinomialC} in curve style, the normalized one is \Lcs{psBinomialN}. The cumulative distribution function $F$ \Lcs{psBinomialF} and the complement of the cumulative distribution function to one ($1-F$) \Lcs{psBinomialFS}
-It is always done in the $y$-Intervall $[0;1]$.
-Rescaling to another one can be done by setting the \Lkeyword{yunit} option
+\begin{sloppypar}
+The following five macros plot binomial probability mass function \Lcs{psBinomial} and \Lcs{psBinomialC} in curve style, the normalized one is \Lcs{psBinomialN}. The cumulative distribution function $F$ \Lcs{psBinomialF} and the complement of the cumulative distribution function ($1-F$) \Lcs{psBinomialFS}
+The vertical range for the plots is the $y$-Intervall $[0;1]$.
+Rescaling other values can be done by setting the \Lkeyword{yunit} option
to any other value.
+\end{sloppypar}
-The binomial distribution \Lcs{psBinomial} gives the discrete probability distribution $P_p(n|N)$ of obtaining
-exactly $n$ successes out of $N$ Bernoulli trials (where the result of each
-Bernoulli trial is true with probability $p$ and false with probability
-$q=1-p$. The binomial distribution is therefore given by
+The binomial distribution \Lcs{psBinomial} gives the discrete probability distribution $P_p(n|N)$ $n$ successes out of $N$ Bernoulli trials (where the result of each Bernoulli trial is true with probability $p$ and false with probability $q=1-p$). The binomial distribution is therefore given by
\begin{align}
P_p(n|N) &= \binom{N}{n}p^nq^{N-n} \\
@@ -1053,7 +1056,7 @@
where $(N; n)$ is a binomial coefficient and $P$ the probability.
-The syntax is quite easy:
+The syntax is:
\begin{BDef}
\Lcs{psBinomial}\OptArgs\Largb{N}\Largb{probability p}\\
@@ -1248,6 +1251,10 @@
+
+
+
+
\clearpage
\subsection{Poisson distribution}
Given a Poisson process\footnote{\url{http://mathworld.wolfram.com/PoissonProcess.html}},
@@ -1834,7 +1841,7 @@
\clearpage
\section{\nxLcs{psplotImp} -- plotting implicit defined functions}
For a given area, the macro calculates in a first step row by row for every pixel (1pt)
-the function $f(x,y)$ and checks for avchanging of the value from $f(x,y)<0$ to $f(x,y)>0$
+the function $f(x,y)$ and checks for a changing of the value from $f(x,y)<0$ to $f(x,y)>0$
or vice versa. If this happens, then the pixel must be part of the curve of
the function $f(x,y)=0$. In a second step the same is done column by column.
This may take some time because an area of $400\times 300$ pixel needs 120 thousand calculations
@@ -2169,10 +2176,10 @@
\xkvview{family=pst-func,columns={key,type,default}}
\bgroup
-\raggedright
+\RaggedRight
\nocite{*}
-\bibliographystyle{plain}
-\bibliography{pst-func-doc}
+%\bibliographystyle{plain}
+\printbibliography{pst-func-doc}
\egroup
\printindex
Modified: trunk/Master/texmf-dist/tex/generic/pst-func/pst-func.tex
===================================================================
--- trunk/Master/texmf-dist/tex/generic/pst-func/pst-func.tex 2017-03-12 21:54:04 UTC (rev 43478)
+++ trunk/Master/texmf-dist/tex/generic/pst-func/pst-func.tex 2017-03-12 21:54:21 UTC (rev 43479)
@@ -31,8 +31,8 @@
% interface to the `xkeyval' package
\pst at addfams{pst-func}
%
-\def\fileversion{0.83}
-\def\filedate{2017/03/07}
+\def\fileversion{0.84}
+\def\filedate{2017/03/11}
\message{`PST-func' v\fileversion, \filedate\space (hv)}
%
\pstheader{pst-func.pro}
@@ -549,9 +549,10 @@
\def\pst at tempA{#3}%
\ifx\pst at tempA\@empty\psBinomial at iii{#1}{#2}{#2}{#5}%
\else\psBinomial at iii{#1}{#2}{#3}{#5}\fi
- \fi}%
+ \fi}
+%
\def\psBinomial at iii#1#2#3#4{%
- \begin at OpenObj%
+ \begin at OpenObj
\addto at pscode{
/scx { \pst at number\psxunit mul } def
/scy { \pst at number\psyunit mul } def
@@ -590,22 +591,22 @@
} for
\ifPst at markZeros\else k dx add scx 0 L \fi % last line down to x-axis
}%
-% \psk at fillstyle%
-% \pst at stroke%
- \end at OpenObj%
+% \psk at fillstyle
+% \pst at stroke
+ \end at OpenObj
}%
%
\def\psBinomialN{\pst at object{psBinomialN}}%
\def\psBinomialN at i#1#2{%
-\leavevmode
-\pst at killglue
-\begingroup
-\use at par
-\init at pscode
-\def\cplotstyle{curve}%
-\ifx\psplotstyle\cplotstyle \@nameuse{beginplot@\psplotstyle}\fi
-\addto at pscode{%
-\ifx\psplotstyle\cplotstyle /Curve true def \else /Curve false def \fi
+ \leavevmode
+ \pst at killglue
+ \begingroup
+ \use at par
+ \init at pscode
+ \def\cplotstyle{curve}%
+ \ifx\psplotstyle\cplotstyle \@nameuse{beginplot@\psplotstyle}\fi
+ \addto at pscode{%
+ \ifx\psplotstyle\cplotstyle /Curve true def \else /Curve false def \fi
/scx { \pst at number\psxunit mul } def
/scy { \pst at number\psyunit mul } def
/N #1 def
@@ -644,15 +645,15 @@
/xOld x def
} for
Curve { [ xEnd 0 Coors aload pop } if% showpoints on top of the stack
+ }%
+ \ifx\psplotstyle\cplotstyle\@nameuse{endplot@\psplotstyle}\else
+ \psk at fillstyle
+ \pst at stroke
+ \fi
+ \use at pscode
+ \endgroup
+ \ignorespaces
}%
-\ifx\psplotstyle\cplotstyle\@nameuse{endplot@\psplotstyle}\else
-\psk at fillstyle
-\pst at stroke
-\fi
-\use at pscode
-\endgroup
-\ignorespaces%
-}%
\def\psBinomialF{\pst at object{psBinomialF}}
\def\psBinomialF at i#1#2{\psBinomialF at ii#1,,,\@nil{#2}}%
\def\psBinomialF at ii#1,#2,#3,#4\@nil#5{%
@@ -665,7 +666,7 @@
\else\psBinomialF at iii{#1}{#2}{#3}{#5}\fi
\fi}%
\def\psBinomialF at iii#1#2#3#4{%
- \begin at OpenObj%
+ \begin at OpenObj
\addto at pscode{
/scx { \pst at number\psxunit mul } def
/scy { \pst at number\psyunit mul } def
@@ -677,6 +678,15 @@
/q 1 p sub def
\ifPst at markZeros /kOld dx neg m add def \else
/kOld m def \fi
+ \psFunc at leftEnd 0 eq
+ { }
+ { kOld 0 eq
+ { kOld \psFunc at leftEnd sub scx 0 moveto % starting point
+ \ifPst at LineEnding
+ kOld \psFunc at radiusout\pst at number\psxunit div sub scx 0 L stroke
+ kOld scx 0 newpath \psFunc at radiusout 0 360 arc kOld scx 0 \psFunc at radiusinR 360 0 arcn closepath \pst at usecolor\psk at LineEndColorR fill \else
+ kOld scx 0 L stroke \fi }
+ { } ifelse } ifelse
kOld scx 0 moveto % starting point
0 1 m 1 sub {
/k exch def % save loop variable
@@ -684,7 +694,7 @@
{ /Y q N exp def
/F Y def}
{ /Y Y N k sub 1 add mul k div p mul q div def
- /F F Y add def}
+ /F F Y add def }
ifelse
} for
m 1 n { % n-m+1 times
@@ -691,20 +701,14 @@
/k exch def % save loop variable
k 0 eq
{ /Y q N exp def
- /F Y def}
+ /F Y def }
{ /Y Y N k sub 1 add mul k div p mul q div def
- /F F Y add def}
+ /F F Y add def }
ifelse % recursive definition
\ifPst at markZeros kOld scx F scy L k dx add scx F scy L k dx add scx 0 L kOld 1 add scx 0 L
\else
- \ifPst at LineEnding
- k 0 eq
- { }
- { kOld scx F scy newpath \psFunc at radiusout 0 360 arc kOld scx F scy \psFunc at radiusinL 360 0 arcn closepath \pst at usecolor\psk at LineEndColorL fill } ifelse \fi
+ kOld scx F scy newpath \psFunc at radiusout 0 360 arc kOld scx F scy \psFunc at radiusinL 360 0 arcn closepath \pst at usecolor\psk at LineEndColorL fill
kOld \ifPst at LineEnding\psFunc at radiusout\pst at number\psxunit div add \fi
- k 0 eq
- { \psFunc at leftEnd sub }
- { } ifelse
scx F scy moveto
k 1 add
\ifPst at LineEnding\psFunc at radiusout\pst at number\psxunit div sub \fi
@@ -715,7 +719,7 @@
\ifPst at LineEnding
k N eq
{ }
- { k 1 add scx F scy newpath \psFunc at radiusout 0 360 arc k 1 add scx F scy \psFunc at radiusinR 360 0 arcn closepath \pst at usecolor\psk at LineEndColorR fill }
+ { k 1 add scx F scy newpath \psFunc at radiusout 0 360 arc k 1 add scx F scy \psFunc at radiusinR 360 0 arcn closepath \pst at usecolor\psk at LineEndColorR fill }
ifelse
\ifPst at VLines
Y \psFunc at radiusout\pst at number\psyunit div 2 mul le
@@ -753,7 +757,7 @@
\else\psBinomialFS at iii{#1}{#2}{#3}{#5}\fi
\fi}%
\def\psBinomialFS at iii#1#2#3#4{%
- \begin at OpenObj%
+ \begin at OpenObj
\addto at pscode{
/scx { \pst at number\psxunit mul } def
/scy { \pst at number\psyunit mul } def
@@ -830,7 +834,7 @@
/kOld kOld 1 add def
} for
}%
- \end at OpenObj%
+ \end at OpenObj
}%
%
\def\psBinomialC{\pst at object{psBinomialC}}
@@ -858,7 +862,7 @@
% /xEnd xOld neg dx add scx def
Curve
{ /Coors [xOld dx sub scx 0] def }% saves the coordinates for curve
- { xOld scx 0 moveto } % starting point
+ { xOld scx 0 moveto }% starting point
ifelse
0 1 N { % N times
/k exch def % save loop variable
@@ -891,7 +895,7 @@
\fi
\use at pscode
\endgroup
-\ignorespaces}
+\ignorespaces}%
%
%
\def\psPoisson{\pst at object{psPoisson}}% with contributions from Gerry Coombes
@@ -1649,3 +1653,4 @@
%% END: pst-func.tex
\endinput
%
+
More information about the tex-live-commits
mailing list