Tengo un df de este estilo
x <- data.frame(col=c("X 100", "X 200", "casa", "B", "X 150", "C","X234"))
col
1 X 100
2 X 200
3 casa
4 B
5 X 150
6 C
7 X234
Donde aparece X+ número quiero poner un guión entre ellos de forma que quede así
col
1 X-100
2 X-200
3 casa
4 B
5 X-150
6 C
7 X-234
Hago lo siguiente:
library("stringr")
x$col2 <-str_replace(x$col, "(\\X)(\\d{3})","\\1-\\2")
col col2
1 X 100 X -100
2 X 200 X -200
3 casa casa
4 B B
5 X 150 X -150
6 C C
7 X234 X-234
Y se me queda ese espacio en blanco entreen medio que no consigo quitar.