vetiver_deploy_rsconnect: Deploy a vetiver model API to Posit Connect

Description

Use vetiver_deploy_rsconnect() to deploy a vetiver_model() that has been versioned and stored via vetiver_pin_write() as a Plumber API on Posit Connect.

Usage

vetiver_deploy_rsconnect(
  board,
  name,
  version = NULL,
  predict_args = list(),
  appTitle = glue::glue("{name} model API"),
  ...,
  additional_pkgs = character(0)
)

Value

The deployment success (TRUE or FALSE), invisibly.

Arguments

board: A pin board, created by board_folder(), board_connect(), board_url() or another board_ function.
name: Pin name.
version: Retrieve a specific version of a pin. Use pin_versions() to find out which versions are available and when they were created.
predict_args: A list of optional arguments passed to vetiver_api() such as the prediction type.
appTitle: The API title on Posit Connect. Use the default based on name, or pass in your own title.
...: Other arguments passed to rsconnect::deployApp() such as appName, account, or launch.browser.
additional_pkgs: Any additional R packages that need to be attached via library() to run your API, as a character vector.

Details

The two functions vetiver_deploy_rsconnect() and vetiver_create_rsconnect_bundle() are alternatives to each other, providing different strategies for deploying a vetiver model API to Posit Connect.

When you first deploy to Connect, your API will only be accessible to you. You can change the access settings so others can also access the API. For all access settings other than "Anyone - no login required", anyone querying your API (including you) will need to pass authentication details with your API call, as shown in the Connect documentation.

Examples

Run this code

if (FALSE) { # rlang::is_installed("rsconnect")
library(pins)
b <- board_temp(versioned = TRUE)
cars_lm <- lm(mpg ~ ., data = mtcars)
v <- vetiver_model(cars_lm, "cars_linear")
vetiver_pin_write(b, v)

if (FALSE) {
## pass args for predicting:
vetiver_deploy_rsconnect(
    b,
    "user.name/cars_linear",
    predict_args = list(debug = TRUE)
)

## specify an account name through `...`:
vetiver_deploy_rsconnect(
    b,
    "user.name/cars_linear",
    account = "user.name"
)
}
}