Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen der Seite angezeigt.

--- hydro:clasius [2020/06/16 20:22] – ↷ Seitename wurde von hydro:clasiusclapeyon auf hydro:clasius geändert ckuells
+++ hydro:clasius [2020/06/17 08:15] – ckuells
@@ Zeile 3: / Zeile 3: @@
 Der Sättigungsdampfdruck wird mit der Formel von Clasius Clapeyron berechnet.
+<note>
 $$ e_s = 6.11*10^{(7.48*T/(237+T))} [hPa] $$
+</note>
 dabei bedeuten:
@@ Zeile 11: / Zeile 13: @@
 | $e_a$  | aktueller Dampfdruck $[hPa]$          |
 | $T$    | Temperatur in ${ }^\circ$ Celsius     |
+In R kann $e_s$ berechnet werden:
+<code rsplus |Clasius.r>
+T<-seq(0,35,0.5)
+es<-6.11*10^((7.48*T/(237+T)))
+plot(T,es,xlab="Temperatur in Celsius", ylab="Dampfdruck in hPa",
+  xlim=c(0, 35),ylim=c(0, 35), pch=1, lty=1, col="blue", axes=FALSE)
+axis(1, seq(0,35,5))
+axis(2, seq(0,35,5))
+grid (NULL,NULL, lty = 3, col = "grey")
+curve(6.11*10^((7.48*x/(237+x))), add = TRUE)
+</code>
+Eine Funktion zur Berechnung des Sättigungsdampfdruckes in R:
+<code rsplus |Clasius.r>
+es <- function(temp_dC) {
+   temp_dC
+   es<-6.11*10^((7.48*temp_dC/(237+temp_dC)))
+   Einheit <- "hPa"
+   res <- data.frame(es,Einheit)
+   return(res)
+}
+res <- es(15)
+res
+esv <- res[1]
+esu <- res[2]
+esv
+esu
+</code>