how to split digits with decimal points and letters in R

Question

I have date like the following A<-c(-0.00023--0.00243unitincrease,-0.00176-0.02176pmol/Lincrease(replication),0.00180-0.01780%varianceunitdecrease)

I want to extra