Refactor entrypoint to a tidy format

[harell]

Move from R6 to forward piping notation

(
    plumber::pr()
    %>% plumber::pr_set_docs_callback(NULL)
    %>% plumber::pr_mount("utility", plumber::plumb("plumber-utility.R", endpoint_path))
    %>% plumber::pr_mount("dbi", plumber::plumb("plumber-dbi.R", endpoint_path))
    %>% plumber::pr_mount("anomaly_detection", plumber::plumb("plumber-anomaly_detection.R", endpoint_path))
    %>% plumber::pr_mount("traffic_forecasting", plumber::plumb("plumber-traffic_forecasting.R", endpoint_path))
    %>% plumber::pr_run(host = config$host, port = config$port)
)