---
title: "Análisis Tributario — ITLA"
subtitle: "Reporte de Riesgo Q1 2025"
author:
- name: "Gary"
affiliation: "Departamento de Tecnología e Información"
date: today
date-format: "DD MMMM YYYY"
lang: es
format:
html:
theme: cosmo
toc: true
toc-depth: 3 # Hasta qué nivel de encabezado incluir (1=solo #, 3=hasta ###)
toc-title: "Contenido" # Título del índice (por defecto dice "Table of contents")
toc-location: left # Posición: left (default), right, body
toc-expand: true # Mostrar todos los niveles expandidos desde el inicio
number-sections: true # Numerar las secciones automáticamente (1.1, 1.2, etc.)
code-fold: true
code-tools: true
fig-width: 8
fig-height: 5
embed-resources: true # Un solo archivo HTML autocontenido
execute:
echo: true
warning: false
message: false
---
# Reporte para mis estudiantes
## Introducción
Este reporte analiza las ventas del primer trimestre de 2025. Modificado
$$s = \sqrt{\frac{1}{n-1}\sum_{i=1}^{n}(x_i - \bar{x})^2}$$
```{r}
#| echo: true
#| message: false
library(tidyverse)
ventas <- c(45000, 52000, 38000, 61000, 47500)
mean(ventas)
```
## Conclusión
El promedio de ventas fue de `r as.integer(mean(ventas))` pesos.