如何操作R中的字符串数字？

Question

我的数据是使用read.table拉入R的一串数字。下面是数据：

20402000224222032203233430020222024422320202234232443443004440404332402220404233302004204202004033420200022204334434044422322400200244044322202200234200424402002224303430023432202220343420323200300022320004223040024342244424040322424340240044220302432400203033300042423340222323200020034043004 

我插入每个数字之间的空间，所以输出看起来更像这样：

2 0 4 0 2 0 0 0.. 

我使用：

exm <- read.csv("string.csv") 
txt<- trimws(gsub("", " ", exm)) 
write.csv(txt, file= "new.csv") 

这仅插入一个空间数字之间。我喜欢单独操纵数字。我不喜欢成为字符串数字。我喜欢将每个数字粘贴到一个excel单元格中。

Answer 1

我认为这是你所追求的。 strsplit允许您使用较短的字符串解析一个长字符串，或者在这种情况下为空字符串，并将结果作为列表返回。

longAssNumber <- "20402000224222032203233430020222024422320202234232443443004440404332402220404233302004204202004033420200022204334434044422322400200244044322202200234200424402002224303430023432202220343420323200300022320004223040024342244424040322424340240044220302432400203033300042423340222323200020034043004" 

numberVector <- as.numeric(strsplit(longAssNumber, "")[[1]]) 

write.csv(numberVector, "number.csv")