从数字列向量中提取逗号前的两位数
Extraction of the two digits before comma from numeric column vector
我有一个作为列向量的模拟价格序列。由此，我需要提取逗号前的两位数字，不进行四舍五入，即价格 1,287.85 中的 87 和价格 234.13 中的 34，并将它们存储在另一个列向量中。
例子
str1 <- c("1,287.85", "234.13")
期望的输出
str2 <- c("87", "34")
我们可以使用str_extract
library(stringr)
as.numeric(str_extract(str1, "\d{2}(?=\.)"))
#[1] 87 34
数据
str1 <- c("1,287.85", "234.13")
可以先用as.integer(yournumber)去掉小数部分再用模100运算：
a = 1287.54
as.integer(a) %% 100
#[1] 87
我有一个作为列向量的模拟价格序列。由此，我需要提取逗号前的两位数字，不进行四舍五入，即价格 1,287.85 中的 87 和价格 234.13 中的 34，并将它们存储在另一个列向量中。
例子
str1 <- c("1,287.85", "234.13")
期望的输出
str2 <- c("87", "34")
我们可以使用str_extract
library(stringr)
as.numeric(str_extract(str1, "\d{2}(?=\.)"))
#[1] 87 34
数据
str1 <- c("1,287.85", "234.13")
可以先用as.integer(yournumber)去掉小数部分再用模100运算：
a = 1287.54
as.integer(a) %% 100
#[1] 87