数据框到带有列名的文本文件

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