Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/powerbi/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 将表输出写入单行_R - Fatal编程技术网

R 将表输出写入单行

R 将表输出写入单行,r,R,我用read.table将一个表读入R V1 [1,] "POS" [2,] "38500002" [3,] "38500010" [4,] "38500069" [5,] "38500145" [6,] "38500187" 我需要将其写入文件,但都在一行中: “POS”38500002“385000010”… 我该怎么做呢?如果您有data.frame df<-data.frame(V1=c("POS","38500002","38500010","38500069", "

我用
read.table
将一个表读入R

     V1
[1,] "POS"
[2,] "38500002"
[3,] "38500010"
[4,] "38500069"
[5,] "38500145"
[6,] "38500187"
我需要将其写入文件,但都在一行中:

“POS”38500002“385000010”…


我该怎么做呢?

如果您有data.frame

df<-data.frame(V1=c("POS","38500002","38500010","38500069", "38500145", "38500187"), stringsAsFactors=F)

应该很好。我使用
paste
获取所有术语的报价。您必须退出报价才能打印。然后,
cat
允许您将输出直接发送到文件

您显示的数据可能不是
read.table
的直接结果,因为read.table创建了一个
data.frame
,而您显示的是一个
矩阵
(从行名称判断)

无论哪种方式,如果是单列,您都可以对转置后的数据使用
write.table
,因为转置会强制数据以矩阵形式出现。如果要将其写入文件,请使用
file
参数

## read in the data
> dat <- read.table(h=T, text = 'V1
 "POS"
 "38500002"
 "38500010"
 "38500069"
 "38500145"
 "38500187"')

> write.table(t(dat), col.names = FALSE, row.names = FALSE)
## "POS" "38500002" "38500010" "38500069" "38500145" "38500187"
##读入数据
>dat write.table(t(dat),col.names=FALSE,row.names=FALSE)
##“位置”“38500002”“38500010”“38500069”“38500145”“38500187”

欢迎使用Stackoverflow-请发布您的数据文件示例以及您用来阅读的代码,以便人们能够帮助您
## read in the data
> dat <- read.table(h=T, text = 'V1
 "POS"
 "38500002"
 "38500010"
 "38500069"
 "38500145"
 "38500187"')

> write.table(t(dat), col.names = FALSE, row.names = FALSE)
## "POS" "38500002" "38500010" "38500069" "38500145" "38500187"