library(readr)
library(ggplot2)
#Cargar las funciones
# Cargar un archivo que contiene funciones
source("https://raw.githubusercontent.com/rpizarrog/Ciencia-de-los-Datos-Descriptivo-Predictivo/refs/heads/main/scripts/probar%20funciones.R")
datos <- read.csv("https://raw.githubusercontent.com/rpizarrog/Ciencia-de-los-Datos-Descriptivo-Predictivo/refs/heads/main/datos/datos_aguacate_limpio.csv")
hist
f_histograma(datos$precio, "Precio aguacate")
ggplot
f_histograma_ggplot(datos$precio, "precio aguacate")
El valor del precio medio unitario del aguacate es de 1.41, el valor de la mediana es de 1.37 con una desviación estándar de 0.44.
La distribución del precio presenta un comportamiento atipico del lado derecho.
Seguramente por el comportamiento del mercado.