# NOT RUN {
# species index of Ti-bearing minerals
retrieve("Ti")
# thermodynamic data for those minerals
info(retrieve("Ti"))
# all species that have Au
retrieve("Au")
# all species that have both Au and Cl
retrieve(c("Au", "Cl"))
# Au-Cl system: species that have Au and/or Cl,
# including charged species, but no other elements
retrieve(list("Au", "Cl"))
# all Au-bearing species in the Au-Cl system
retrieve("Au", "Cl")
# all uncharged Au-bearing species in the Au-Cl system
retrieve("Au", "Cl", add.charge = FALSE)
# minerals in the system SiO2-MgO-CaO-CO2
retrieve(list("Si", "Mg", "Ca", "C", "O"), state="cr")
# an Eh-pH diagram for Mn-bearing aqueous species
basis(c("Mn+2", "H2O", "H+", "e-"))
iMn <- retrieve("Mn", c("O", "H"), "aq")
species(iMn)
a <- affinity(pH = c(6, 14), Eh = c(-1, 1))
diagram(a, fill = "terrain")
# }
Run the code above in your browser using DataLab