定义和处理函数R的特定Na值

Question

我目前正在用R编写一个函数。除此之外，我需要将某些字符定义为NA。

从头开始

file <- readLines("/Users/debraragland/file.txt")
relines <- gsub("\\Frame.+$|\\Chain.+$|\\ATOM-WISE.+$", "", file)

离开＆＃34;＆＃34;和＆＃34; ＆＃34 ;.如果我在提示符处执行每一步，我必须定义并省略这些作为NAs两次

relines[relines==""] <- NA
relines <-na.omit(relines)

relines[relines==" "] <- NA
relines <- na.omit(relines)

我有什么方法可以将这些组合成一个，可能是if语句吗？

Answer 1

我认为这会做你想做的事情：

relines[relines == "" | relines == " "] <- NA
relines <- na.omit(relines[!(relines == "" | relines == " ")])

Answer 2

relines <- relines[relines != "" | relines != " "]