x<-"2024.12" 
as.numeric(x)+1



x<-"The price is $25.12"
as.numeric(x)