Font size
  • A-
  • A
  • A+
Site color
  • R
  • A
  • A
  • A
Skip to main content
EVA PUCE EV 2025-2025 EVA PUCE EV 2025-2025
  • Home
  • More
English ‎(en)‎
English ‎(en)‎ Español - Internacional ‎(es)‎
You are currently using guest access
Log in
Home

C2T1 - Estadística descriptiva

  1. QUI/65/202501/V/EV/NV01/NV01-01-10/N0173-05/5027/TPR
  2. C2T1 - Estadística descriptiva
Completion requirements
Make a submission
Opened: Monday, 2 June 2025, 8:00 PM
Due: Sunday, 15 June 2025, 11:59 PM

Tema

Estadística descriptiva 

Instrucciones

Requerimientos previos:

Cargar los paquetes ggplot2 , reshape2 y scales a su ambiente de R , dentro del paquete ggplot2 reside el dataset economics. Cargar el dataset.

Entienda el significado de cada variable del dataset.

¡Accede aquí!"

DESARROLLO

  1. Obtenga y presente la matriz de correlación de este dataset entre pares de variables del dataset economics y elabore un comentario de cuales variables están relacionadas, si la relación es positiva o negativa y la fuerzas de la relación.
  2. Conteste las siguientes preguntas:
  3. Es verdad que si aumenta el desempleo el nivel de consumo personal disminuye

    Es verdad que si aumenta el desempleo el nivel de ahorros baja

    Es verdad que si aumenta la población el nivel de consumo aumenta

    Cuál es la covarianza entre el número de desempleados y el tiempo promedio que está desempleado

    Necesitamos entender el porcentaje de desempleados en función de la población para esto cree una nueva variable llamada pdes

    Indique el valor máximo y mínimo de esta nueva variable

    Indique en que fecha se obtuvieron dichos valores (programáticamente)

  4. Presente un diagrama de calor para visualizar la correlación mediante la ejecución del siguiente snippet. Emita un comentario sobre lo que se observa.
  5. econ_melted <- melt(matriz_de_correlacion, varname=c("X","Y"),value.name="Correlacion")

    econ_melted

    class(econ_melted)

    #ahora le ploteamos como mapa de calor

    #antes le ordenamos para que nos salga bonito el grafico

    econ_melted <- econ_melted[order(econ_melted$Correlacion),]

    ggplot(econ_melted, aes(x=X , y=Y)) +

    geom_tile(aes(fill=Correlacion))+

    scale_fill_gradient2(low=muted("red"), mid="white" ,

    high="steelblue")+

    theme_minimal() +

    labs(x=NULL , y=NULL)


Previous activity C1C1 - Cuestionario
Next activity C2C1 - Cuestionario Clase 02
PUCE Virtual Logo

CAMPUS VIRTUAL

  • → SOPORTE VIRTUAL

CONTACTOS

  • soportevirtual@puce.edu.ec
  • Tel: +593 99 715 1230
  • Sede Quito
    Avenida 12 de Octubre 1076 y
    Vicente Ramón Roca