r - shinydashboard does not work with uiOutput -

-

i setup ui in server.r more control, shinydashboard not work when defined in server.r. use method navbarpage without problems.

this code works

library(shiny)      library(shinydashboard)  ui     <- dashboardpage(  dashboardheader( ),                            dashboardsidebar(),                           dashboardbody()   )  server <- shinyserver(function(input, output) {   }) runapp(list(ui= ui, server = server))

but 1 show empty page

ui     <-  uioutput('dash') server <- shinyserver(function(input, output) {    output$dash <- renderui({        dashboardpage(dashboardheader( ),                    dashboardsidebar(),                   dashboardbody()  )   })  }) runapp(list(ui= ui, server = server))

this example using navbarpage, works fine

ui     <-  uioutput('nav') server <- shinyserver(function(input, output) {    output$nav <- renderui({        navbarpage("app title",                  tabpanel("tab 1"),                    tabpanel("tab 2")  )    }) })   runapp(list(ui= ui, server = server))

i don't think can use uioutput create dashboard. i'm assuming goal create dynamic dashboard. need define header, body , side bar in ui , use functions such rendermenu on server create it. here example create dashboard ui defined in server.

ui <- dashboardpage(   dashboardheader(title = "my page"),   dashboardsidebar(sidebarmenuoutput("sidebar_menu_ui")),   dashboardbody(     uioutput("body_ui"),     uioutput("test_ui")   ) )  server <- shinyserver(function(input, output, session) {    output$sidebar_menu_ui <- rendermenu({     sidebarmenu(id = "sidebar_menu",       menuitem("menu 1", tabname="menu1_tab", icon = icon("calendar")),       menuitem("menu 2", tabname="menu2_tab", icon = icon("database"))     )   })    output$test_ui <- renderui ({     tabitems(       tabitem(tabname = "menu1_tab", uioutput("menu1_ui")),       tabitem(tabname = "menu2_tab", uioutput("menu2_ui"))     )   })   output$body_ui <- renderui ({     p("default content in body outsite sidebar menus.")   })   output$menu1_ui <- renderui ({     box("menu 1 content")   })   output$menu2_ui <- renderui ({     box("menu 2 content")   })  })  runapp(list(ui= ui, server = server))

in example, menu sidebar not selected default , content of body_ui visible time. if want dashboard starts on specific menu, put sidebarmenu in ui. can delete body_ui.


Comments

Post a Comment

Popular posts from this blog

Spring Boot + JPA + Hibernate: Unable to locate persister -

-
i trying work entity inside request method of spring boot application. entity in project , pom.xml has dependencies it. why error message?: org.hibernate.unknownentitytypeexception: unable locate persister: com.ric.bill.model.bs.par package com.ric.web; import java.util.concurrent.atomic.atomiclong; import javax.persistence.entitymanager; import javax.persistence.persistencecontext; import net.sf.ehcache.cachemanager; import net.sf.ehcache.management.cache; import net.sf.ehcache.management.cachestatistics; import org.hibernate.stat.statistics; import org.springframework.beans.factory.annotation.autowired; import org.springframework.boot.autoconfigure.domain.entityscan; import org.springframework.cache.annotation.enablecaching; import org.springframework.transaction.annotation.enabletransactionmanagement; import org.springframework.transaction.annotation.propagation; import org.springframework.transaction.annotation.transactional; import org.springframework.web.bind.annotati
Read more

go - Golang: panic: runtime error: invalid memory address or nil pointer dereference using bufio.Scanner -

-
i implementing go program uses bufio.scanner , bufio.writer have packaged code follows package main import ( "fmt" "player/command" "strings" ) func main() { //enter code here. read input stdin. print output stdout commands.scanner.scan() { //scan new line , send comand variable check command exist or not input := strings.split(strings.trim(commands.scanner.text(), " "), " ") command := input[0] if command == "" { fmt.printf("$ %s:", commands.pwd) continue } if !commands.commands[command] { commands.throwerror("cannot recognize input.") } else { commands.execute(command, input[1:], nil) } fmt.printf("$ %s:", commands.pwd) } } i using init.go file in main package follows package main import ( "flag" "player/sourc
Read more

c - double free or corruption (fasttop) -

-
this code reads null terminated string file (file containing null terminated strings & should provide index wanted string). error: *** error in `./main': double free or corruption (fasttop): 0x090a4a80 *** aborted code: char *tmp_realloc=null; char *sstring=null; int i=1; /*set file pointer point string*/ fseek(fh,index,seek_set); sstring=(char*)malloc(sizeof(char)); if(sstring == null) return null; tmp_realloc=sstring; while( (*(sstring+i-1)=(char)fgetc((file*)fh)) != 0x0 ) { /*reallocate more memory*/ tmp_realloc=(char*)realloc((char*)sstring,++i); /*if not same address copy old new & set old point new*/ if(tmp_realloc != sstring){ strcpy((char*)tmp_realloc,(char*)sstring); free(sstring); sstring=tmp_realloc; } } could tell me pointer causing issue (& reason) ? remove part /*if not same address copy old new & set old point new*/ if(tmp_realloc != sstring){ strc
Read more