Getting rid of extra periods - cleaning data using R

Question

I have the following data

1) 100      |  101.25  | 102.25. | .   | .. | 201.5. |
2) 200.05.  |  200.56. | 205     | ..  | .  | 3000   |
3) 300.98   |  300.26. | 2001.56.| ... | 0.2| 5.65.  |

Expected output

1) 100   | 101.25   | 102.25  |NA | NA |201.5
2) 200.05|200.26    | 205     |NA | NA |3000
3) 300.98|300.26    |2001.26  |NA |0.2 |5.65

Answer 1

Just try removing the periods using sub function 

x <- c("101.25", "200.56.", "300.26")
x <- sub("\\.$", "", x)