Learn R Programming

scuba (version 1.1-5)

oxtox: Pulmonary Oxygen Toxicity

Description

Computes pulmonary oxygen toxicity dose for a given dive profile and breathing gas (air or nitrox).

Usage

oxtox(d)

Arguments

d
The dive profile. An object of class "dive".

Value

  • The pulmonary oxygen toxicity dose in OTU.

Warnings

Not applicable to altitude dives. Not applicable to gas mixtures other than nitrox (oxygen-nitrogen mixtures).

Details

Computes the total dose of pulmonary oxygen toxicity from the given dive profile, by $$\int_0^T \left( \frac{\mbox{ppO}_2 - 0.5}{0.5} \right)^{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.

See Also

ead, eadtable, mod, maxmix

Examples

Run this code
# 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)

Run the code above in your browser using DataLab