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

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")

或

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