我有一个字符串,我只想从中得到数值

> head(temp.list)
  [1] "A01:    24095" "A02:    31130" "A03:    39420" "A04:    41690" "A05:    37430" "A06:    36490"

我可以使用strsplit获取列表

>split.temp.list <- strsplit(temp.list, ":")
>head(split.temp.list)
[[1]]
[1] "A01"       "    24095"

[[2]]
[1] "A02"       "    31130"

然后,要将数字提取到向量中,我要做的是

data.values <- vector()
for (j in 1:length(split.temp.list))
    data.values <- c(data.values, split.temp.list[[j]][2])
> head(data.values)
[1] "    24095" "    31130" "    39420" "    41690" "    37430" "    36490"

是否有一种更有效的子集设置方法来实现最后一步(即创建数据值)?

几年后我又回到了R,所以感谢你帮助我重回正轨!

推荐答案

我们可以使用read.table来提取:之后的数字

> s <- c("A01:    24095", "A02:    31130", "A03:    39420", "A04:    41690", "A05:    37430", "A06:    36490")

> read.table(text = s, sep = ":")$V2
[1] 24095 31130 39420 41690 37430 36490

trimws以下

> as.numeric(trimws(s, whitespace = "^.*\\s"))
[1] 24095 31130 39420 41690 37430 36490

R相关问答推荐

寻找图片边缘

如果行和大于值,则过滤

在for循环中转换rabrame

如何直接从R中的风险分数计算c指数?

当月份额减go 当月份额

在连续尺度上转置标签[瀑布图,R]

使用`Watch()`和`renderUI()`时,不再满足仍出现在SHILINY AFTER条件中的条件输入

R中有约束的优化问题:如何用复数和对数效益函数解决问题?

将箭头绘制在图形外部,而不是图形内部

调换行/列并将第一行(原始数据帧的第一列)提升为标题的Tidyr类似功能?

如何计算R glm probit中的线性预测因子?

防止在更新SHINY中的Reactive Value的部分内容时触发依赖事件

是否可以将线性模型的p值添加到tbl_summary中

Conditional documentr::R中数据帧的summarize()

按两个条件自动过滤数据

如何在不使用SHINY的情况下将下拉滤镜列表添加到ggploy?

如何创建直方图与对齐的每月箱?

使用循环改进功能( struct 简单)

Gg森林未显示其中一个变量的引用组

使用字符串指定data.table列(S)