Adding a dash to a string

Question

i think I have a simple question, but I did not get it. I have something like this:

df <- data.frame(identifier = c("9562231945200505501901190109-5405303
", "190109-8731478", "1901098260031", " 
.9..43675190109-3690341", "-1103214010200000190109-8841419", "-190109-5232506-.08001234-111",
                                "190109-2018362-","51770217835901218103304190109-9339765
"), true_values = c("190109-5405303","190109-8731478","190109-8260031","190109-3690341","190109-8841419",
                    "190109-5232506","190109-2018362","190109-9339765"))

I used the following function and it almost worked, but I do not know how too avoid the last dash.

I tried str_replace and sth else, but it did not work.

You are suggesting two different replacements here. Can you show us _all_ of your expected inputs along with the expected outputs? — Tim Biegeleisen, Sep 09 '20 at 10:15
Please explain the logic of the output that you want to have. It would be helpful if you share a 5-10 reproducible example along with their expected output. — Ronak Shah, Sep 09 '20 at 10:17
Start with `strsplit(gsub("\\D", "", "190244 - 974452568"), "")`. — jay.sf, Sep 09 '20 at 10:30

score 0 · Accepted Answer · answered Sep 09 '20 at 11:17

You can try substr with paste after removing unwanted parts with gsub.

tt <- gsub("-\\..*", "", df$identifier)
tt <- gsub("[^0-9]", "", tt)
tt <- substring(tt, nchar(tt)-12)
paste0(substr(tt, 1, 6), "-", substring(tt, 7))
#[1] "190109-5405303" "190109-8731478" "190109-8260031" "190109-3690341"
#[5] "190109-8841419" "190109-5232506" "190109-2018362" "190109-9339765"

Adding a dash to a string

1 Answers1