[Cost_Benefit, PR, PAR]=peaks(100); figure surf(Cost_Benefit, PR, PAR)