From 9d1aaf44abc9ecfb82f3c03585bfabf1396acdcc Mon Sep 17 00:00:00 2001 From: Daniel Date: Sat, 22 Jun 2024 15:15:45 +0200 Subject: [PATCH] typo --- R/data_tabulate.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/data_tabulate.R b/R/data_tabulate.R index a713109a2..d61c3da6a 100644 --- a/R/data_tabulate.R +++ b/R/data_tabulate.R @@ -409,7 +409,7 @@ as.data.frame.datawizard_tables <- function(x, selected_vars <- unlist(lapply(x, function(i) attributes(i)$varname)) # coerce to data frame, remove rownames data_frames <- lapply(x, function(i) { - # the `format()` methods for objects returned by `data_tabuldate()` call + # the `format()` methods for objects returned by `data_tabulate()` call # `as.data.frame()` - we have to pay attention to avoid infinite iterations # here. At the moment, this is no problem, as objects we have at this stage # are of class "datawizard_table" or "datawizard_crosstab", while this