別の出力から変数にアクセスするにはどうすればよいですか

まだ読んでいない場合は、利用可能なshinyチュートリアルをご覧ください。

の単一のoutput内部にデータを含める代わりに、serverこれらの変数を他の場所で宣言できます。shinyアプリを作成しているので、これらの変数を変更し、他の変数をoutputs自動的に更新することに興味があるかもしれません。

それが当てはまる場合はreactiveValues、reactive関数を使用または作成することをお勧めします。

以下に例を示します。を使用reactiveValuesすると、値（x、y、zなど）を読み取るときに、呼び出し元の式がその値に反応的に依存します（変更が加えられると更新されます）。これらの値を変更するたびに、その値に依存するすべてのリアクティブ関数に通知されます。

library(shiny)

ui <- fluidPage(
  mainPanel(
    tabsetPanel(type = "tabs",
      tabPanel("Plot", plotOutput("plot")),
      tabPanel("Summary", verbatimTextOutput("summary")),
      tabPanel("Table", tableOutput("table"))
    )
  )
)

server <- function(input, output) {

  my_data <- reactiveValues(
    x = rnorm(100, mean = 1),
    y = rnorm(100, mean = 0),
    z = rnorm(100, mean = 0.5)
  )

  output$table <- renderTable({
    data.frame(my_data$x, my_data$y, my_data$z)
  })

  output$plot <- renderPlot({
    plot(my_data$x, my_data$y)
  })

  output$summary <- renderText({
    "Summary Goes Here"
  })
}

shinyApp(ui = ui, server = server)

また、（コメントで説明されているように）3つすべてを1つのパネルに表示したい場合は、これを使用してくださいui。

ui <- fluidPage(
  mainPanel(
    tabsetPanel(type = "tabs",
                tabPanel("All 3", 
                         plotOutput("plot"),
                         verbatimTextOutput("summary"),
                         tableOutput("table")
                         )
    )
  )
)

input$nRV（コメントに記載されているように）を含める場合は、reactive式を使用して、次のように呼び出しますmy_data()。

server <- function(input, output) { 
  my_data <- reactive({ 
    a = rnorm(input$nRV, mean = 2) 
    b = rnorm(input$nRV, mean = 5) 
    x = rnorm(input$nRV, mean = 3) 
    y = rnorm(input$nRV, mean = 0) 
    z = rnorm(input$nRV, mean = 0.5)
    data.frame(a, b, x, y, z)
  }) 

  output$table <- renderTable({ data.frame(my_data()$x, my_data()$y, my_data()$z) 
  }) 

  output$plot <- renderPlot({ plot(my_data()$x, my_data()$y) }) 
}