Update https_function.R

citation