在R中使用bash获取行号

Question

使用

system(paste("wc -l file_1.txt"))

在R中获取文件的行号 输出是

1601 文件_1.txt

我的问题是，如果我输入 系统（粘贴（“wc -l file_1.txt”））->kt 然后

kt
[1] 0 

我需要能够说是否

system(paste("wc -l file_1.txt"))->kt
kt[1]==1600 

或者没有..但是我无法从系统命令或打印输出中访问元素...我怎样才能以某种方式检查文件是否有 1600 行而不先将其读入 R...

Answer 1

system默认只返回你的命令的返回值，你需要使用它的intern参数：

system(paste("wc -l banner.p"), intern=T)->kt

kt 将是一些类似的字符串

<lines> <filename>

然后你就可以解析字符串了。