Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/65.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
不等于R中的字符_R - Fatal编程技术网

不等于R中的字符

不等于R中的字符,r,R,打印不等于特定字符的字符串的命令是什么?从下面的数据中,我想打印t5列不以d-开头的行数。(在本例中,这是所有行) 我试过了 尺寸(df[df$t5!=“d-”,])) df: 数据中有一行的t5条目不以“d-”开头。要查找此行,您可以尝试: df[!grepl("^(d-)",df$t5),] # name freq mir start end mism add t5 t3 s5 s3 DB ambiguity #26

打印不等于特定字符的字符串的命令是什么?从下面的数据中,我想打印t5列不以
d-
开头的行数。(在本例中,这是所有行)

我试过了

尺寸(df[df$t5!=“d-”,]))

df:


数据中有一行的t5条目不以“d-”开头。要查找此行,您可以尝试:

df[!grepl("^(d-)",df$t5),]
#               name freq         mir start end mism add  t5 t3       s5       s3    DB ambiguity
#26 seq_100113_x1219 1219 hsa-miR-577    15  36    0   0 u-G  0 AGAGTAGA CCTGATGA miRNA         1
如果您只想知道行号,可以使用
rownames()

或者使用
which()


取决于您希望从数据框顶部开始计算行号还是根据左侧的值计算行号。

数据中有一行的t5条目不以“d-”开头。要查找此行,您可以尝试:

df[!grepl("^(d-)",df$t5),]
#               name freq         mir start end mism add  t5 t3       s5       s3    DB ambiguity
#26 seq_100113_x1219 1219 hsa-miR-577    15  36    0   0 u-G  0 AGAGTAGA CCTGATGA miRNA         1
df1 <- df[!grepl("^d-",df[,8]),]
nrow(df1)
print(df1)
如果您只想知道行号,可以使用
rownames()

或者使用
which()


取决于您希望从数据帧顶部开始计算行号还是根据左侧的值计算行号。

df1
df1尝试
sum(!grepl(“^d-”,df$t5)]
。您不希望检查字符串是否不等于
“d-
”。它们都不是。您要检查的是字符串不是以
“d-
”开头。
grep
grepl
可以用来检查字符串中是否出现了某些模式。查看
?grep
了解更多信息。是的,对不起!最后一个]应该是a)。尝试
sum(!grepl(^d-),df$t5)]
。您不需要检查字符串是否不等于
“d-
”。它们都不等于。您需要检查的是字符串是否以
“d-
开头.
grep
grepl
可用于检查字符串中是否显示某些模式。有关详细信息,请参阅
?grep
。是的,对不起!最后一个]应该是a)。OP实际上想打印行数。很抱歉打扰您。。。他想要的是行数,而不是行号。所以它应该是
nrow(df[!grepl(^(d-),df$t5),])
sum(!grepl(^(d-),df1$t5))
。什么是df1?@Stibu我有另一个脚本运行,df已经在另一个上下文中使用。谢谢你指出这一点。它应该是
df
;我会编辑。如果要求计算行数,您在评论中的回答是正确的,我不想重复。我认为OP的声明“打印行数”留下了一些解释空间。OP实际上想要打印行数。很抱歉打扰您。。。他想要的是行数,而不是行号。所以它应该是
nrow(df[!grepl(^(d-),df$t5),])
sum(!grepl(^(d-),df1$t5))
。什么是df1?@Stibu我有另一个脚本运行,df已经在另一个上下文中使用。谢谢你指出这一点。它应该是
df
;我会编辑。如果要求计算行数,您在评论中的回答是正确的,我不想重复。我认为OP的语句“打印行数”留下了一些解释空间。根据数据的确切外观,您的解决方案可能并不完全正确。OP会询问
t5
不以
“d-”
开头的行,而您的解决方案会捕获
t5
不包含
“d-”
任何位置的所有行。当然,从这个小样本中,我们可能会认为像“ad TG”这样的东西不存在,但我认为使用
“^d-”
作为模式是一个好主意。是的,我完全同意。:)根据数据的确切外观,您的解决方案可能并不完全正确。OP会询问
t5
不以
“d-”
开头的行,而您的解决方案会捕获
t5
不包含
“d-”
任何位置的所有行。当然,从这个小样本中,我们可能会认为像“ad TG”这样的东西不存在,但我认为使用
“^d-”
作为模式是一个好主意。是的,我完全同意。:)
df1 <- df[!grepl("^d-",df[,8]),]
nrow(df1)
print(df1)
df1 <- df[!grepl("^d-",df[,8]),]
nrow(df1)
print(df1)