edit useful-functions.R