r as.Numeric wszystkie kolumny, z wyjątkiem

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