# NOT RUN {
# Un objeto loca.p sin pesos
loca <- new("loca.p", x = c(-1, 1, 1, -1), y = c(-1, -1, 1, 1))
# Calcula el minimo
sol <- zsummin(loca)
# Muestra el resultado
sol
# Evaluacion de la funcion objetivo en el punto solucion
zsum(loca, sol[1], sol[2])
# }
Run the code above in your browser using DataLab