I'm trying to create an R markdown document which contains an embedded shiny app.
I have a function which creates the ui and server pieces of the app, and I can then embed it in the document using:
## {r shinyapp, fig.height=8, out.height=8}
gadget <- MakeCompensatoryGadget(partial3)
shinyApp(gadget$ui,gadget$server,options(height="2000px")
The app renders correctly, but is is placed inside of a scrolling frame. How can I adjust the size of that frame (so I can use the main scrolling of the page) rather than having the app scroll. (As it is, the user can't get the controls and the picture on the same frame, so it makes things more complex.
Here is what it looks like:
Here is what it looks like:
I've tried adding both options(height=XXX) to shinyApp and fig.height and out.height options to the chunk.
The example is running online on my server pluto.coe.fsu.edu at rdemos/Peanut/CompensatoryGadget.Rmd
The source code on the same server svn/common/rgroup-shiny/Peanut/CompensatoryGadget.Rmd