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

passing additional arguments and applying pagination

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2025-01-20 12:54:09 +01:00
parent 96227d5006
commit f9c585a5fe
No known key found for this signature in database
2 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
R/data-summary.R
View file

@ -12,10 +12,11 @@ data_summary_ui <- function(id) {
}
#' @param id id
#'
#' @param data data
#' @param color.main main color
#' @param color.sec secondary color
#' @param ... arguments passed to toastui::datagrid
#'
#' @name data-summary
#' @returns shiny server module
@ -23,7 +24,8 @@ data_summary_ui <- function(id) {
data_summary_server <- function(id,
data,
color.main,
color.sec) {
color.sec,
...) {
shiny::moduleServer(
id = id,
module = function(input, output, session) {

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

@ -173,7 +173,8 @@ server <- function(input, output, session) {
rv$data_filtered
}),
color.main = "#2A004E",
color.sec = "#C62300"
color.sec = "#C62300",
pagination = 20
)
#########