Create rrf_functions.R