tabItem(tabName = "pcaPlot",
fluidRow(
column(12,h3(strong("PCAPlot Output:")),
column(3,
wellPanel(
h4("Choose PC to plot:"),
numericInput("dim1", "Dim 1 (X-axis)", value = 1),
numericInput("dim2", "Dim 2 (Y-axis)", value = 2)
)
#actionButton("jackStraw2","Next Step: Determine statistically significant PCs >>",class = "btn btn-success btn-lg", style = "white-space: normal")
),
column(9,
column(12,
#p("Visualize cells and genes that define the PCA"),
#strong(textOutput("numVarGenesFound")),
withSpinner(plotOutput(outputId = "pcaPlot", height = 700))
)
)
)
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.