上代码:
mydata <- read.csv("mydata.csv", header = TRUE, encoding = "UTF-8")
dt <- mydata[which(mydata$BoomRest <1),]
dt <- dt[which(dt$Arm6Wugan >=26),]
wirte(dt, "mydata_C6Over26")#输出满足条件的数据保存到csv文件
首先读入数据,然后通过which函数筛选出同时满足条件的数据:
条件1:原始数据里面BoomRest这个值小于1的数值,因为只有0和1,这样就把等于0的数值筛选到dt里面保存起来;
条件2:在条件1下,继续用which函数筛选出数据里面Arm6Wugan这个数值大于等于26的数值,并且保留在dt里面。
可以继续用新的条件,继续用which函数筛选。
在这个里面也可以用 逻辑 与 或,
比如
dt <- dt[which(dt$Arm6Wugan >=26 | dt$Arm6Yougan >=26),]
代表用或关系让两个变量加入有一个满足 ≥26就可以。
以此类推,与关系就是把 符号“|”改成“&”