add histogram and normal plot rscript and funny math plot