Question

所以我试图将一列数字转换成一个字符串，然后将每个字符（在这种情况下为数字）写入csv，如下所示。如果有更好的方法来解决我的问题，请告诉我们。

set.seed(123)
x = data.frame(numbers = sample(001:999, replace = F))

numbers
847
95
350
298
682
806
98

到一个只有的文本文件 8479535029862898

到csv文件（END GOAL） 8,4,7,9,6,0,2,9,8,6,2,8,9,8

Answer 1

在R中，我们可以将paste元素放在一起，strsplit整个字符串，方法是将分割指定为""

out <- as.numeric(strsplit(paste(x$numbers, collapse = ""), "")[[1]])

并将其写入文件

cat(out, file = "fileout.txt")

如果我们使用python

import pandas as pd
import numpy as np
x = pd.DataFrame({'numbers': np.random.choice(range(1, 1000), size = 999, replace = True)})
list(map(int, list("".join(map(str, list(x['numbers']))))))

将列合并为平面文件和单独的字符

1 个答案: