Ejercicio de CLE

Ejemplo de la compañía Sumco Pump

Sumco, una compañía que vende bombas a otras compañías, quiere reducir su costo de inventario de- terminando 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:

Cantidad de lote ecónomico

## datos 
D<-1000   #Demanda anual 
c_o<-10   #costo por ordenar
c_n<-0.50  #costo anual 

#función para encontrar el valor Q óptimo 

costo_optimo<-function(D,c_o,c_n){
  q_ot<-sqrt((2*D*c_o)/c_n)
  return(q_ot)
}
costo_optimo(D,c_o,c_n)

## [1] 200

Costo total del inventario anual

# datos 
D<-1000  #demanda anual 
Q<-200    #costo optimo
c_o<-10   #costo por ordenar
c_n<-0.50  #costo anual 

costo_total<-function(D,Q,c_o,c_n){
  ct<-((D/Q)*c_o) + ((Q/2)*c_n)
  return(ct)
}
costo_total(D,Q,c_o,c_n)

## [1] 100