数据框到带有列名的文本文件
Dataframe to text file with column names
我有一个数据框,其中的数据和列比下面显示的要大:
df <- data.frame(A = c(1,2,3),
B = c("DD", "EE", "FF"))
我想将这个数据框转换成一个文本文件,但是这个文件的内容应该是这样的:
A 1
B DD
A 2
B EE
A 3
B FF
您可以使用 mapply
按要求的顺序粘贴数据,然后使用 cat
将其写入文本文件。
cat(paste0(c(t(mapply(paste, names(df), df))),
collapse = '\n'), file = 'result.txt')
您可以试试下面的代码
write.table(
do.call(rbind, lapply(asplit(df, 1), function(x) rev(stack(x)))),
file = "a.txt",
quote = FALSE,
col.names = FALSE,
row.names = FALSE
)
其中 a.txt
包含
A 1
B DD
A 2
B EE
A 3
B FF
我有一个数据框,其中的数据和列比下面显示的要大:
df <- data.frame(A = c(1,2,3),
B = c("DD", "EE", "FF"))
我想将这个数据框转换成一个文本文件,但是这个文件的内容应该是这样的:
A 1
B DD
A 2
B EE
A 3
B FF
您可以使用 mapply
按要求的顺序粘贴数据,然后使用 cat
将其写入文本文件。
cat(paste0(c(t(mapply(paste, names(df), df))),
collapse = '\n'), file = 'result.txt')
您可以试试下面的代码
write.table(
do.call(rbind, lapply(asplit(df, 1), function(x) rev(stack(x)))),
file = "a.txt",
quote = FALSE,
col.names = FALSE,
row.names = FALSE
)
其中 a.txt
包含
A 1
B DD
A 2
B EE
A 3
B FF