R типа всех столбцов

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