如何将1.3445更改为13445、2.4444为24444，并保持1.20不更改

Question

如何将1.3445更改为13445、2.4444为24444，并保持1.20不更改。谢谢！

   md <- data.frame(value=c('1.3445','1.20','2.4444'))

Answer 1

我尝试了以下代码，没关系。在这里就标记

md %>% mutate(value_new=if_else(grepl("([1-9]{1,}).([0-9]{4})",value),
                                str_remove_all(value,'\\.'),value))