如何从文本文件中提取第一行？

Question

我有一个我读过的文本文件：

file=read.table("file.txt",skip="1",sep="")

此文本文件的第一行包含有关该文件的信息，然后是观察结果。

我想提取第一行并将其写入新的文本文件。

Answer 1

要阅读文件的第一行，您可以执行以下操作：

con <- file("file.txt","r")
first_line <- readLines(con,n=1)
close(con)

要写出来，有很多选择。这是一个：

cat(first_line,file="first_line.txt")

Answer 2

另一种方法是使用read.table（）这样读取它：

read.table(file = 'file.txt',header = F,nrows = 1)

这是一种简单的方法，您可以将数据分为几列，从而更易于使用。

Answer 3

要写出来，有很多选择。

cat(first_line,file="first_line.txt")

OR

read.table(file = 'file.txt',header = F,nrows = 1)