# Un objeto loca.p no ponderado
o <- new("loca.p", x = c(-1, 1, 1, -1), y = c(-1, -1, 1, 1))
# Calcula la función objetivo en el punto c(3, 4)
zsum(o, 3, 4)
# Resuelve el problema de localización
zsummin(o)
# Curvas de nivel
contour(o)
# Ejecuta una demo del paquete
demo(orloca)
Run the code above in your browser using DataLab