Если вы хотите убрать «нецифровый символ» перед цифрами, вы можете использовать некоторые регулярные выражения
a <- "* 3.45"
b <- "%$aqs -3.45"
gsub("^[^0-9.-]+", "", a)
# [1] "3.45"
gsub("^[^0-9.-]+", "", b)
# [1] "-3.45"
здесь мы удаляем в начале строки все, что не является цифрой, десятичной точкой или знаком минус.