Sumco, una compañía que vende bombas a otras compañías, quiere reducir su costo de inventario determinando el número óptimo de bombas que debe obtener por orden. La demanda anual es de 1,000 unidades, el costo por ordenar es de $10 por orden y el costo anual promedio por almacenar por unidad es de $0.50. Con estas cifras, si se cumplen los supuestos de la CLE, calculamos el número óptimo de unidades por orden:
D<- 1000 # Demanda anual
Co<- 10 # Costo por ordenar
Ch<- 0.5 # Costo anual por almacenar
Para calcular el número óptimo de bombas que debe producir la compañia se usa la siguiente función :
CLE<-function(D,Co,Ch){
Q<- sqrt((2* D* Co)/Ch)
}
CLE(1000,10,0.5)
## El número óptimo de unidades por orden es: 200
CTI<-function(D,Co,Ch,Q){
CT<- ((D/Q)*Co)+((Q/2)*Ch)
}
CTI(1000,10,0.5,200)
## El costo total anual del inventario es: 100
Para reducir su costo de inventario determinando el número óptimo de bombas que debe obtener por orden es de 200 y el costo total anual del inventario es de $100.