El dolor es medido en una escala de 1 a 30 para dos grupos que sufren de dolor crónico–un grupo control y un grupo que está recibiendo una pastilla para el dolor.
sujeto<-paste0("s",1:24) # paste adds a space between the characters
condicion<-c(rep("Control",12),rep("Tratamiento",12))
dolor <- c(14,13,15,14,12,30,16,11,13,14,25,14,
15,12,11,12,12,14,14,10,14,13,10,12)
df <-data.frame(sujeto,condicion,dolor)
df
## sujeto condicion dolor
## 1 s1 Control 14
## 2 s2 Control 13
## 3 s3 Control 15
## 4 s4 Control 14
## 5 s5 Control 12
## 6 s6 Control 30
## 7 s7 Control 16
## 8 s8 Control 11
## 9 s9 Control 13
## 10 s10 Control 14
## 11 s11 Control 25
## 12 s12 Control 14
## 13 s13 Tratamiento 15
## 14 s14 Tratamiento 12
## 15 s15 Tratamiento 11
## 16 s16 Tratamiento 12
## 17 s17 Tratamiento 12
## 18 s18 Tratamiento 14
## 19 s19 Tratamiento 14
## 20 s20 Tratamiento 10
## 21 s21 Tratamiento 14
## 22 s22 Tratamiento 13
## 23 s23 Tratamiento 10
## 24 s24 Tratamiento 12