Absorption_costing_1_(R)