second test works

sofiasiamp · Feb 22, 2024 · 84dd5db · 84dd5db
1 parent ccc1abf
commit 84dd5db
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-datashield_descriptive.R b/tests/testthat/test-datashield_descriptive.R
@@ -19,7 +19,7 @@ test_that("datashield_descriptive Errors", {
   df_comparison2 <- data.frame(Server1.class = c("integer", "factor", "integer", "numeric"),
                                Server2.class = c("integer", "factor", "integer", "numeric"),
                                Server3.class = c("integer", "factor", "integer", "numeric"),
-                               Server4.class = c("integer", "factor", "integer", "numeric"))
+                               Server4.class = c("integer", "factor", "integer", "character"))
 
   row.names(df_comparison2) <- c("ID", "Sex", "Age", "Weight")