警告:结果列数不是向量长度的倍数(arg 1)

Question

我想分裂一个专栏.我的数据框(menuD)就像

Column1
1|3|4|5
4|5|6|7

我想在column1中拆分数字,所以我这样做了.

menuD <- data.frame (do.call('rbind', strsplit(as.character(myCmenu$myFile.menudata), '|', fixed = TRUE)))

我得到了这样的预期结果

col1 | col2 | col3 | col4
  1  |  3   |  4   | 5
  4  |  5   |  6   | 7

但我收到了来自R的警告信息

> Warning message:
In rbind(c("", "164200", "", "167", "108", "112", "116", "120"),  :
  number of columns of result is not a multiple of vector length (arg 1)

我想知道,这对我的数据有影响吗？所有数据是否正确分开？

Answer 1

根据提供的示例,或者 cSplit

library(splitstackshape)
cSplit(menuD, "Column1", "|")
#   Column1_1 Column1_2 Column1_3 Column1_4
#1:         1         3         4         5
#2:         4         5         6         7

或separate来自tidyr

library(tidyr)
separate(menuD, Column1, into = paste0("col", 1:4))

或者 read.table/read.csv可以使用.

read.table(text=menuD$Column1, sep="|", fill=TRUE, header=FALSE)

但是,OP的帖子中的警告表明"Column1"中可能有少量的元素|.在这种情况下,cSplit或最后一个选项应该工作.