cluster says that cf$mylapply(ps, mopt_obj_wrapper, objfunc = cf$objfunc) :
  unused argument(s) (objfunc = cf$objfunc)