User Tools

Site Tools


en:hydro:isotopes

Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision
Previous revision
en:hydro:isotopes [2022/06/28 09:37] ckuellsen: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. Many $\alpha$ values can be found at [[https://alphadelta.ggl.ulaval.ca/temp_select_page.html|alphadelta]]
  
-<code S| Fractionation>+<code S| Fractionation.R>
 library(ggplot2) library(ggplot2)
 library(latex2exp) library(latex2exp)
Line 110: Line 110:
  
 </code> </code>
 +
 +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>https://rdrr.io/snippets/embed/ 700,400 scroll noborder|Code}}
  
 ===== 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,1,0.001) fR      <- seq(0.9,1,0.001)
Line 188: Line 194:
 plot(fR,R, type="l") plot(fR,R, type="l")
 </code> </code>
 +
  
/usr/www/users/uhydro/doku/data/attic/en/hydro/isotopes.1656401839.txt.gz · Last modified: 2024/04/10 10:14 (external edit)