Final R codes and plots
Multiplot function from Cookbook