better test

This commit is contained in:
Andreas Gammelgaard Damsbo 2024-12-04 08:05:45 +01:00
parent 7f04fafd9b
commit 149c2747f4
No known key found for this signature in database
2 changed files with 2 additions and 2 deletions

View File

@ -220,7 +220,7 @@ apply_field_label <- function(data,meta){
#' @export
#'
apply_factor_labels <- function(data,meta=NULL){
if (is.list(data)){
if (is.list(data) && !is.data.frame(data)){
meta <- data$meta
data <- data$data
} else if (is.null(meta)) {

View File

@ -4,7 +4,7 @@
\alias{apply_factor_labels}
\title{Preserve all factor levels from REDCap data dictionary in data export}
\usage{
apply_factor_labels(data, meta)
apply_factor_labels(data, meta = NULL)
}
\arguments{
\item{data}{REDCap exported data set}