oxtox {scuba} | R Documentation |
Computes pulmonary oxygen toxicity dose for a given dive profile and breathing gas (air or nitrox).
oxtox(d)
d |
The dive profile. An object of class "dive" .
|
Computes the total dose of pulmonary oxygen toxicity from the given dive profile, by
integral of ((ppO2 - 0.5)/0.5)^0.83 dt
The maximum tolerable dose per day is usually reckoned as 1500 OTU. Allowing 650 OTU for recompression therapy implies a working maximum of 850 OTU per day.
The pulmonary oxygen toxicity dose in OTU.
Not applicable to altitude dives. Not applicable to gas mixtures other than nitrox (oxygen-nitrogen mixtures).
Adrian Baddeley adrian@maths.uwa.edu.au http://www.maths.uwa.edu.au/~adrian/
# Nitrox II (36% oxygen) at 30 metres for 27 minutes d <- dive(nitrox(0.36), c(30,27)) oxtox(d) # Same as above, followed by safety stop on 100% oxygen d <- dive(nitrox(0.36), c(30,27),5, nitrox(1), c(5,5)) oxtox(d)