Introducción

En este pequeño trabajo analizaré mis hábitos de ahorro semanal en comparación con un objetivo preestablecido. El propósito de este ejercicio es aplicar por primera vez herramientas básicas de R Markdown para organizar texto, código y gráficos.

Datos y Análisis en R

A continuación, defino mis ahorros diarios de la última semana (en Guaranies) y calculo el total acumulado:

# Creación de una secuencia numérica con los ahorros diarios (Lunes a Domingo)
ahorros_diarios <- c(25000, 15000, 20000, 30000, 25000, 45000, 50000)

# Operación sencilla: Suma total y promedio de ahorro
total_ahorrado <- sum(ahorros_diarios)
promedio_diario <- mean(ahorros_diarios)

# Mostrar resultados
total_ahorrado
## [1] 210000
promedio_diario
## [1] 30000
dias <- c("Lun", "Mar", "Mié", "Jue", "Vie", "Sáb", "Dom")
barplot(ahorros_diarios, names.arg = dias, col = "lightblue",
        main = "Ahorro Diario de la Semana",
        xlab = "Día", ylab = "Monto (Guaranies)")

Se observa claramente en el gráfico de barras que de lunes a viernes se ahora un poco menos que los fines de semana, es decir, se ahorra más los sábados y Domingos.