CARGA DE LA BASE
library(haven)
hatco <- read_sav("D:/OneDrive/FACEN/Hatco.sav")
str(hatco)
## tibble [100 × 8] (S3: tbl_df/tbl/data.frame)
## $ x1: num [1:100] 4.1 1.8 3.4 2.7 6 1.9 4.6 1.3 5.5 4 ...
## ..- attr(*, "format.spss")= chr "F2.1"
## $ x2: num [1:100] 0.6 3 5.2 1 0.9 3.3 2.4 4.2 1.6 3.5 ...
## ..- attr(*, "format.spss")= chr "F8.1"
## $ x3: num [1:100] 6.9 6.3 5.7 7.1 9.6 7.9 9.5 6.2 9.4 6.5 ...
## ..- attr(*, "format.spss")= chr "F8.1"
## $ x4: num [1:100] 4.7 6.6 6 5.9 7.8 4.8 6.6 5.1 4.7 6 ...
## ..- attr(*, "format.spss")= chr "F8.1"
## $ x5: num [1:100] 2.4 2.5 4.3 1.8 3.4 2.6 3.5 2.8 3.5 3.7 ...
## ..- attr(*, "format.spss")= chr "F8.1"
## $ x6: num [1:100] 2.3 4 2.7 2.3 4.6 1.9 4.5 2.2 3 3.2 ...
## ..- attr(*, "format.spss")= chr "F8.1"
## $ x7: num [1:100] 5.2 8.4 8.2 7.8 4.5 9.7 7.6 6.9 7.6 8.7 ...
## ..- attr(*, "format.spss")= chr "F8.1"
## $ y : num [1:100] 32 43 48 32 58 45 46 44 63 54 ...
## ..- attr(*, "format.spss")= chr "F8.1"