Update fig2.R