## ui.R ## dashboardPage( dashboardHeader( title = "GemFin", tags$li( class = "dropdown", style = "padding: 8px 10px;", actionBttn("back_btn", "Zurück", size = "xs", style = "minimal", icon = icon("arrow-left")) ) ), ## Sidebar content dashboardSidebar( sidebarMenu(id = "tabs", menuItem("buchungen", tabName = "buchungen", icon = icon("list")), menuItem("konten", tabName = "konten", icon = icon("building-columns")) ), conditionalPanel( condition = "input.tabs == 'buchungen'", tags$ul( class = "sidebar-menu", tags$li( class = "treeview", tags$a(href = "#", tags$i(class = "fa fa-filter"), tags$span("Filter"), tags$span(class = "pull-right-container", tags$i(class = "fa fa-angle-left pull-right") ) ), tags$ul( class = "treeview-menu", style = "padding: 5px 0;", tags$li(actionBttn("filter_alle", "Alle", size = "xs", style = "minimal")), tags$li(actionBttn("filter_giro", "Girokonto", size = "xs", style = "minimal")), tags$li(actionBttn("filter_monat", "Dieser Monat", size = "xs", style = "minimal")) ) ) ) ) ), dashboardBody( tabItems( # First tab content tabItem(tabName = "buchungen", buchungenUI("buchungen_tab") ), # Second tab content tabItem(tabName = "konten", accountsUI("accounts_tab") ) ) ) )