From b73b611b12f5de2c342b04a22cac7f21f3786bad Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Andreas=20M=C3=BCller?= Date: Sun, 6 Jun 2021 21:08:29 +0200 Subject: add lambert w section --- buch/chapters/020-exponential/images/Makefile | 15 ++++++ buch/chapters/020-exponential/images/w.pdf | Bin 0 -> 20605 bytes buch/chapters/020-exponential/images/w.tex | 61 +++++++++++++++++++++++++ buch/chapters/020-exponential/images/xexpx.pdf | Bin 0 -> 20907 bytes buch/chapters/020-exponential/images/xexpx.tex | 47 +++++++++++++++++++ 5 files changed, 123 insertions(+) create mode 100644 buch/chapters/020-exponential/images/Makefile create mode 100644 buch/chapters/020-exponential/images/w.pdf create mode 100644 buch/chapters/020-exponential/images/w.tex create mode 100644 buch/chapters/020-exponential/images/xexpx.pdf create mode 100644 buch/chapters/020-exponential/images/xexpx.tex (limited to 'buch/chapters/020-exponential/images') diff --git a/buch/chapters/020-exponential/images/Makefile b/buch/chapters/020-exponential/images/Makefile new file mode 100644 index 0000000..63ebc4f --- /dev/null +++ b/buch/chapters/020-exponential/images/Makefile @@ -0,0 +1,15 @@ +# +# Makefile +# +# (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule +# + +all: xexpx.pdf w.pdf + +xexpx.pdf: xexpx.tex + pdflatex xexpx.tex + +w.pdf: w.tex + pdflatex w.tex + + diff --git a/buch/chapters/020-exponential/images/w.pdf b/buch/chapters/020-exponential/images/w.pdf new file mode 100644 index 0000000..fe176df Binary files /dev/null and b/buch/chapters/020-exponential/images/w.pdf differ diff --git a/buch/chapters/020-exponential/images/w.tex b/buch/chapters/020-exponential/images/w.tex new file mode 100644 index 0000000..e1c9dc9 --- /dev/null +++ b/buch/chapters/020-exponential/images/w.tex @@ -0,0 +1,61 @@ +% +% tikztemplate.tex -- template for standalon tikz images +% +% (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule +% +\documentclass[tikz]{standalone} +\usepackage{amsmath} +\usepackage{times} +\usepackage{txfonts} +\usepackage{pgfplots} +\usepackage{csvsimple} +\usetikzlibrary{arrows,intersections,math} +\begin{document} +\def\skala{2} +\begin{tikzpicture}[>=latex,thick,scale=\skala] + +\pgfmathparse{-exp(-1)} +\xdef\l{\pgfmathresult} + +\draw[->] (-0.5,0) -- (3.5,0) coordinate[label={$x$}]; +\draw[->] (0,{-1-0.1/\skala}) -- (0,1.5) coordinate[label={$y$}]; +\node at (0,0) [below right] {$0$}; + +\begin{scope} +\clip (-0.4,-1) rectangle (3.4,1.5); +\draw[color=red,line width=2.0pt] plot[domain=-1:1.1] ({\x*exp(\x)},{\x}); +\end{scope} + +\node[color=red] at (1.5,1) {$y=W(x)=W_0(x)$}; + +\draw[line width=0.3pt] ({\l},0) -- ({\l},-1); +\draw ({\l},{-0.1/\skala}) -- ({\l},{0.1/\skala}); +\node at ({\l},0) [above left] {$-1/e$}; + +\draw (1,{-0.1/\skala}) -- (1,{0.1/\skala}); +\node at (1,0) [below] {$1$}; +\draw (2,{-0.1/\skala}) -- (2,{0.1/\skala}); +\node at (2,0) [below] {$2$}; +\draw (3,{-0.1/\skala}) -- (3,{0.1/\skala}); +\node at (3,0) [below] {$3$}; +\draw ({-0.1/\skala},1) -- ({0.1/\skala},1); +\node at (0,1) [left] {$1$}; + +\begin{scope}[xshift=-2cm,yshift=1.5cm] +\draw[->] (-0.8,0) -- (0.5,0) coordinate[label={$x$}]; +\draw[->] (0,-3) -- (0,0.4) coordinate[label={left:$y$}];; +\node at (0,0) [below right] {$0$}; +\draw[line width=0.3pt] ({\l},0) -- ({\l},-1); +\draw ({\l},{-0.1/\skala}) -- ({\l},{0.1/\skala}); +\draw[color=blue,line width=2.0pt] plot[domain=-3:-1] ({\x*exp(\x)},{\x}); +\draw ({-0.1/\skala},-1) -- ({0.1/\skala},-1); +\draw ({-0.1/\skala},-2) -- ({0.1/\skala},-2); +\node at (0,-1) [right] {$-1$}; +\node at (0,-2) [right] {$-2$}; +\node[color=blue] at (-0.3,-2) [left] {$y=W_{-1}(x)$}; +\node at ({\l},0) [above left] {$-1/e$}; +\end{scope} + +\end{tikzpicture} +\end{document} + diff --git a/buch/chapters/020-exponential/images/xexpx.pdf b/buch/chapters/020-exponential/images/xexpx.pdf new file mode 100644 index 0000000..9321e1c Binary files /dev/null and b/buch/chapters/020-exponential/images/xexpx.pdf differ diff --git a/buch/chapters/020-exponential/images/xexpx.tex b/buch/chapters/020-exponential/images/xexpx.tex new file mode 100644 index 0000000..80cd10d --- /dev/null +++ b/buch/chapters/020-exponential/images/xexpx.tex @@ -0,0 +1,47 @@ +% +% xexpx.tex -- template for standalon tikz images +% +% (c) 2021 Prof Dr Andreas Müller, OST Ostschweizer Fachhochschule +% +\documentclass[tikz]{standalone} +\usepackage{amsmath} +\usepackage{times} +\usepackage{txfonts} +\usepackage{pgfplots} +\usepackage{csvsimple} +\usetikzlibrary{arrows,intersections,math} +\begin{document} +\def\skala{1.5} +\begin{tikzpicture}[>=latex,thick,scale=\skala] + +\draw[->] (-6.1,0) -- (2.0,0) coordinate[label={$x$}]; +\draw[->] (0,-1.1) -- (0,5.2) coordinate[label={right:$y$}]; + +\foreach \x in {-6,-5,-4,-3,-2,-1}{ + \draw (\x,{-0.1/\skala}) -- (\x,{0.1/\skala}); + \node at (\x,0) [above] {$\x$}; +} +\draw (1,{-0.1/\skala}) -- (1,{0.1/\skala}); +\node at (1,0) [below] {$1$}; +\foreach \y in {1,...,5}{ + \draw ({-0.1/\skala},\y) -- ({0.1/\skala},\y); + \node at (0,\y) [left] {$\y$}; +} + +\begin{scope} +\clip (-6,-0.5) rectangle (2,4.8); + +\draw[color=red,line width=1.4pt] + plot[domain=-1:2,samples=100] ({\x},{\x*exp(\x)}); +\draw[color=blue,line width=1.4pt] + plot[domain=-6:-1,samples=100] ({\x},{\x*exp(\x)}); + +\end{scope} + +\fill[color=violet] (-1,{-exp(-1)}) circle[radius=0.04]; +\node[color=violet] at (-1,{-exp(-1)}) [below] + {$\displaystyle f(-1) = -\frac{1}{e}$}; + +\end{tikzpicture} +\end{document} + -- cgit v1.2.1