英文:
Convert string containing roman numerals to numeric using R
问题
当前输出：
3 2 3 3 2 5
期望输出：
2 1 2 2 1 4
英文:
I want to convert "stage i", "stage ii", etc to numeric "1" and "2".
pheno_df$pathologic_stage <- gsub("stage ","",pheno_df$pathologic_stage)
as.numeric(factor(pheno_df$pathologic_stage))
Current output:
3 2 3 3 2 5
Desired output:
2 1 2 2 1 4
Data sample:
> dput(pheno_df$pathologic_stage)
c("stage ii", "stage i", "stage ii", "stage ii", "stage i", "stage iv",
答案1
得分: 3
提取数字部分，然后转换为罗马数字，再转换回数字：
v <- c("stage ii", "stage i", "stage ii", "stage ii", "stage i", "stage iv")
as.numeric(as.roman(gsub("stage ", "", v)))
#[1] 2 1 2 2 1 4
英文:
Extract the numeral part, then convert to roman and back to numeric:
v <- c("stage ii", "stage i", "stage ii", "stage ii", "stage i", "stage iv")
as.numeric(as.roman(gsub("stage ", "", v)))
#[1] 2 1 2 2 1 4
通过集体智慧和协作来改善编程学习和解决问题的方式。致力于成为全球开发者共同参与的知识库，让每个人都能够通过互相帮助和分享经验来进步。
评论