16 lines
539 B
R
16 lines
539 B
R
## Cognitive Index app deployment
|
|
|
|
require(rsconnect)
|
|
|
|
# keys <- suppressWarnings(read.csv("/Users/au301842/shinyapp_token.csv", colClasses = "character"))
|
|
#
|
|
# keyring::key_get(service = "rsconnect_cognitiveindex_token")
|
|
# keyring::key_get(service = "rsconnect_cognitiveindex_secret")
|
|
|
|
rsconnect::setAccountInfo(
|
|
name = "cognitiveindex",
|
|
token = keyring::key_get(service = "rsconnect_cognitiveindex_token"),
|
|
secret = keyring::key_get(service = "rsconnect_cognitiveindex_secret")
|
|
)
|
|
|
|
rsconnect::deployApp(appDir = here::here("app"))
|