EPIDURAL {PASWR} | R Documentation |
Initial results from a study to determine whether the traditional sitting position or the hamstring stretch position is superior for administering epidural anesthesia to pregnant women in labor as measured by the number of obstructive (needle to bone) contacts (OC)
EPIDURAL
A data frame with 85 observations on the following 7 variables:
Doctor
Dr. A
, Dr. B
,
Dr. C
, and Dr. D
kg
cm
Ease
Difficult
, Easy
,
and Impossible
indicating the physician's assessment of how well bone
landmarks can be felt in the patientTreatment
Hamstring Stretch
and Traditional Sitting
OC
Complications
Failure - person got dizzy
, Failure - too many OCs
,
None
, Paresthesia
, and Wet Tap
Ugarte, M. D., Militino, A. F., and Arnholt, A. T. (2008) Probability and Statistics with R. Chapman & Hall/CRC.
attach(EPIDURAL) Teasy <- factor(Ease,levels=c("Easy","Difficult","Impossible")) X <- table(Doctor, Teasy) X par(mfrow=c(2,2)) # Figure 2.12 barplot(X, main="Barplot where Doctor is Stacked \n within Levels of Palpitation") barplot(t(X), main="Barplot where Levels of Palpitation \n is Stacked within Doctor") barplot(X, beside=TRUE, main="Barplot where Doctor is Grouped \n within Levels of Palpitation") barplot(t(X), beside=TRUE, main="Barplot where Levels of Palpitation \n is Grouped within Doctor") par(mfrow=c(1,1)) detach(EPIDURAL)