r tipe semua kolom

sapply(my.data, class)
        y        x1        x2        X3 
"numeric" "integer" "logical"  "factor"
Bowhaven