1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
\begin{tikzpicture}
\pgfmathsetmacro{\a}{8000}
\pgfmathsetmacro{\b}{.9}
\pgfmathsetmacro{\R}{8.313}
\pgfmathsetmacro{\n}{1}
\pgfmathsetmacro{\T}{247}
\pgfmathsetmacro{\dT}{30}
\begin{axis}[
width = \linewidth,
height = 6cm,
ylabel = Druck \(p(V)\),
xlabel = Volumen \(V\),
ytick = {0}, xtick = {1},
yticklabels = {0},
xticklabels = {},
ymax = 1000,
samples = 200,
domain = 1:15,
]
\pgfplotsinvokeforeach{0,1,2,...,6}{
\addplot[gray, variable=\V]
{(\n*\R*(\T+#1*\dT))/(\V-\n*\b)-(\n^2*\a)/(\V^2)};
}
\addplot[thick,red]{0};
\end{axis}
\end{tikzpicture}
|
