Nothing
Code
(expect_error(nest_tree(1L)))
Output
<error/rlang_error>
Error in `nest_tree()`:
! `data` must be a data frame.
Code
(expect_error(nest_tree(df, "not-there")))
Output
<error/vctrs_error_subscript_oob>
Error in `eval_pull()`:
! Can't subset columns that don't exist.
x Column `not-there` doesn't exist.
Code
(expect_error(nest_tree(df, 1:2)))
Output
<error/rlang_error>
Error in `eval_pull()`:
! `id_col` must select 1 column, not 2.
Code
(expect_error(nest_tree(df, id, parent_col = "not-there")))
Output
<error/vctrs_error_subscript_oob>
Error in `eval_pull()`:
! Can't subset columns that don't exist.
x Column `not-there` doesn't exist.
Code
(expect_error(nest_tree(df, id, parent_col = 1:2)))
Output
<error/rlang_error>
Error in `eval_pull()`:
! `parent_col` must select 1 column, not 2.
Code
(expect_error(nest_tree(df, id, parent_col = id)))
Output
<error/rlang_error>
Error in `check_parent_col()`:
! `parent_col` must be different from `id_col`.
Code
(expect_error(nest_tree(df, id, parent, children_to = 1L)))
Output
<error/vctrs_error_cast>
Error in `nest_tree()`:
! Can't convert `children_to` <integer> to <character>.
Code
(expect_error(nest_tree(df, id, parent, children_to = c("a", "b"))))
Output
<error/vctrs_error_assert_size>
Error in `nest_tree()`:
! `children_to` must have size 1, not size 2.
Code
(expect_error(nest_tree(df, id, parent, children_to = "id")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! `children_to` must be different from `id_col`.
Code
(expect_error(nest_tree(df, id, parent, children_to = "parent")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! `children_to` must be different from `parent_col`.
Code
(expect_error(nest_tree(df, id, parent, children_to = "children")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! Each value of column id must be non-missing.
i Element 2 is missing.
Code
(expect_error(nest_tree(df, id, parent, children_to = "children")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! Each value of column id must be unique.
i The elements at locations 1 and 2 are duplicated.
Code
(expect_error(nest_tree(df, id, parent, children_to = "children")))
Output
<error/vctrs_error_cast>
Error in `check_parent_col()`:
! Can't convert `data$parent` <character> to match type of `data$id` <integer>.
Code
(expect_error(nest_tree(df, id, parent, children_to = "children")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! The parent of each element must be found.
i The parent ids 4 and 5 are not found.
Code
(expect_error(nest_tree(df[1:2, ], id, parent, children_to = "children")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! The parent of each element must be found.
i The parent id 4 is not found.
Code
(expect_error(nest_tree(df, id, parent, children_to = "children")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! An element must not be its own parent
i Element 2 refers to itself as parent.
Code
(expect_error(nest_tree(df, id, parent, children_to = "children")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! There must be root elements.
i A root element is an elements whose parent id is missing.
Code
(expect_error(nest_tree(df, id, parent, children_to = "children")))
Output
<error/rlang_error>
Error in `nest_tree()`:
! Each element must be connected to a root element.
i The elements 2 and 3 are not connected.
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.