筛选变量
medicaldata::blood_storage %>%
select(everything()) %>%
head()
## RBC.Age.Group Median.RBC.Age Age AA FamHx PVol TVol T.Stage bGS BN+
## 1 3 25 72.1 0 0 54.0 3 1 3 0
## 2 3 25 73.6 0 0 43.2 3 2 2 0
## 3 3 25 67.5 0 0 102.7 1 1 3 0
## 4 2 15 65.8 0 0 46.0 1 1 1 0
## 5 2 15 63.2 0 0 60.0 2 1 2 0
## 6 3 25 65.4 0 0 45.9 2 1 1 0
## OrganConfined PreopPSA PreopTherapy Units sGS AnyAdjTherapy AdjRadTherapy
## 1 0 14.08 1 6 1 0 0
## 2 1 10.50 0 2 3 0 0
## 3 1 6.98 1 1 1 0 0
## 4 1 4.40 0 2 3 0 0
## 5 1 21.40 0 3 3 0 0
## 6 0 5.10 0 1 3 0 0
## Recurrence Censor TimeToRecurrence
## 1 1 0 2.67
## 2 1 0 47.63
## 3 0 1 14.10
## 4 0 1 59.47
## 5 0 1 1.23
## 6 0 1 74.70
筛选不连续columns
medicaldata::blood_storage %>%
select(1, bGS:sGS, 3, AA) %>%
head()
## RBC.Age.Group bGS BN+ OrganConfined PreopPSA PreopTherapy Units sGS Age AA
## 1 3 3 0 0 14.08 1 6 1 72.1 0
## 2 3 2 0 1 10.50 0 2 3 73.6 0
## 3 3 3 0 1 6.98 1 1 1 67.5 0
## 4 2 1 0 1 4.40 0 2 3 65.8 0
## 5 2 2 0 1 21.40 0 3 3 63.2 0
## 6 3 1 0 0 5.10 0 1 3 65.4 0
medicaldata::cytomegalovirus %>%
select(ID, age:race, prior.radiation:prior.transplant,
TNC.dose:TBI.dose) %>%
head()
## ID age sex race prior.radiation prior.chemo prior.transplant TNC.dose
## 1 1 61 1 0 0 2 0 18.31
## 2 2 62 1 1 1 3 0 4.26
## 3 3 63 0 1 0 4 0 8.09
## 4 4 33 0 1 1 4 0 21.02
## 5 5 54 0 1 0 5 0 14.70
## 6 6 55 1 1 0 0 0 4.29
## CD34.dose CD3.dose CD8.dose TBI.dose
## 1 2.29 3.21 0.95 200
## 2 2.04 NA NA 200
## 3 6.97 2.19 0.59 200
## 4 6.09 4.87 2.32 200
## 5 2.36 6.55 2.40 400
## 6 6.91 2.53 0.86 200
用逻辑型指令筛选columns
medicaldata::esoph_ca %>%
select(!ncases:ncontrols) %>%
head()
## agegp alcgp tobgp
## 1 25-34 0-39g/day 0-9g/day
## 2 25-34 0-39g/day 10-19
## 3 25-34 0-39g/day 20-29
## 4 25-34 0-39g/day 30+
## 5 25-34 40-79 0-9g/day
## 6 25-34 40-79 10-19