diff --git a/R/codeBookGeneric.R b/R/codeBookGeneric.R index f9e4242..7b4de8a 100644 --- a/R/codeBookGeneric.R +++ b/R/codeBookGeneric.R @@ -98,6 +98,9 @@ writeCodeBookLatexGeneric <- function( x <- ds %>% filter(cd_number == 1) %>% dplyr::select(nm) %>% dplyr::collect() %>% dplyr::pull(nm) } else { x <- ds %>% dplyr::select(nm) %>% dplyr::collect() %>% dplyr::pull(nm) + if (cls == "integer") { + x <- as.integer(as.numeric(x)) + } } } else {