R - Coerción de caracter a numeric

datos=read.csv("CARS.csv")

str(datos)

datos[6:7]<-lapply(datos[6:7],as.numeric) #La extracción tiene simbolos de $ y numeros

str(datos)

#Quiero que me arroje los valores de las variables 6 y 7 en numeric pero se cambia todo a NA porque tiene el signo de pesos.