How do you extract defective rows using AssertR in R? about assertr HOT 2 CLOSED

Hi Datakilimba!

So a few things.
a) For showing errors in a shiny app, you may want to
look at https://github.com/Appsilon/data.validator
which using assertr internally

b)The offending info and rows are stored internally
and accessible. You may want to look into
help("success_and_error_functions")
after you load assertr.
Here an example, (I switched to data.frame because I
don't have tribble and I switched the place of the 0
in column x to better illustrate the point.

> test <- data.frame(x=c(1, 0, 3),
+                    y=c(4, 8, -2))
> test %>%
+   assert(within_bounds(0,100), y,
+          error_fun=error_df_return)  -> tmp
> # looking at the returned data.frame
> tmp
    verb redux_fn             predicate column index value
1 assert       NA within_bounds(0, 100)      y     3    -2
> # access the index/indices/rows of offending data
> tmp$index
[1] 3
>
> # using multiple and chaining
> test %>%
+   chain_start %>%
+   assert(within_bounds(0,100), y) %>%
+   assert(within_bounds(1, 100), x) %>%
+   chain_end(error_fun=error_df_return) -> tmp
>
> tmp
    verb redux_fn             predicate column index value
1 assert       NA within_bounds(0, 100)      y     3    -2
2 assert       NA within_bounds(1, 100)      x     2     0
>
> tmp$index
[1] 3 2

So you can use these indices and remove the offending rows
afterwards.
If you'd like assertr to automatically do it, that seems like
a cool idea; I'd be open to a pull request :)

I'll close this for now put please let me know if I answered
your question properly.

from assertr.

Thank you, this seems neat and tidy. I will give this a go and if a pull request is needed I will go ahead :-).

from assertr.