share_gm = loyalty_g * P(m | home_g) + (1 - loyalty_g) * P(m | all) P(m | set) proportional to open_m * pmax(profit_gm, 0)^gamma, with the segment's own profit per unit (nominal) effort profit_gm = eff_gm * value_m - cost_m gamma = 0: profit-blind (equal shares); larger gamma: stronger preference for the most profitable metier. Returns an n x M matrix of nominal effort by metier, with attributes "by_seg" (n x G x M nominal effort) and "effective" (n x M effort weighted by efficiency, which drives F).
Usage
allocate_effort(
sys,
value,
E_seg,
gamma,
open = 1,
cost = 0,
by_seg = TRUE,
emult = NULL,
cseg = NULL
)Arguments
- sys
an
ms_system.- value
n x M expected revenue per unit of effective effort
- E_seg
n x G effort by segment
- gamma
preference exponent.
- open
n x M or length-M 0/1 (closures)
- cost
n x M cost per unit of nominal effort
- by_seg
kept for compatibility (effort by segment is always returned).
- emult
n x G mean efficiency of the active vessels relative to the segment mean
- cseg
n x G daily cost multiplier by segment (default
sys$cost_seg).