El día que Excel duele

Sprint 3 · Los Datos — PD1002

Juan Carlos Muñoz-Mora · Susana Berrío

Universidad EAFIT · Escuela de Finanzas, Economía y Gobierno

25 de septiembre de 2026

Hoy les va a doler.

Sesión 10 · 25 de septiembre · Sprint 3 · Los Datos · cierre del sprint

🌉 De S9: otro grupo encontró los errores de su hoja. Nadie ve los propios. Y el que verifica no es el que sabe más — es el que tiene un proceso.

Hoy ese proceso se topa con un problema que Excel no aguanta.

Traigan la hoja
del viernes pasado.

🎤 ¿Qué hacen los economistas?

¿Cuánto vale
un bosque en pie?

Qué hacemosInvitado: BanCO2 / Cornare. 10 min él, 10 min preguntas.
Con quéLas cuatro preguntas de siempre. Y el artefacto que traiga.
Qué produceCasilla marcada en el póster. Van 10 de 16.
Cómo sé que sirvióSi alguien le pregunta dónde se le queda corto el Excel.

La pregunta no es retórica

Un bosque en pie no produce nada que se venda.

La madera cortada sí. El potrero sí. El aguacate sí.

. . .

Entonces el campesino que lo deja en pie está pagando —de su bolsillo— por algo de lo que todos nos beneficiamos y nadie le paga.

. . .

Y alguien decidió
ponerle un número.

El número

La respuesta de BanCO2

Un pago mensual a la familia campesina que conserva el bosque de su predio.

Del orden de $300.000 al mes.

Se lo preguntamos al invitado: es su número, no el nuestro.

El tamaño de la cosa

2.739 familias campesinas
43.409 hectáreas conservadas
26 municipios

Jurisdicción de Cornare — Oriente, Nordeste y Magdalena Medio antioqueños. Cifras de banco2.com. A una hora de este salón.

Las cuatro preguntas

1 · ¿Qué hace un martes?

Va a un predio. Mide. Verifica que el bosque siga en pie.

2 · ¿Qué produce?

Un contrato. Un pago. Una hectárea que no se tumbó.

3 · ¿Con qué herramienta?

Pregúntenselo. Y pregúntenle dónde se le queda corta.

4 · ¿Qué decisión cambia?

Si una familia tumba el bosque o no.

Un economista es alguien
que le pone número
a lo que todos dicen
que no tiene precio.

🃏 Carta Nº 05

El precio
lo dice todo

¿Hacia dónde empuja el sistema? · Padrinos: Smith, Hayek

El lápiz

Miren un lápiz. Uno cualquiera.

El grafito puede venir de Brasil. La madera, de un bosque. El caucho de la punta, de Indonesia. El metal que los une, de Australia.

. . .

Ninguna de esas personas se conoce. Ninguna sabe que está haciendo un lápiz.

Nadie está a cargo.

Y sin embargo

El lápiz existe.

Cuesta $800.

Y hay uno en la cartuchera de casi todos ustedes.

Cómo se coordinan sin conocerse

# Nadie manda. Nadie coordina. Y aun así:

    sube el precio del caucho
        -> al de Indonesia le conviene sacar más caucho
        -> y al de la fábrica le conviene usar menos

# El precio viajó de Indonesia a Medellín
# y NADIE tuvo que escribir un correo.

# El precio no es una etiqueta:
#     es un MENSAJE
#     que dice hacia dónde empujar

Precios como
periódicos diminutos.

🔍 Su cacería de hoy

Es distinta a las seis anteriores

Y por eso la vamos a hacer después del taller.

Es lo primero que van a hacer con lo que aprendan hoy.

Entregamos la carta. La cacería se lee a las 10:50.

🔧 El taller

30 países.
Doce veces.

Qué hacemosEl mismo cálculo del viernes pasado, pero con 30 países. Y para 12 años. Uno por uno.
Con quéExcel. Como el viernes.
Qué produceUna tabla con el crecimiento promedio por grupo de deuda, año por año.
Cómo sé que sirvióCuando les dé rabia.

Sí, la última celda dice eso.

Su turno · 18 minutos

30 países × 12 años.

Para cada año: clasificar los 30 países en los tres grupos de deuda, y sacar el crecimiento promedio de cada grupo.

Son 36 promedios.

18:00

Empiecen por 1990. Cuando terminen, 1991.

Paren

¿Cuántos de los 36 promedios llevan?

. . .

¿Y cuántos están seguros de que están bien?

No están haciendo economía

Llevan 18 minutos. En esos 18 minutos, ¿cuánto tiempo pensaron en deuda o en crecimiento?

. . .

Estuvieron arrastrando el mouse.

Y cada vez que lo arrastraron, metieron la posibilidad de un error que —ya lo saben— no van a ver.

. . .

El trabajo se comió
la pregunta.

Miren esto.

library(tidyverse)

datos <- read_csv("data/raw/paises.csv")

datos |>
  group_by(anio, grupo_deuda) |>
  summarise(crecimiento_promedio = mean(crecimiento))

Eso son los 36.
Los treinta y seis.

Ahora sí: línea por línea

library(tidyverse)      # abrir la caja de herramientas

datos <- read_csv("data/raw/paises.csv")   # traer la hoja

<- se lee “guarda esto en”

datos <- read_csv(...)

Guarda la hoja en algo que se llama datos.

data/raw/ — ¿les suena?

Es la carpeta de la sesión 1. El crudo nunca se toca.

R no puede tocarlo aunque quiera: solo lo lee.

La línea que hace el trabajo

datos |>
  group_by(anio, grupo_deuda) |>
  summarise(crecimiento_promedio = mean(crecimiento))

Léanlo como una receta, de arriba a abajo

datos \|> agarra la tabla y pásala a…
group_by(anio, grupo_deuda) …amontónala por año y por grupo
summarise(... = mean(...)) …y de cada montón, sácame el promedio

Su turno · 20 minutos

  1. Corran el código. Tal cual. Que funcione.
  2. Cámbienlo: en vez de mean, pongan median. ¿Cambia mucho?
  3. Agreguen n = n() dentro del summarise. ¿Cuántos países hay en cada montón?

20:00

El punto 3 tiene sorpresa. No la vamos a contar.

Lo que acaba de pasar

9:32

18 minutos.

15 promedios de 36.

Ninguno verificado.

Y el error del rango — otra vez.

10:14

Tres líneas.

Los 36.

Y de paso encontraron el segundo error de Reinhart & Rogoff.

R no llegó porque toca.
Llegó porque dolía.

🔍 La cacería

Esta no se ve.

Qué hacemosBajan una serie de precios, la grafican, y responden la carta. Hoy no salen del salón.
Con quéR. Por primera vez. Es lo único que sirve para esta.
Qué produceUna gráfica hecha por ustedes. Y 3 firmas.
Cómo sé que sirvióSi alguien mira su propia gráfica y pregunta “¿y esto por qué?”.

Las seis anteriores

Una fila. Un letrero. Algo gratis. Dos personas repartiéndose una tarea.

Las cazaron con los ojos. Salieron, miraron, y ahí estaba.

La de hoy no se ve

Pueden pararse en la puerta del Éxito seis horas y no la van a ver.

Está en una serie de precios. Y una serie de precios no está en la calle: está en un archivo.

Para esta
necesitan R.

🔍 Bajen una serie de precios

Un precio. El que quieran. Café, dólar, arroz, gasolina, energía, arriendo, aguacate.

Bájenlo. Grafíquenlo. Y respondan la carta:

¿Hacia dónde empuja?

ggplot(precios, aes(x = fecha, y = precio)) +
  geom_line()

Dónde buscar: datos.gov.co · Banco de la República (series estadísticas) · DANE · FAO · Investing.com

🤝 La feria

Muestren la gráfica

25 min · 3 firmas = carta llena

📦 Sprint 3 · Review

¿Qué datos
responden mi pregunta?

Cuatro sesiones. Cierra hoy.

Lo que hicieron en cuatro viernes

Qué pasó
S7 🎤 El DANE El dato no se encuentra: se fabrica. Alguien decide qué cuenta.
S8 🔍 R&R Un estudiante de tercer año pidió los datos. Y los datos hablaron.
S9 🪞 La auditoría Nadie ve sus propios errores. Ni Harvard. Ni ustedes. Ni nosotros.
S10 🔧 R Cuando el trabajo se come la pregunta, hay que cambiar de herramienta.

Salen con una base limpia
y con qué mirarla.

Lo que se entrega

Base limpia · su grupo · antes del viernes

Qué Los datos de su pregunta. Descargados, leídos con read_csv, graficados una vez.
Dónde En el repo del grimorio. data/raw/ intacto.
Con qué Un .qmd que corra de arriba a abajo sin errores.
La prueba Que otro grupo lo clone y le funcione.

Si solo corre en su computador,
no corre.

El viernes

🎤 ¿Qué hacen los economistas? — el jefe de economía de Spotify. Sprint 4 abre: La Evidencia

🃏 Carta Nº02 — Una unidad más · ¿vale la próxima?

📌 Traiga: el computador, con R funcionando. Y su base limpia.

Y una pregunta para el fin de semana

Hoy la máquina hizo en medio segundo lo que a ustedes les tomó 18 minutos.

¿Qué parte de lo de hoy no podría haber hecho ella?

Hoy escribieron
su primer código.

Y no fue para aprender a programar.

Fue porque había un promedio
que sacar
y no daba la mano.