Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/79.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_Substr_Gsub - Fatal编程技术网

在R中删除数据帧中的特定字符

在R中删除数据帧中的特定字符,r,substr,gsub,R,Substr,Gsub,我有如下数据帧 >sample_df dd_mav2_6541_0_10 dd_mav2_12567_0_2 dd_mav2_43_1_341 dd_mav2_19865_2_13 dd_mav2_1_0_1 >sample_df dd_mav2_6541_0 dd_mav2_12567_0 dd_mav2_43_1 dd_mav2_19865_2 dd_mav2_1_0 我需要删除foruth“\”后面的所有数字。我想有如下输出 >

我有如下数据帧

>sample_df
dd_mav2_6541_0_10
dd_mav2_12567_0_2
dd_mav2_43_1_341
dd_mav2_19865_2_13
dd_mav2_1_0_1
>sample_df
    dd_mav2_6541_0
    dd_mav2_12567_0
    dd_mav2_43_1
    dd_mav2_19865_2
    dd_mav2_1_0
我需要删除foruth“\”后面的所有数字。我想有如下输出

>sample_df
dd_mav2_6541_0_10
dd_mav2_12567_0_2
dd_mav2_43_1_341
dd_mav2_19865_2_13
dd_mav2_1_0_1
>sample_df
    dd_mav2_6541_0
    dd_mav2_12567_0
    dd_mav2_43_1
    dd_mav2_19865_2
    dd_mav2_1_0
我尝试了下面的代码,但它只删除了特定数量的字符,而不喜欢上面提到的输出

substr(sample_df,nchar(sample_df)-2,nchar(sample_df))
如何获取输出。

您可以尝试以下方法:

gsub("_\\d+$","",sample_df)
它将删除下划线和字符串末尾的任何数字(至少一个)

使用您的数据:

sample_df <- c("dd_mav2_6541_0_10","dd_mav2_12567_0_2","dd_mav2_43_1_341","dd_mav2_19865_2_13","dd_mav2_1_0_1")

gsub("_\\d+$","",sample_df)
#[1] "dd_mav2_6541_0"  "dd_mav2_12567_0" "dd_mav2_43_1"    "dd_mav2_19865_2" "dd_mav2_1_0"
sample\u df您可以尝试以下方法:

gsub("_\\d+$","",sample_df)
它将删除下划线和字符串末尾的任何数字(至少一个)

使用您的数据:

sample_df <- c("dd_mav2_6541_0_10","dd_mav2_12567_0_2","dd_mav2_43_1_341","dd_mav2_19865_2_13","dd_mav2_1_0_1")

gsub("_\\d+$","",sample_df)
#[1] "dd_mav2_6541_0"  "dd_mav2_12567_0" "dd_mav2_43_1"    "dd_mav2_19865_2" "dd_mav2_1_0"
sample\u df您可以尝试以下方法:

gsub("_\\d+$","",sample_df)
它将删除下划线和字符串末尾的任何数字(至少一个)

使用您的数据:

sample_df <- c("dd_mav2_6541_0_10","dd_mav2_12567_0_2","dd_mav2_43_1_341","dd_mav2_19865_2_13","dd_mav2_1_0_1")

gsub("_\\d+$","",sample_df)
#[1] "dd_mav2_6541_0"  "dd_mav2_12567_0" "dd_mav2_43_1"    "dd_mav2_19865_2" "dd_mav2_1_0"
sample\u df您可以尝试以下方法:

gsub("_\\d+$","",sample_df)
它将删除下划线和字符串末尾的任何数字(至少一个)

使用您的数据:

sample_df <- c("dd_mav2_6541_0_10","dd_mav2_12567_0_2","dd_mav2_43_1_341","dd_mav2_19865_2_13","dd_mav2_1_0_1")

gsub("_\\d+$","",sample_df)
#[1] "dd_mav2_6541_0"  "dd_mav2_12567_0" "dd_mav2_43_1"    "dd_mav2_19865_2" "dd_mav2_1_0"
sample_df
#创建向量(我又添加了一个元素
#最后,少于4件)
示例_df
#创建向量(我又添加了一个元素
#最后,少于4件)
示例_df
#创建向量(我又添加了一个元素
#最后,少于4件)
示例_df
#创建向量(我又添加了一个元素
#最后,少于4件)
样本