如果想删除指定元素的行，可以先在WPS Excel中进行操作，然后导入R程序中。
data <- read.table("babies.txt", header=TRUE)（irreg.index <- which(data$smoke == 9) #这个是你要标出的错误数据？
data.irregular <- data[irreg.index,] #这个结果就是错误的行
data.irregular #找出错误数据）
data.right=data[!irreg.index,] #这个结果，data.right 就是没有错误的行
