en:hydro:isotopes
Unterschiede
Hier werden die Unterschiede zwischen zwei Versionen der Seite angezeigt.
| Beide Seiten, vorherige ÜberarbeitungVorherige ÜberarbeitungNächste Überarbeitung | Vorherige Überarbeitung | ||
| en:hydro:isotopes [2022/06/28 09:37] – ckuells | en:hydro:isotopes [2024/04/10 10:02] (aktuell) – Externe Bearbeitung 127.0.0.1 | ||
|---|---|---|---|
| Zeile 29: | Zeile 29: | ||
| $$\delta { }^{18}O = \frac{R_{Standard}-R_{Probe}}{R_{Standard}} \cdot 1000 $$ | $$\delta { }^{18}O = \frac{R_{Standard}-R_{Probe}}{R_{Standard}} \cdot 1000 $$ | ||
| - | Hence, once the isotope ratio $R_{Probe}$ has been calculated, it can be converted to a $\delta$ value using that relationship. | + | Hence, once the isotope ratio $R_{Probe}$ has been calculated, it can be converted to a $\delta$ value using that relationship. |
| - | <code S| Fractionation> | + | <code S| Fractionation.R> |
| library(ggplot2) | library(ggplot2) | ||
| library(latex2exp) | library(latex2exp) | ||
| Zeile 110: | Zeile 110: | ||
| </ | </ | ||
| + | |||
| + | If you do not have R or your computer or do not want to install it now, you can use the window below to run the code online. Just copy the R code in the (grey) block and insert it into the window. The example code can be deleted. | ||
| + | |||
| + | {{url> | ||
| ===== Non-equilibrium fractionation ===== | ===== Non-equilibrium fractionation ===== | ||
| Zeile 158: | Zeile 162: | ||
| An application of this stepwise calculation indicates that the evaporation slope approaches the theoretical value for equilibration with increasing humidity. At the lowest possible humidity, the slope of the evaporation line is between 4.4 at lower temperatures and 3.4 at high temperatures in dry ambient air. | An application of this stepwise calculation indicates that the evaporation slope approaches the theoretical value for equilibration with increasing humidity. At the lowest possible humidity, the slope of the evaporation line is between 4.4 at lower temperatures and 3.4 at high temperatures in dry ambient air. | ||
| - | <code S| Diffuse> | + | <code S| Diffuse.R> |
| hum = 0.8 | hum = 0.8 | ||
| diffusefrac <- function(humidity = 0.8){ | diffusefrac <- function(humidity = 0.8){ | ||
| Zeile 181: | Zeile 185: | ||
| $$R = R_0 \cdot f^{\left(\alpha-1\right)}$$ | $$R = R_0 \cdot f^{\left(\alpha-1\right)}$$ | ||
| - | <code S|Rayleigh> | + | Code for Rayleigh fractionation. Please not that it requires the function equilibrium that is provided above. To run this code, you can add it to the first block of code at the bottom and execute the entire block - the function is then available. |
| + | |||
| + | <code S| Rayleigh.R> | ||
| alpha18O <- equilibrium(10)$alpha18O | alpha18O <- equilibrium(10)$alpha18O | ||
| fR <- seq(0.9, | fR <- seq(0.9, | ||
| Zeile 188: | Zeile 194: | ||
| plot(fR,R, type=" | plot(fR,R, type=" | ||
| </ | </ | ||
| + | |||
/usr/www/users/uhydro/doku/data/attic/en/hydro/isotopes.1656401839.txt.gz · Zuletzt geändert: 2024/04/10 10:14 (Externe Bearbeitung)