3.1. Datos precargados

Para acceder a los datos precargados se utiliza la funcion data()

#data()
datos1=AirPassengers
plot(datos1)

Interpretar: Los datos de la grafica demuestran que tiene una tendencia creciente en esta se ve que los valores suben de 100 en los años 1945 aproximadamente a 600 entre los años 1965, tambien este no tiene un ciclo largo si no variariones mas cortas. Tiene una estacionalidad clara ya que el patron se repite cada año con picos y caidas similares. Tambien es de modelo multiplicativo por su amplitud en las oscilaciones y por ende aumenta conforme sube la tendencia, los picos y valles se hacen mas grandes a medida que el valor medio sube.

datos2=co2
plot(datos2)

Interpretar: El grafico demuestra que es de Tendencia Creciente y muy estable comenzando del valor 315 aproximadamete en 1960 hasta alrededor de 370 en los años 1990, este no cuenta con ciclos largos las variaciones simples son las oscilaciones estacionales regulares. Si cuenta con estacionalidad marcada o un patron repetitivo anual muy similar en todo el periodo, es de modelo aditivo la amplitud de las oscilaicones es practicamente constante a lo largo del tiempo aunque el nivel medio de la serie sube.

3.2. Importar y exportar datos de otras fuentes

para exportar datos en .csv

datos3=iris
write.csv(datos3,"datos iris.csv")
#getwd()

para leer un archivo excel previamente se debe installer la libreria readxl

#install.packages("readxl")
#install.packages("writexl")
library(readxl)
## Warning: package 'readxl' was built under R version 4.5.1
library(writexl)
## Warning: package 'writexl' was built under R version 4.5.1
datos4=read_excel("regresion lineal simple.xlsx",sheet =2)
datos4
## # A tibble: 5 × 2
##   `Consumo del bien A` `Consumo del bien B`
##                  <dbl>                <dbl>
## 1                    1                  4  
## 2                    2                  3.5
## 3                    3                  2.8
## 4                    4                  1.9
## 5                    5                  0.8
datos5=read_excel("variable ficticia - copia.xlsx",sheet = 1)
## New names:
## • `` -> `...4`
datos5
## # A tibble: 7 × 5
##   ingreso sexo   educacion  ...4  `series hombre=sexo="Hombre"`               
##     <dbl> <chr>  <chr>      <lgl> <chr>                                       
## 1     800 Hombre Secundaria NA    "series mujer=sexo=\"Mujer\""               
## 2     500 Mujer  Primaria   NA    "series primaria=educacion=\"Primaria\""    
## 3     200 Mujer  Primaria   NA    "series secundaria=educacion=\"secundaria\""
## 4    4500 Mujer  Superior   NA    "series suyperior=educacion=\"superior\""   
## 5    5000 Hombre Superior   NA    "ls ingreso c mujer"                        
## 6    1250 Mujer  Secundaria NA    "series mujer=sexo=\"Mujer\""               
## 7    1500 Hombre Superior   NA    "ls ingreso c mujer"