Put the survey card in any page

survey_panel_ui() is a card with the title, the progress cue, the chat, and the form. It starts with the first view in set_config(views = ). With more than one view, the header has one icon button for each view, in the order of views. On a narrow screen, the side-by-side view puts the chat below the form. Pair it with survey_server() with the same id.

Usage

survey_panel_ui(id, title = NULL)

Arguments

id

The module id. It must be the same in the UI and the server.

title

The title in the card header, or NULL for no title. With no title, the view buttons are on the left and the progress cue on the right.

Value

A bslib::card().

Details

The card fills its container. In a page that does not fill the window, put it in a bslib::as_fill_carrier() with a height.

See also

survey_chat_ui() for the chat alone. The "panel-chat-form" example of run_example() puts the card in a plain page.

Examples

if (FALSE) { # interactive() && rlang::is_installed("RSQLite")
library(shiny)
library(bslib)

ui <- page_fixed(
  as_fill_carrier(div(
    style = "max-width: 640px; height: 80vh; margin: 2rem auto;",
    survey_panel_ui("survey")
  ))
)
}