commit2

plot 2,3,4 and change to extract.R