Series of r scripts created upon request or curiosity