maodao x <-c("谷物及其制品(不包括焙烤制品)_谷物碾磨加工品_其他去壳谷物_小米" , "谷物及其制品(不包括焙烤制品)_谷物碾磨加工品_其他去壳谷物_大麦米" , "谷物及其制品(不包括焙烤制品)_谷物碾磨加工品_其他去壳谷物_糯米" , "谷物及其制品(不包括焙烤制品)_谷物碾磨加工品_大米" ) 我想将x以_字符,分成多个列。 使用str_split(x, '_'),结果为多个列表,不知道如何提取每个列表的第一项组成新的一列。