“r as.numérico todas las columnas excepto” Código de respuesta

r as.numérico todas las columnas excepto

num.cols <- c('ws','wd','humidity')
weatherDF[num.cols] <- sapply(weatherDF[num.cols], as.numeric)