Update 2012b_Q1profit.R