From f9609654c5f1b85b8a9c220f4f54e162a2da7016 Mon Sep 17 00:00:00 2001 From: Gootjes Date: Wed, 21 Jun 2023 15:11:57 +0200 Subject: [PATCH] revert a modification I did in tidy_sem.data.frame --- R/syntax_data_dictionary.R | 4 ---- 1 file changed, 4 deletions(-) diff --git a/R/syntax_data_dictionary.R b/R/syntax_data_dictionary.R index b0819a2..9db752e 100644 --- a/R/syntax_data_dictionary.R +++ b/R/syntax_data_dictionary.R @@ -66,11 +66,7 @@ tidy_sem.character <- function(x, split = "_"){ #' @export tidy_sem.data.frame <- function(x, split = "_"){ Args <- as.list(match.call()[-1]) - - if(anyNA(names(x))) stop("data frame 'x' has missing variable names") - Args$x <- names(x) - out <- list(dictionary = do.call(.dict_internal, Args), data = x, syntax = NULL)