adjustUnitPrefix(c("2.psec abc","20 fsec etc"), unit="sec")
x1 <- c("50_amol", "5_fmol","250_amol","100_amol", NA, "500_amol", "500_amol", "1_fmol")
adjustUnitPrefix(x1, unit="mol")
x2 <- c("abCc 500_nmol ABC", "abEe5_umol", "", "abFF_100_nmol_G", "abGg 2_mol", "abH.1 mmol")
rbind( adjustUnitPrefix(x2, unit="mol", returnType="allText") ,
adjustUnitPrefix(x2, unit="mol", returnType="trim"),
adjustUnitPrefix(x2, unit="mol", returnType=""))
Run the code above in your browser using DataLab