Displaying 2 results from an estimated 2 matches for "textoutput".
Did you mean:
testoutput
2024 Jun 06
2
R Shiny Help - Trouble passing user input columns to emmeans after ANOVA analysis
...ibrary(lme4)
ui <- fluidPage(
fileInput("file1", "Choose .csv or .xlsx file",
accept = c("text/csv",
"text/comma-separated-values",
".csv",
".xlsx")),
textOutput("data_info"),
verbatimTextOutput("data_head"),
uiOutput("column_selector_1"),
uiOutput("column_selector_2"),
uiOutput("column_selector_3"),
uiOutput("column_selector_4"),
textOutput("dist_info"),
plotOutput("di...
2018 Nov 21
2
Promises Future en shiny no me funciona
...é creeis que puede estar pasando? Lo curioso es que si os fijais en la consola, si que funciona bien.
library(future)
library(promises)
plan(multiprocess)
heavyFunction <- function(n){
Sys.sleep(n)
print(n)
}
ui <- fluidPage(
actionButton("go","Show the data"),
textOutput("result0sec"),
textOutput("result10sec")
)
server <- function(input,output,session){
data0 <- eventReactive(input$go,{
heavyFunction(0)
})
data10 <- eventReactive(input$go,{
future(heavyFunction(10))
})
output$result0sec <- renderText({...