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

tem*_*mor 7 r

我有一个文本文件,我这样读:

file=read.table("file.txt",skip="1",sep="")
Run Code Online (Sandbox Code Playgroud)

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

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

sco*_*coa 13

要读取文件的第一行,您可以执行以下操作:

con <- file("file.txt","r")
first_line <- readLines(con,n=1)
close(con)
Run Code Online (Sandbox Code Playgroud)

要写出来,有很多选择.这是一个:

cat(first_line,file="first_line.txt")
Run Code Online (Sandbox Code Playgroud)