Estimate ventilation dead-space
Estimate ventilation dead-space
deadspace_total(ideal_weight_kg, age_y = NULL, elbow_ml = 10, humidifier_ml = 7, ett_diameter_mm = NULL) deadspace_anatomic(ideal_weight_kg, age_y = NULL) deadspace_anatomic_adult(ideal_weight_kg = NULL) deadspace_anatomic_child(ideal_weight_kg, age_y = NULL) deadspace_intrathoracic_ml(ideal_weight_kg)
ideal_weight_kg |
Ideal weight in kilograms. May be calculated using
|
age_y |
Age in years, optional for estimating ETT and HME sizes automatically |
elbow_ml |
Numeric volume of elbow of breathing circuit in ml |
humidifier_ml |
Numeric volume of humidifier of breathing circuit in ml |
ett_diameter_mm |
Numeric internal diameter of endotracheal tube.
Default is |
'Mean intrathoracic anatomic dead space was 1.03 ml/kg and was not related to age.' Numa, 1985
estimate of anatomic dead-space in ml
deadspace_anatomic: Estimate anatomic dead-space
deadspace_anatomic_adult: Estimate anatomic dead-space in an adult
deadspace_anatomic_child: Estimate anatomic dead-space in an infant or
child
deadspace_intrathoracic_ml: intrathoracic component of dead-space is age
independent
Other respiratory: alveolar_PAO2_mmHg
Other airway equipment: deadspace_things_ml,
ett_size_by_age, ett_vol_ml
height <- seq(1, 2, 0.05)
male <- rep(FALSE, length(height))
iw <- ideal_weight_adult(height_m = height, male = male)
## Not run:
plot(iw, deadspace_anatomic_adult(ideal_weight_kg = height))
## End(Not run)
# discontinuity at age 6 is driven by ideal weight more than the
# lograithmic calculation
iw <- c(seq(12, 18, 0.2), seq(18.5, 24, 0.5))
youngest = 3
oldest = 9
ages <- seq(youngest, oldest, (oldest - youngest) / (length(iw) - 1))
## Not run:
plot(iw, deadspace_anatomic_child(ideal_weight_kg = iw, age_y = ages),
type = "l")
## End(Not run)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.