Create helpers.r

Functions for stock script