andreas/FreesearchR
1
0
Fork 0
mirror of https://github.com/agdamsbo/FreesearchR.git synced 2025-09-12 18:09:39 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions 1

fixed browser

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2025-01-23 09:10:31 +01:00
parent 02dfcf50d6
commit 32bdea64ed
No known key found for this signature in database
4 changed files with 23 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
inst/apps/data_analysis_modules/app.R
View file

@ -3599,7 +3599,15 @@ ui_elements <- list(
# ), # ),
# shiny::column( # shiny::column(
# width = 8, # width = 8,
toastui::datagridOutput(outputId = "table_mod") # , fluidRow(
toastui::datagridOutput(outputId = "table_mod")
),
shiny::tags$br(),
shiny::tags$br(),
shiny::tags$br(),
shiny::tags$br(),
shiny::tags$br()
# ,
# shiny::tags$b("Reproducible code:"), # shiny::tags$b("Reproducible code:"),
# shiny::verbatimTextOutput(outputId = "filtered_code") # shiny::verbatimTextOutput(outputId = "filtered_code")
# ), # ),
@ -4134,7 +4142,8 @@ server <- function(input, output, session) {
# data <- rv$data # data <- rv$data
toastui::datagrid( toastui::datagrid(
# data = rv$data # , # data = rv$data # ,
data = data_filter(), pagination = 30, data = data_filter(),
pagination = 10
# bordered = TRUE, # bordered = TRUE,
# compact = TRUE, # compact = TRUE,
# striped = TRUE # striped = TRUE

2
inst/apps/data_analysis_modules/rsconnect/shinyapps.io/agdamsbo/freesearcheR.dcf
View file

@ -5,6 +5,6 @@ account: agdamsbo
server: shinyapps.io server: shinyapps.io
hostUrl: https://api.shinyapps.io/v1 hostUrl: https://api.shinyapps.io/v1
appId: 13611288 appId: 13611288
bundleId: 9687528 bundleId: 9687629
url: https://agdamsbo.shinyapps.io/freesearcheR/ url: https://agdamsbo.shinyapps.io/freesearcheR/
version: 1 version: 1

3
inst/apps/data_analysis_modules/server.R
View file

@ -247,7 +247,8 @@ server <- function(input, output, session) {
# data <- rv$data # data <- rv$data
toastui::datagrid( toastui::datagrid(
# data = rv$data # , # data = rv$data # ,
data = data_filter(), pagination = 30, data = data_filter(),
pagination = 10
# bordered = TRUE, # bordered = TRUE,
# compact = TRUE, # compact = TRUE,
# striped = TRUE # striped = TRUE

10
inst/apps/data_analysis_modules/ui.R
View file

@ -235,7 +235,15 @@ ui_elements <- list(
# ), # ),
# shiny::column( # shiny::column(
# width = 8, # width = 8,
toastui::datagridOutput(outputId = "table_mod") # , fluidRow(
toastui::datagridOutput(outputId = "table_mod")
),
shiny::tags$br(),
shiny::tags$br(),
shiny::tags$br(),
shiny::tags$br(),
shiny::tags$br()
# ,
# shiny::tags$b("Reproducible code:"), # shiny::tags$b("Reproducible code:"),
# shiny::verbatimTextOutput(outputId = "filtered_code") # shiny::verbatimTextOutput(outputId = "filtered_code")
# ), # ),