Update first_function.R