001、
dat <- c("a", "k", "a", "b", "q") ## 测试字符串向量 grep("a", dat) ## grep匹配字符串,返回索引值 grepl("a", dat) ## grepl匹配字符串, 返回向量中匹配的布尔值