这个样写有什么问题么？结果是：（Error: object 'list_1' not found）
#分列
GOODSTYPE_fenlie<- strsplit((mydata$GOODSTYPE),",")
#对分的列命名形成新的列
for(i in 1:26) list_i<-sapply(GOODSTYPE_fenlie,"[",i)