R:将列中的最后3个零替换为K
R:将列中的最后3个零替换为K
提问于 2019-05-31 10:21:50
我试图在dataframe的列中用K替换最后的3000。
例：
data <- data.frame(abc = c(1000, 100000, 450000))
abc <- 1000
then abc <- 1K
if
abc <- 100000
then abc <- 100Kgsub或regex替换前3个零。
我试过这个：
lapply(data$abc, gsub, pattern = "000", replacement = "K", fixed = TRUE)此外，如何使它在间隔时间内工作，例如：
data <- data.frame(abc = c("150000-250000", "100000-150000", "250000K+"))回答 2
Stack Overflow用户
回答已采纳
发布于 2019-05-31 10:23:58
一个选项是在1000中使用%/%并粘贴"K“
library(dplyr)
library(stringr)
data %>%
mutate(abc = str_c(abc %/% 1000, "K"))或者使用sub，匹配字符串末尾的3个零($)，然后用"K"替换
options(scipen = 999)
sub("0{3}$", "K", data$abc)
#[1] "1K" "100K" "450K"如果有不同的字符串具有间隔，则将模式更改为在末尾($)或在-之前匹配3个零，并将其替换为"K“
gsub("0{3}(?=-|$)", "K", "150000-250000", perl = TRUE)
#[1] "150K-250K"Stack Overflow用户
发布于 2019-05-31 10:27:33
下面是对代码的轻微修改。format是关闭科学符号。sapply使输出成为向量。000$的意思是只匹配那些在结尾。
data <- data.frame(abc = c(1000, 100000, 450000))
data$abc <- format(data$abc, scientific = FALSE)
gsub(pattern = "000$", replacement = "K", data$abc)
# [1] " 1K" "100K" "450K"页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/56400052
复制相关文章
点击加载更多
相似问题
如何在VBA中从一个表中获取大数据并插入到另一个表中？
从一个表中获取数据，并将数据插入到另一个表中。
如何从一个表中检索数据并插入到另一个表中？
如何在MongoDB中从一个表中选择数据并插入到另一个表中
插入到一个表中，获取id并插入到另一个表中
添加站长 进交流群
领取专属 10元无门槛券
AI混元助手 在线答疑
关注 腾讯云开发者公众号
洞察 腾讯核心技术
剖析业界实践案例
腾讯云开发者
