if left unset, will return the user data dir as returned by `tools::R_user_dir` for this package.
hydrogeofetch_data_dir(dir = NULL)character path of data directory (silent when setting)
hydrogeofetch_data_dir()
#> [1] "C:\\Users\\dblodgett\\AppData\\Roaming/R/data/R/hydrogeofetch"
hydrogeofetch_data_dir("demo")
hydrogeofetch_data_dir(tools::R_user_dir("hydrogeofetch"))