Running examples in 'ggdag-Ex.R' failed
The error most likely occurred in:

> ### Name: ggdag
> ### Title: Quickly plot a DAG in ggplot2
> ### Aliases: ggdag
> 
> ### ** Examples
> 
> 
> dag  <- dagify(y ~ x + z2 + w2 + w1,
+   x ~ z1 + w1,
+   z1 ~ w1 + v,
+   z2 ~ w2 + v,
+   w1 ~~ w2)
> 
> ggdag(dag)
> ggdag(dag) + theme_dag_blank()
> 
> ggdag(dagitty::randomDAG(5, .5))
Error in `stop_subscript()`:
! Can't subset columns that don't exist.
✖ Column `v` doesn't exist.
Backtrace:
     ▆
  1. ├─ggdag::ggdag(dagitty::randomDAG(5, 0.5))
  2. │ ├─if_not_tidy_daggity(.tdy_dag, ...) %>% ...
  3. │ └─ggdag:::if_not_tidy_daggity(.tdy_dag, ...)
  4. │   └─ggdag::tidy_dagitty(.dagitty, ...)
  5. │     └─... %>% ...
  6. ├─ggplot2::ggplot(., ggplot2::aes(x = x, y = y, xend = xend, yend = yend))
  7. ├─igraph::graph_from_data_frame(.)
  8. │ └─base::as.data.frame(d)
  9. ├─dplyr::select(., v, w)
 10. └─dplyr:::select.data.frame(., v, w)
 11.   └─tidyselect::eval_select(expr(c(...)), .data)
 12.     └─tidyselect:::eval_select_impl(...)
 13.       ├─tidyselect:::with_subscript_errors(...)
 14.       │ ├─base::tryCatch(...)
 15.       │ │ └─base tryCatchList(expr, classes, parentenv, handlers)
 16.       │ │   └─base tryCatchOne(expr, names, parentenv, handlers[[1L]])
 17.       │ │     └─base doTryCatch(return(expr), name, parentenv, handler)
 18.       │ └─tidyselect:::instrument_base_errors(expr)
 19.       │   └─base::withCallingHandlers(...)
 20.       └─tidyselect:::vars_select_eval(...)
 21.         └─tidyselect:::walk_data_tree(expr, data_mask, context_mask)
 22.           └─tidyselect:::eval_c(expr, data_mask, context_mask)
 23.             └─tidyselect:::reduce_sels(node, data_mask, context_mask, init = init)
 24.               └─tidyselect:::walk_data_tree(new, data_mask, context_mask)
 25.                 └─tidyselect:::as_indices_sel_impl(...)
 26.                   └─tidyselect:::as_indices_impl(x, vars, strict = strict)
 27.                     └─tidyselect:::chr_as_locations(x, vars)
 28.                       └─vctrs::vec_as_location(x, n = length(vars), names = vars)
 29.                         └─vctrs `<fn>`()
 30.                           └─vctrs:::stop_subscript_oob(...)
 31.                             └─vctrs:::stop_subscript(...)
 32.                               └─rlang::abort(...)
Execution halted