r-prog scripts