R を使用してサブカテゴリを含むドロップダウン メニューを作成したいのですが、サブカテゴリはどのように導入すればよいですか?
`if (interactive()) {
ui <- fluidPage(
selectInput("variable", "Variable:",
c("HTML Code tester", "Font Styler", "CSS3 Generator", "Box Shadow", "Border Radius"))
)
server <- function(input, output) {
}
shinyApp(ui, server)
}`
望ましい出力のようなものを作成するにはどうすればよいですか?
ありがとう!