Scribd
Cargar
4 vistas2 páginas

Script Inventario R

El script en R crea un inventario de frutas con sus respectivos precios utilizando vectores y un Data Frame. Se realizan cálculos estadísticos para determinar el precio más caro, el más barato y el promedio de los precios. Finalmente, se genera un gráfico de barras que visualiza los precios de las frutas en el inventario.

Cargado por

Carlos Salinas Gónzalez
Derechos de autor
© All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como PDF, TXT o lee en línea desde Scribd
4 vistas2 páginas

Script Inventario R

El script en R crea un inventario de frutas con sus respectivos precios utilizando vectores y un Data Frame. Se realizan cálculos estadísticos para determinar el precio más caro, el más barato y el promedio de los precios. Finalmente, se genera un gráfico de barras que visualiza los precios de las frutas en el inventario.

Cargado por

Carlos Salinas Gónzalez
Derechos de autor
© All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como PDF, TXT o lee en línea desde Scribd

Script en R - Inventario de Frutas

# -----------------------------------------------------------
# CREACIÓN DE VECTORES
# -----------------------------------------------------------

# Creamos un vector llamado "productos" que contiene 4 nombres de frutas


productos <- c("Manzana", "Plátano", "Naranja", "Mango")

# Creamos un vector llamado "precios" que contiene 4 valores numéricos con decimales
precios <- c(18.50, 12.30, 15.75, 22.10)

# -----------------------------------------------------------
# CREACIÓN DEL DATA FRAME
# -----------------------------------------------------------

# Creamos un Data Frame llamado "inventario"


inventario <- [Link](Productos = productos,
Precios = precios)

# Mostramos el Data Frame en consola


print(inventario)

# -----------------------------------------------------------
# CÁLCULOS ESTADÍSTICOS
# -----------------------------------------------------------

# Calculamos el precio más caro


precio_mas_caro <- max(precios)

# Calculamos el precio más barato


precio_mas_barato <- min(precios)

# Calculamos el promedio de los precios


precio_promedio <- mean(precios)

# Mostramos los resultados


print(precio_mas_caro)
print(precio_mas_barato)
print(precio_promedio)

# -----------------------------------------------------------
# GRÁFICO DE BARRAS
# -----------------------------------------------------------

barplot(precios,
[Link] = productos,
col = "skyblue",
main = "Precios de Frutas en Inventario",
ylab = "Precio en Pesos",
xlab = "Frutas")

También podría gustarte