Have to wrap custom function in all.

dereckmezquita · Jul 29, 2024 · 6d7102c · 6d7102c
1 parent 5fe17e4
commit 6d7102c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/vignettes/intro-to-interface.Rmd b/vignettes/intro-to-interface.Rmd
@@ -329,7 +329,7 @@ PersonFrame <- type.frame(
         name = character,
         age = numeric,
         is_student = logical,
-        email = function(x) all(grepl("^[a-zA-Z0-9._%+-]+@[a-zA-Z0-9.-]+\\.[a-zA-Z]{2,}$", x))
+        email = function(x) all(grepl("^[a-zA-Z0-9._%+-]+@[a-zA-Z0-9.-]+\\.[a-zA-Z]{2,}$", x)) # functions are applied to whole column
     ),
     freeze_n_cols = FALSE,
     row_callback = function(row) {