Bowes Load apportionment model. R implementation.