就是用stringr包里的函数来分隔字符嘛，然后用了一句这个

email <- c('lsxxx2011@163.com','1029776077@qq.com',

'qazwsx@gmail.com','abc123edc@126.com')

# 结合sapply函数获得@分隔符前面和后面的内容

add <- sapply(str_split(email,'@'),'[',1)

doman <- sapply(str_split(email,'@'),'[',2)

运行结果我也懂，分别提取分隔后的第一部分保存在了add里，第二部分保存在了doman里，我就没看懂sapply里的这个 '['  这个到底是什么啊，怎么用啊，谢谢大神