EPIDURAL {PASWR} | R Documentation |
Traditional Sitting Position Versus Hamstring Stretch Position
Description
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)
Format
A data frame with 85 observations on the following 7 variables:
- Doctor
a factor with levels
Dr. A
,Dr. B
,Dr. C
, andDr. D
- kg
weight in kg of patient
- cm
height in cm of pateint
- Ease
a factor with levels
Difficult
,Easy
, andImpossible
indicating the physician's assessment of how well bone landmarks can be felt in the patient- Treatment
a factor with levels
Hamstring Stretch
andTraditional Sitting
- OC
number of obstructive contacts
- Complications
a factor with levels
Failure - person got dizzy
,Failure - too many OCs
,None
,Paresthesia
, andWet Tap
Source
Ugarte, M. D., Militino, A. F., and Arnholt, A. T. (2008) Probability and Statistics with R. Chapman & Hall/CRC.
Examples
EPIDURAL$Teasy <- factor(EPIDURAL$Ease,
levels = c("Easy", "Difficult", "Impossible"))
X <- table(EPIDURAL$Doctor, EPIDURAL$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))
rm(X)