rt (production); decile_production = zeros ((agents/10),10); decile_production(:) = production; production deciles = deciles * decile_production; production_decile_ratio = production_deciles(10)/production_deciles(1); % wealth deciles final_wealth = sort (final_wealth); decile_final_wealth = zeros ((agents/10),10); decilefinalwealth(:) = final_wealth; final