R 删除 ｜ 之后的所有数据在数据栏

           X A B C D
1     uc001aaa.3              0              0              0              0
2     uc010nxq.1              0              0              0              0
3     uc010nxr.1              0              0              0              0
4  WASH7P|653635            398            319            453            259
5 FAM138F|641702              0              0              0             13
6    OR4F5|79501              0              0              0              0

Data$Test <- sub("\\|+*", "", Data$X)

gsub('\\|.+', '', x)
# [1] "uc001aaa.3" "uc010nxq.1" "uc010nxr.1" "WASH7P"     "FAM138F"    "OR4F5"     

x <- c("uc001aaa.3", "uc010nxq.1", "uc010nxr.1", "WASH7P|653635", 
"FAM138F|641702", "OR4F5|79501")

R相关问答推荐

如何对数据集进行逆向工程？

在发布到PowerBI Service时，是否可以使用R脚本作为PowerBI的数据源？

手动打印线型gplot

删除列表中存储的数据帧内和数据帧之间的重复行

par函数中的缩写，比如mgp，mar，mai是如何被破译的？

如何读取CSV的特定列时，给定标题作为向量

如何基于两个条件从一列中提取行

给定开始日期和月份(数字)，如何根据R中的开始日期和月数创建日期列

根据列表中项目的名称合并数据框和列表

有没有可能用shiny 的书签恢复手风琴面板？

解析嵌套程度极高的地理数据

循环遍历多个变量，并将每个变量插入函数R

使用ifElse语句在ggploy中设置aes y值

R预测包如何处理ARIMA(Auto.arima函数)中的缺失值

如何将宽格式的患者信息数据高效地转换为患者计数的时间序列？

希望解析和复制R中特定模式的数据

如何使用list_rind在列表中保留已命名但不包含第0行的记录？

在一个multiplot中以非对称的方式在R中绘制多个图

在分面的ggplot2条形图中对条形图进行排序，并省略每组未使用的系数级别

带查找数据的FCT_REORDER.帧