Frequently used R scripts