[go: up one dir, main page]
Menu ▾ ▴

[2722f9]: / R / RM2 / R / PD.R  Maximize  Restore  History

Download this file

5 lines (4 with data), 258 Bytes 

1
2
3
4
PD = function (demand = demand, tau = 0.5, eps = 0.005) {

    res <- try(RM2:::PD_internal(demand, tau, eps), silent = TRUE)

    if (class(res) == 'try-error') {print("Warning: All demand instances are unconstrained")} else {return(res)}

} # end PD function