'adding to functions.r'