demo/eos.R

library(oce);
cat("Some test cases; see Appendix of Gill's textbook...\n")
print(inSituDensity <- swRho(35, 13, 1000))
print(sig <- swSigma(35, 13, 1000))
print(tPotential <- swTheta(35, 13, 1000))
print(sigT <- swSigmaT(35, 13, 1000))
print(sigTheta <- swSigmaTheta(35, 13, 1000))
print(spice <- swSpice(35, 13, 1000))

Try the oce package in your browser

Any scripts or data that you put into this service are public.

oce documentation built on Oct. 4, 2018, 5:04 p.m.