Asignatura: Estadística Aplicada con Python y
R
Programa: Ingeniería Agrícola
Semana: 2 - Análisis Exploratorio de Datos (EDA) y
Visualizaciones
Periodo: 2026-2
Docente: Justo Rafael Fuentes Cuello
Descripción de la Actividad:
Esta actividad introduce a los estudiantes en el uso de herramientas profesionales para análisis estadístico reproducible. Los estudiantes crearán cuentas en plataformas especializadas (Posit Cloud y RPubs), consultarán un agente de IA sobre la aplicación de la estadística en ingeniería agrícola, y desarrollarán un documento RMarkdown que integrará texto, código y visualizaciones.
Tiempo Estimado: 3 horas
Modalidad: Trabajo individual con apoyo virtual
Herramientas Requeridas: - Navegador web actualizado
(Chrome, Firefox, Edge) - Conexión a internet estable - Cuenta de correo
electrónico institucional o personal - Acceso a Google Colab - Acceso a
Posit Cloud - Acceso a RPubs
Desarrollar competencias en el uso de herramientas computacionales profesionales para análisis estadístico reproducible en ingeniería agrícola, integrando R, RMarkdown y plataformas de publicación científica.
Configurar entornos de trabajo profesionales creando cuentas en Posit Cloud y RPubs para análisis estadístico reproducible.
Consultar y validar información técnica utilizando agentes de IA con criterio ingenieril, verificando la pertinencia de la estadística aplicada en contextos agrícolas.
Crear documentos RMarkdown que integren código, resultados y narrativa técnica, desplegándolos en múltiples formatos (HTML, PDF, Word).
Publicar análisis estadísticos en plataformas profesionales (RPubs) siguiendo estándares de comunicación científica.
Replicar análisis exploratorio de datos transfiriendo código de Google Colab (Python) a R, fortaleciendo la comprensión de ambos lenguajes.
Los estudiantes configuran entornos de trabajo reales utilizados en investigación y consultoría profesional, no simulaciones académicas. Esto fortalece la preparación para el ejercicio profesional y trabajos de grado.
Antes de aceptar información generada por IA, los estudiantes: - Formulan preguntas específicas sobre aplicaciones en ingeniería agrícola - Verifican la coherencia con conocimientos previos de estadística - Identifican limitaciones y sesgos potenciales - Documentan el proceso de consulta para trazabilidad
Cada paso del análisis se documenta en RMarkdown, permitiendo: - Replicación exacta del análisis por terceros - Trazabilidad completa desde datos hasta conclusiones - Versionado y control de cambios - Publicación en formatos profesionales
Los estudiantes replican análisis realizados en Python (Colab) usando R (Posit Cloud), identificando: - Diferencias sintácticas entre lenguajes - Ventajas y limitaciones de cada herramienta - Equivalencias conceptuales (pandas ↔︎ tidyverse, matplotlib ↔︎ ggplot2)
Al finalizar esta actividad, el estudiante será capaz de:
Crear y configurar cuentas en Posit Cloud y RPubs, comprendiendo su rol en el ecosistema de ciencia de datos reproducible.
Consultar agentes de IA sobre aplicaciones de estadística en ingeniería agrícola, evaluando críticamente las respuestas y documentando el proceso.
Crear documentos RMarkdown completos que integren:
Desplegar documentos en tres formatos profesionales:
Publicar en RPubs siguiendo estándares de comunicación científica, incluyendo metadatos, descripción y licenciamiento apropiado.
Transferir análisis de Python a R, identificando equivalencias y diferencias en sintaxis, filosofía de diseño y capacidades.
| Criterio | Excelente (5.0 - 4.5) | Bueno (4.4 - 4.0) | Aceptable (3.9 - 3.5) | Insuficiente (3.4 - 0.0) | Peso |
|---|---|---|---|---|---|
| Configuración de cuentas | Cuentas creadas correctamente en Posit Cloud y RPubs con perfiles completos y profesionales | Cuentas creadas con perfiles básicos pero funcionales | Cuentas creadas pero con perfiles incompletos o información mínima | No crea una o ambas cuentas, o presenta errores de configuración | 10% |
| Consulta a IA | Consulta bien formulada, respuesta validada críticamente, documentada con fecha, prompt y análisis de limitaciones | Consulta formulada, respuesta incluida pero con validación superficial | Consulta realizada pero respuesta copiada sin análisis crítico | No consulta IA o copia respuesta sin contexto ni validación | 15% |
| Documento RMarkdown | Documento profesional con estructura clara, código ejecutable, visualizaciones apropiadas y narrativa coherente | Documento funcional con código ejecutable y visualizaciones básicas | Documento con errores menores de formato o código no optimizado | Documento con errores graves, código no ejecutable o estructura deficiente | 25% |
| Despliegue multiformato | Despliega correctamente en HTML, PDF y Word; verifica que todos los formatos se visualizan adecuadamente | Despliega en dos formatos correctamente, uno con problemas menores | Despliega en un formato correctamente, otros con errores | No logra desplegar en ningún formato o presenta errores graves | 15% |
| Publicación en RPubs | Publica en RPubs con título descriptivo, tags apropiados, descripción clara y enlace funcional | Publica en RPubs con título y enlace funcional pero descripción mínima | Publica en RPubs pero con título genérico o sin descripción | No publica en RPubs o enlace no funcional | 15% |
| Replicación de análisis | Replica exitosamente el análisis de Colab en R, identificando equivalencias y documentando diferencias | Replica la mayoría del análisis con algunas diferencias no documentadas | Replica parcialmente el análisis con errores en la conversión | No replica el análisis o presenta errores graves de implementación | 15% |
| Documentación y ética | Documenta completamente el proceso, cita fuentes, usa IA responsablemente y reconoce limitaciones | Documenta el proceso básico pero sin análisis profundo de limitaciones | Documentación mínima sin reflexión sobre uso de IA | Sin documentación o uso irresponsable de IA | 5% |
Calificación Final: Promedio ponderado de los criterios
¿Qué es Posit Cloud?
Posit Cloud (anteriormente RStudio Cloud) es una plataforma en la nube
que permite ejecutar R y RStudio directamente en el navegador, sin
necesidad de instalar software localmente. Es ideal para estudiantes
porque garantiza que todos trabajen en el mismo entorno.
Pasos:
⚠️ Nota importante: Posit Cloud tiene un plan gratuito con límites de uso (25 horas/mes). Para esta actividad es suficiente, pero si planeas usarlo extensivamente, considera el plan educativo.
¿Qué es RPubs?
RPubs es una plataforma gratuita para publicar documentos RMarkdown en
la web. Permite compartir análisis estadísticos, reportes y
visualizaciones con la comunidad científica.
Pasos:
⚠️ Nota importante: RPubs es público. Todo lo que publiques será visible para cualquier persona en internet. Asegúrate de no incluir información sensible o confidencial.
Objetivo: Obtener información sobre la aplicación de la estadística en ingeniería agrícola y validar críticamente la respuesta.
Pasos:
Puedes usar cualquiera de estos agentes: - ChatGPT (https://chat.openai.com) - Claude (https://claude.ai) - Gemini (https://gemini.google.com) - Copilot (https://copilot.microsoft.com)
Para esta guía usaremos ChatGPT como ejemplo.
Prompt sugerido:
Actúa como un experto en estadística aplicada a la ingeniería agrícola.
Responde a la siguiente pregunta de manera clara, precisa y con ejemplos
concretos del contexto colombiano:
¿Qué es la Estadística Aplicada con R en el contexto de la Ingeniería
Agrícola? Incluye:
1. Definición clara y concisa
2. Tres aplicaciones específicas en sistemas agrícolas (agua, suelo,
cultivos, clima o mecanización)
3. Ventajas de usar R sobre otras herramientas
4. Un ejemplo concreto de análisis estadístico en agricultura
5. Limitaciones y consideraciones éticas
Por favor, estructura tu respuesta con encabezados y viñetas para
facilitar la lectura.
Antes de usar la respuesta, verifica:
✅ Criterios de validación: - [ ] ¿La definición es clara y precisa? - [ ] ¿Los ejemplos son relevantes para ingeniería agrícola? - [ ] ¿Las aplicaciones mencionadas son realistas? - [ ] ¿Las ventajas de R son correctas? - [ ] ¿Se mencionan limitaciones éticas? - [ ] ¿El lenguaje es apropiado para nivel universitario?
❌ Señales de alerta: - Respuestas demasiado genéricas o vagas - Ejemplos que no aplican a agricultura - Afirmaciones sin respaldo técnico - Omisión de limitaciones o sesgos
Crea un registro con la siguiente información:
Fecha de consulta: [Fecha actual]
Agente de IA utilizado: [ChatGPT/Claude/Gemini/Copilot]
Modelo: [GPT-4/Claude 3/etc.]
Prompt utilizado: [El prompt completo que usaste]
Respuesta obtenida: [La respuesta completa]
Validación: [Tus observaciones sobre la calidad de la respuesta]
Limitaciones identificadas: [Qué falta o podría mejorar]
⚠️ Nota ética: La IA puede generar información incorrecta o sesgada. Siempre verifica con fuentes confiables (libros de texto, artículos científicos, documentación oficial).
¿Qué es RMarkdown?
RMarkdown es un formato que combina texto narrativo (Markdown) con
código R ejecutable. Permite crear documentos dinámicos donde el código,
resultados y visualizaciones se integran automáticamente.
Pasos:
Estadistica_Aplicada_Semana_2En la ventana de configuración:
Estadística Aplicada con R en Ingeniería AgrícolaTu Nombre CompletoRStudio creará un archivo .Rmd con contenido de ejemplo.
Observa:
---
title: "Estadística Aplicada con R en Ingeniería Agrícola"
author: "Tu Nombre Completo"
date: "2026-08-12"
output: html_document
---
## R Markdown
This is an R Markdown document...
Elementos clave: - YAML header
(entre ---): Metadatos del documento - Chunks de
código (entre ```{r} y ```): Bloques
de código R ejecutable - Texto Markdown: Narrativa con
formato
Crea la siguiente estructura:
---
title: "Estadística Aplicada con R en Ingeniería Agrícola"
author: "Tu Nombre Completo"
date: "2026-08-12"
output:
html_document:
toc: true
toc_float: true
theme: cosmo
highlight: tango
pdf_document:
toc: true
word_document:
toc: true
---
# Introducción
## Consulta a Agente de IA
**Fecha de consulta:** 2026-08-12
**Agente utilizado:** [ChatGPT/Claude/Gemini]
**Modelo:** [Versión del modelo]
### Pregunta formulada
¿Qué es la Estadística Aplicada con R aplicada a la ingeniería agrícola?
### Respuesta obtenida
[Pega aquí la respuesta del agente de IA]
### Validación crítica
[Agrega tu análisis crítico de la respuesta]
## Ejemplo Práctico
### Carga de datos
``` r
# Crear datos de ejemplo de rendimiento de cultivos
set.seed(123)
datos_cultivo <- data.frame(
parcela = 1:20,
tratamiento = rep(c("Control", "Fertilizante_A", "Fertilizante_B", "Fertilizante_C"), each = 5),
rendimiento = c(
rnorm(5, mean = 45, sd = 5), # Control
rnorm(5, mean = 55, sd = 6), # Fertilizante A
rnorm(5, mean = 60, sd = 7), # Fertilizante B
rnorm(5, mean = 50, sd = 5) # Fertilizante C
),
humedad_suelo = runif(20, min = 15, max = 35),
ph_suelo = runif(20, min = 5.5, max = 7.5)
)
# Mostrar estructura de los datos
str(datos_cultivo)
## 'data.frame': 20 obs. of 5 variables:
## $ parcela : int 1 2 3 4 5 6 7 8 9 10 ...
## $ tratamiento : chr "Control" "Control" "Control" "Control" ...
## $ rendimiento : num 42.2 43.8 52.8 45.4 45.6 ...
## $ humedad_suelo: num 17.9 23.3 23.3 22.4 18 ...
## $ ph_suelo : num 6.83 5.69 6.27 6.05 7.13 ...
# Resumen estadístico por tratamiento
library(dplyr)
resumen <- datos_cultivo %>%
group_by(tratamiento) %>%
summarise(
n = n(),
media_rendimiento = mean(rendimiento),
desviacion = sd(rendimiento),
minimo = min(rendimiento),
maximo = max(rendimiento)
)
# Mostrar tabla de resumen
knitr::kable(resumen,
caption = "Resumen estadístico del rendimiento por tratamiento",
digits = 2)
| tratamiento | n | media_rendimiento | desviacion | minimo | maximo |
|---|---|---|---|---|---|
| Control | 5 | 45.97 | 4.06 | 42.20 | 52.79 |
| Fertilizante_A | 5 | 54.73 | 6.98 | 47.41 | 65.29 |
| Fertilizante_B | 5 | 62.16 | 4.48 | 56.11 | 68.57 |
| Fertilizante_C | 5 | 50.55 | 7.06 | 40.17 | 58.93 |
library(ggplot2)
ggplot(datos_cultivo, aes(x = tratamiento, y = rendimiento, fill = tratamiento)) +
geom_boxplot(alpha = 0.7) +
geom_jitter(width = 0.2, alpha = 0.6, size = 2) +
labs(
title = "Rendimiento del Cultivo por Tratamiento",
x = "Tratamiento",
y = "Rendimiento (ton/ha)",
caption = "Datos simulados para demostración"
) +
theme_minimal() +
theme(legend.position = "none")
Rendimiento del cultivo por tratamiento
# Correlación entre humedad del suelo y rendimiento
cor_test <- cor.test(datos_cultivo$humedad_suelo, datos_cultivo$rendimiento)
cat("Coeficiente de correlación:", round(cor_test$estimate, 3), "\n")
## Coeficiente de correlación: -0.188
cat("Valor p:", round(cor_test$p.value, 4), "\n")
## Valor p: 0.4282
# Gráfico de dispersión
ggplot(datos_cultivo, aes(x = humedad_suelo, y = rendimiento)) +
geom_point(size = 3, alpha = 0.7) +
geom_smooth(method = "lm", se = TRUE, color = "blue") +
labs(
title = "Relación entre Humedad del Suelo y Rendimiento",
x = "Humedad del Suelo (%)",
y = "Rendimiento (ton/ha)"
) +
theme_minimal()
[Agrega tus conclusiones sobre la actividad]
#### Paso 4.8: Guardar el archivo
1. Ve a **File** → **Save** (o presiona `Ctrl + S` / `Cmd + S`)
2. Nombre del archivo: `Estadistica_Aplicada_Semana_2.Rmd`
3. Haz clic en **"Save"**
**⚠️ Nota importante:** Siempre guarda tu trabajo frecuentemente. RStudio tiene autoguardado, pero es buena práctica guardar manualmente.
---
### 7.5 Desplegar en HTML, PDF y Word
**Objetivo:** Generar el documento en tres formatos diferentes para diferentes usos.
**Pasos:**
#### Paso 5.1: Instalar paquetes necesarios
Antes de compilar, asegúrate de tener los paquetes requeridos:
``` r
# Instalar paquetes necesarios (ejecutar solo una vez)
install.packages(c("knitr", "rmarkdown", "tinytex"))
# Para PDF, instalar TinyTeX
tinytex::install_tinytex()
⚠️ Solución de problemas con PDF: - Si hay error de
LaTeX, ejecuta: tinytex::install_tinytex() - Si falta un
paquete LaTeX, el error indicará cuál instalar - Alternativa: Usa
output: pdf_document con opciones simplificadas
En el panel “Files” de RStudio, deberías ver: -
Estadistica_Aplicada_Semana_2.html -
Estadistica_Aplicada_Semana_2.pdf -
Estadistica_Aplicada_Semana_2.docx
Abre cada uno y verifica que se visualizan correctamente.
⚠️ Nota importante: Los tres formatos tienen ventajas diferentes: - HTML: Interactivo, ideal para web - PDF: Formal, ideal para impresión y archivo - Word: Editable, ideal para colaboración
Objetivo: Publicar el documento HTML en RPubs para compartirlo públicamente.
Pasos:
Publish to: Selecciona “RPubs”
Si es tu primera vez, te pedirá iniciar sesión:
Title:
Estadística Aplicada con R en Ingeniería Agrícola - Semana 2
Description: Agrega una descripción clara:
Análisis exploratorio de datos agrícolas usando R y RMarkdown.
Incluye consulta a agente de IA, visualizaciones y análisis
estadístico de rendimiento de cultivos.
Asignatura: Estadística Aplicada con Python y R
Programa: Ingeniería Agrícola, Universidad de Sucre
Periodo: 2026-2Tags: Agrega etiquetas relevantes:
Restadísticaingeniería agrícolaEDARMarkdownHaz clic en “Publish”
https://rpubs.com/tuusuario/1234567Vuelve a tu archivo RMarkdown y agrega al final:
## Enlace a publicación
Este documento está disponible públicamente en:
[Estadística Aplicada con R en Ingeniería Agrícola](https://rpubs.com/tuusuario/1234567)
⚠️ Nota importante: Una vez publicado, el documento es público. Si necesitas actualizarlo, vuelve a publicar con el mismo título y RPubs actualizará la publicación existente.
Objetivo: Descargar el notebook de Google Colab para replicar el análisis en R.
Pasos:
Abre tu navegador web
Ve al enlace proporcionado:
https://colab.research.google.com/github/justorfc/Estadistica_Aplicada_con_Python_y_R_2026_2/blob/main/2_Semana_2_An%C3%A1lisis_Exploratorio_de_Datos_(EDA)_y_Visualizaciones_Cruzadas.ipynbSe abrirá en Google Colab
.ipynb a tu computadora⚠️ Nota importante: No ejecutes el notebook en Colab a menos que se te indique. El objetivo es descargarlo y replicarlo en R.
Objetivo: Transferir el análisis de Python (Colab) a R (Posit Cloud).
Pasos:
Replicacion_Analisis_Colab.RAgrega al inicio del script:
# ============================================================
# Replicación de Análisis de Colab en R
# Asignatura: Estadística Aplicada con Python y R
# Semana 2: EDA y Visualizaciones Cruzadas
# ============================================================
# Instalar paquetes necesarios (ejecutar solo una vez)
# install.packages(c("tidyverse", "readr", "ggplot2", "dplyr", "tidyr"))
# Cargar paquetes
library(tidyverse)
library(readr)
library(ggplot2)
library(dplyr)
library(tidyr)
# Configurar opciones
options(scipen = 999) # Evitar notación científica
Crea una tabla de referencia:
# Tabla de equivalencias Python ↔ R
# =====================================
# Python (pandas) R (tidyverse)
# -------------------------------------
# df.head() head(df)
# df.describe() summary(df)
# df['columna'] df$columna
# df.groupby() df %>% group_by()
# df.merge() df %>% left_join()
# df.pivot_table() df %>% pivot_wider()
# pd.read_csv() read_csv()
# matplotlib.pyplot ggplot2
# seaborn ggplot2 + extensiones
Busca en el notebook de Colab cómo se cargan los datos y replica en R:
# Carga de datos
# ==============
# En Colab (Python):
# df = pd.read_csv('datos.csv')
# En R:
datos <- read_csv("ruta/al/archivo.csv")
# Si los datos están en el notebook, crearlos manualmente:
datos <- tibble(
id = 1:100,
variable1 = rnorm(100, mean = 50, sd = 10),
variable2 = runif(100, min = 0, max = 100),
categoria = sample(c("A", "B", "C"), 100, replace = TRUE)
)
# Análisis descriptivo
# ====================
# En Colab (Python):
# df.describe()
# En R:
summary(datos)
# Estadísticas por grupo
# En Colab (Python):
# df.groupby('categoria')['variable1'].mean()
# En R:
datos %>%
group_by(categoria) %>%
summarise(
media = mean(variable1, na.rm = TRUE),
desviacion = sd(variable1, na.rm = TRUE),
n = n()
)
# Visualizaciones
# ===============
# En Colab (Python con matplotlib):
# plt.hist(df['variable1'])
# En R con ggplot2:
ggplot(datos, aes(x = variable1)) +
geom_histogram(bins = 30, fill = "steelblue", alpha = 0.7) +
labs(
title = "Distribución de Variable 1",
x = "Variable 1",
y = "Frecuencia"
) +
theme_minimal()
# Gráfico de cajas por categoría
# En Colab (Python con seaborn):
# sns.boxplot(x='categoria', y='variable1', data=df)
# En R:
ggplot(datos, aes(x = categoria, y = variable1, fill = categoria)) +
geom_boxplot(alpha = 0.7) +
labs(
title = "Variable 1 por Categoría",
x = "Categoría",
y = "Variable 1"
) +
theme_minimal() +
theme(legend.position = "none")
Agrega comentarios sobre las diferencias encontradas:
# Diferencias encontradas
# =======================
# 1. Sintaxis: Python usa métodos encadenados (df.method()),
# R usa pipes (%>%)
# 2. Indexación: Python usa corchetes [], R usa $ para columnas
# 3. Gráficos: matplotlib es más verboso, ggplot2 es más declarativo
# 4. Manejo de NA: Python usa NaN, R usa NA
# 5. Tipos de datos: Python es más flexible, R es más estricto
Ctrl + S / Cmd + S)Ctrl + Enter /
Cmd + Enter)⚠️ Nota importante: No todos los análisis de Python tienen equivalente directo en R. Documenta estas limitaciones y propón alternativas.
Debes entregar los siguientes elementos:
Estadistica_Aplicada_Semana_2.htmlEstadistica_Aplicada_Semana_2.pdfEstadistica_Aplicada_Semana_2.docxReplicacion_Analisis_Colab.RArchivo de texto o Markdown con: - Fecha y hora de cada paso - Problemas encontrados y soluciones - Consultas a IA (prompts y respuestas) - Reflexión sobre el aprendizaje
Fecha de entrega: [Consultar calendario
académico]
Formato de entrega: Repositorio GitHub o plataforma
institucional
Ctrl + S
regularmente| Problema | Solución |
|---|---|
| Error al compilar PDF | Instala TinyTeX: tinytex::install_tinytex() |
| Gráficos no se muestran | Verifica que el chunk tenga fig.cap y dimensiones
apropiadas |
| Tablas mal formateadas | Usa knitr::kable() con opciones apropiadas |
| Error de paquetes | Instala paquetes faltantes:
install.packages("nombre") |
| RPubs no acepta publicación | Verifica conexión a internet y credenciales |
| Código no ejecuta | Revisa sintaxis y dependencias de paquetes |
¡Éxito en tu actividad!
Recuerda que el objetivo no es solo completar los pasos técnicos, sino comprender el flujo de trabajo de ciencia reproducible y desarrollar criterio ingenieril en el uso de herramientas computacionales.
Si tienes dudas, consulta con el docente o utiliza los recursos de la comunidad R.
Documento elaborado por: Justo Rafael Fuentes
Cuello
Fecha: 12 de agosto de 2026
Versión: 1.0
Licencia: Uso educativo, Universidad de Sucre