improved import ui and redcap import with status messages

This commit is contained in:
Andreas Gammelgaard Damsbo 2025-04-03 13:11:02 +02:00
commit 2800177fc5
No known key found for this signature in database
13 changed files with 427 additions and 165 deletions

24
man/if_not_missing.Rd Normal file
View file

@ -0,0 +1,24 @@
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/helpers.R
\name{if_not_missing}
\alias{if_not_missing}
\title{Return if available}
\usage{
if_not_missing(data, default = NULL)
}
\arguments{
\item{data}{vector}
\item{default}{assigned value for missings}
}
\value{
vector
}
\description{
Return if available
}
\examples{
NULL |> if_not_missing("new")
c(2,"a",NA) |> if_not_missing()
"See" |> if_not_missing()
}

View file

@ -16,6 +16,17 @@
\item{x}{(\code{tbl_regression}, \code{tbl_uvregression})\cr
A 'tbl_regression' or 'tbl_uvregression' object}
\item{plot_ref}{(scalar \code{logical})\cr
plot reference values}
\item{remove_header_rows}{(scalar \code{logical})\cr
logical indicating whether to remove header rows
for categorical variables. Default is \code{TRUE}}
\item{remove_reference_rows}{(scalar \code{logical})\cr
logical indicating whether to remove reference rows
for categorical variables. Default is \code{FALSE}.}
\item{...}{arguments passed to \code{ggstats::ggcoef_plot(...)}}
}
\value{

View file

@ -6,7 +6,7 @@
\alias{redcap_demo_app}
\title{Shiny module to browser and export REDCap data}
\usage{
m_redcap_readUI(id, title = TRUE)
m_redcap_readUI(id, title = TRUE, url = NULL)
m_redcap_readServer(id)