В приведенном ниже примере показаны 4 группы в 4 панелях вместе. Но проблема в том, что они, похоже, живут в одной сетке. Можно ли контролировать размер диаграмм в блестящем выходе? (т.е. так, чтобы при запуске приложения не было полосы прокрутки справа). Я пытался контролировать высоту и ширину, но это, похоже, только контролирует изображение внутри самой сетки... любые идеи?
спасибо
shinyUI(pageWithSidebar(
headerPanel("Example"),
sidebarPanel(
),
mainPanel(
tabsetPanel(tabPanel("Main",plotOutput("temp"))
)#tabsetPanel
)#mainPane;
))
shinyServer(function(input, output) {
output$temp <-renderPlot({
par(mfrow=c(2,2))
plot(1:10)
plot(rnorm(10))
plot(rnorm(10))
plot(rnorm(10))
}, height = 1000, width = 1000)
})