u1a2

library(readr)
library(DT)

setwd("~/R Scripts")
datos <- read_csv("datos.csv")

## 
## -- Column specification --------------------------------------------------------
## cols(
##   viajar = col_double(),
##   vacaciones = col_double()
## )

datatable(datos)

boxplot(datos)

cor(datos)

##            viajar vacaciones
## viajar          1         NA
## vacaciones     NA          1

Conclusion Parece que los datos apenas pudieran relacionarse sin embargo no lo estan