150 lines
4.1 KiB
TeX
150 lines
4.1 KiB
TeX
\documentclass[12pt,a4paper]{article}
|
|
|
|
|
|
\usepackage{arrayjob}
|
|
\usepackage{pstricks,pst-plot}
|
|
\begin{document}
|
|
|
|
|
|
\psset{xunit=0.3in,yunit=0.3in,runit=0.3in,plotpoints=200,
|
|
dash=4pt 4pt,linewidth=1.5pt,dotsep=4pt}
|
|
|
|
\begin{figure}
|
|
\centering
|
|
\begin{pspicture}(0,0)(15,15)
|
|
\psaxes[linewidth=1pt,labels=none,ticks=none]{-}(0,0)(0,0)(15,15)
|
|
\uput{1ex}[180](0,14){$x_{t+1}$}
|
|
\uput{1ex}[270](14,0){$x_t$}
|
|
\SpecialCoor
|
|
\psplot{0}{15}{4 x 1 add ln mul}
|
|
\uput{1.75ex}[240](!15 4 15 1 add ln mul){$\psi(x_t)$}
|
|
\psline(0,0)(15,15)
|
|
\uput{1ex}[180](15,15){$x_{t+1}=x_t$}
|
|
\def\x{9.34665}
|
|
\qdisk(\x,\x){3pt}
|
|
\psline[linestyle=dashed](\x,0)(\x,\x)
|
|
\uput{1ex}[270](\x,0){$x$}
|
|
\uput{1ex}[135](!\x\space 4 \x\space 1 add ln mul){$\psi'(x)<1$}
|
|
\pscustom[linewidth=1.2pt,arrowscale=1.5]{
|
|
\code{/x 1 def
|
|
/y 4 x 1 add ln mul def}
|
|
\multido{\i=1+1}{4}{
|
|
\moveto(!x y)
|
|
\psline{->}(!x x)(!x y) \closepath
|
|
\psline{->}(!x y)(!y y) \closepath
|
|
\code{/x y def
|
|
/y 4 x 1 add ln mul def}
|
|
}
|
|
\code{/x 15 def
|
|
/y 4 x 1 add ln mul def}
|
|
\multido{\i=1+1}{2}{
|
|
\moveto(!x y)
|
|
\psline{->}(!x x)(!x y) \closepath
|
|
\psline{->}(!x y)(!y y) \closepath
|
|
\code{/x y def
|
|
/y 4 x 1 add ln mul def}
|
|
}
|
|
}
|
|
\end{pspicture}
|
|
\end{figure}
|
|
|
|
\newpage
|
|
|
|
|
|
|
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
|
\psset{xunit=0.3in,yunit=0.3in,runit=0.3in,plotpoints=200,
|
|
dash=4pt 4pt,linewidth=1.5pt,dotsep=4pt}
|
|
|
|
\begin{figure}
|
|
\centering
|
|
\begin{pspicture}(0,0)(15,15)
|
|
\psaxes[linewidth=1pt,labels=none,ticks=none]{-}(0,0)(0,0)(15,15)
|
|
\uput{1ex}[180](0,14){$x_{t+1}$}
|
|
\uput{1ex}[270](14,0){$x_t$}
|
|
\SpecialCoor
|
|
\psplot{0}{11}{2.71828 x 4 div exp 1 sub}
|
|
\uput{1.75ex}[180](!11 2.71828 11 4 div exp 1 sub){$\psi(x_t)$}
|
|
\psline(0,0)(15,15)
|
|
\uput{1ex}[180](15,15){$x_{t+1}=x_t$}
|
|
\def\x{9.34665}
|
|
\qdisk(\x,\x){3pt}
|
|
\psline[linestyle=dashed](\x,0)(\x,\x)
|
|
\uput{1ex}[270](\x,0){$x$}
|
|
\uput{1ex}[135](!\x\space 2.71828 \x\space 4 div exp 1
|
|
sub){$\psi'(x)>1$}
|
|
\pscustom[linewidth=1.2pt,arrowscale=1.5]{
|
|
\code{/x 8.5 def
|
|
/y 2.71828 x 4 div exp 1 sub def}
|
|
\multido{\i=1+1}{4}{
|
|
\moveto(!x y)
|
|
\psline{->}(!x x)(!x y) \closepath
|
|
\psline{->}(!x y)(!y y) \closepath
|
|
\code{/x y def
|
|
/y 2.71828 x 4 div exp 1 sub def}
|
|
}
|
|
\code{/x 9.9 def
|
|
/y 2.71828 x 4 div exp 1 sub def}
|
|
\multido{\i=1+1}{2}{
|
|
\moveto(!x y)
|
|
\psline{->}(!x x)(!x y) \closepath
|
|
\psline{->}(!x y)(!y y) \closepath
|
|
\code{/x y def
|
|
/y 2.71828 x 4 div exp 1 sub def}
|
|
}
|
|
}
|
|
\end{pspicture}
|
|
\end{figure}
|
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|
|
|
|
\begin{figure}
|
|
\centering
|
|
|
|
\newarray{\Months}
|
|
\readarray{Months}{January & February & Mars & April & May & June &
|
|
July & August & September & October & November & December}
|
|
|
|
\newarray{\ShortMonths}
|
|
\readarray{ShortMonths}{Jan & Feb & Mar & Apr & May & &
|
|
& & Sep & Oct & Nov & Dec}
|
|
|
|
\begingroup
|
|
\psset{unit=1.1}
|
|
\begin{pspicture}(-0.5,-0.5)(13,5)
|
|
\psaxes[labels=y]{->}(13,5)
|
|
\multido{\iMonth=1+1}{12}{%
|
|
\checkMonths(\iMonth)%
|
|
\rput[B](\iMonth,-0.3){\tiny\cachedata}}
|
|
\end{pspicture}
|
|
\endgroup
|
|
|
|
\vspace{1cm}
|
|
\begin{pspicture}(-0.5,-0.5)(13,5)
|
|
\psaxes[labels=y]{->}(13,5)
|
|
\multido{\iMonth=1+2}{6}{%
|
|
\checkMonths(\iMonth)%
|
|
\rput[B](\iMonth,-0.5){\small\cachedata}}
|
|
\end{pspicture}
|
|
|
|
\vspace{1cm}
|
|
\begin{pspicture}(-0.5,-0.5)(6.5,5)
|
|
\psaxes[dx=0.5,labels=y]{->}(6.5,5)
|
|
\multido{\iMonth=1+1,\nPos=0.5+0.5}{12}{%
|
|
\checkShortMonths(\iMonth)%
|
|
\ifx\cachedata\space
|
|
\rput[B](\nPos,-0.4){\scriptsize\textbf{?}}
|
|
\else
|
|
\rput[B](\nPos,-0.4){\scriptsize\cachedata}
|
|
\fi}
|
|
\end{pspicture}
|
|
|
|
|
|
|
|
|
|
\end{figure}
|
|
|
|
|
|
|
|
|
|
\end{document}
|