New figures

R results