en:hydro:isotopes
Differences
This shows you the differences between two versions of the page.
Both sides previous revisionPrevious revisionNext revision | Previous revision | ||
en:hydro:isotopes [2022/06/28 09:37] – ckuells | en:hydro:isotopes [2024/04/10 10:02] (current) – external edit 127.0.0.1 | ||
---|---|---|---|
Line 29: | Line 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) | ||
Line 110: | Line 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 ===== | ||
Line 158: | Line 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){ | ||
Line 181: | Line 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, | ||
Line 188: | Line 194: | ||
plot(fR,R, type=" | plot(fR,R, type=" | ||
</ | </ | ||
+ | |||
/usr/www/users/uhydro/doku/data/attic/en/hydro/isotopes.1656401839.txt.gz · Last modified: 2024/04/10 10:14 (external edit)