Nothing
## ----eval = FALSE-------------------------------------------------------------
# library(openappr)
#
# set_app_connection(
# dbname = "vmc",
# host = "apps-server.idems.international",
# port = 5432,
# user = "vmc",
# password = "LSQkyYg5KzL747"
# )
## ----eval = FALSE-------------------------------------------------------------
# con <- get_app_connection()
## ----eval = FALSE-------------------------------------------------------------
# # Retrieve user data filtered by user ID
# valid_ids <- c("3e68fcda-d4cd-400e-8b12-6ddfabced348", "223925c7-443a-411c-aa2a-a394f991dd52")
# data_filtered_users <- get_openapp_data(
# name = "app_users",
# filter = TRUE,
# filter_variable = "app_user_id",
# filter_variable_value = valid_ids
# )
## ----eval = FALSE-------------------------------------------------------------
# # Retrieve filtered notification interaction data
# filtered_notification_data <- get_nf_data(
# filter = TRUE,
# filter_variable = "app_user_id",
# filter_variable_value = valid_ids
# )
## ----eval = FALSE-------------------------------------------------------------
# # Retrieve all data from the 'app_users' table
# data_all_users <- get_openapp_data()
#
# # Retrieve filtered data from the 'app_users' table
# valid_ids <- c("3e68fcda-d4cd-400e-8b12-6ddfabced348", "223925c7-443a-411c-aa2a-a394f991dd52")
# data_filtered_notifications <- get_openapp_data(
# name = "app_users",
# filter = TRUE,
# filter_variable = "app_user_id",
# filter_variable_value = valid_ids
# )
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.