File: trivariate_select.R

package info (click to toggle)
r-cran-shinystan 2.6.0-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 3,172 kB
  • sloc: sh: 15; makefile: 7
file content (26 lines) | stat: -rw-r--r-- 542 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
fluidRow(
  column(
    width = 3, 
    uiOutput("ui_trivariate_select_x")
  ),
  column(
    width = 3,
    selectizeInput(
      "trivariate_param_y",
      label = strong_bl("y-axis"),
      choices = .param_list,
      selected = if (length(unlist(.param_list)) > 1) 
        unlist(.param_list)[2] else unlist(.param_list)[1],
      multiple = FALSE
    )
  ),
  column(
    width = 3,
    selectizeInput(
      "trivariate_param_z",
      label = strong_bl("z-axis"),
      choices = rev(.param_list),
      multiple = FALSE
    )
  )
)