Nothing
Code
(expect_error(validate_grouped_df(df1)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! The `.rows` column must be list of one-based integer vectors.
Code
(expect_error(group_data(df1)))
Output
<error/rlang_error>
Error in `group_data()`:
! `.data` must be a valid <grouped_df> object.
Caused by error in `validate_grouped_df()`:
! The `.rows` column must be list of one-based integer vectors.
Code
(expect_error(validate_grouped_df(df2)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! The last column of the `groups` attribute must be called `.rows`.
Code
(expect_error(validate_grouped_df(df2)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! The last column of the `groups` attribute must be called `.rows`.
Code
(expect_error(validate_grouped_df(df3)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! The `groups` attribute must be a data frame.
Code
(expect_error(validate_grouped_df(df4)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! The `groups` attribute must be a data frame.
Code
(expect_error(validate_grouped_df(df5)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! Corrupt `grouped_df` using old (< 0.8.0) format.
i Strip off old grouping with `ungroup()`.
Code
(expect_error(validate_grouped_df(df6, check_bounds = TRUE)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! out of bounds indices.
Code
(expect_error(validate_grouped_df(df7, check_bounds = TRUE)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! out of bounds indices.
Code
(expect_error(validate_grouped_df(df8, check_bounds = TRUE)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! out of bounds indices.
Code
(expect_error(validate_grouped_df(df10)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! The `groups` attribute must be a data frame.
Code
(expect_error(validate_grouped_df(df11)))
Output
<error/rlang_error>
Error in `validate_grouped_df()`:
! The `groups` attribute must be a data frame.
Code
(expect_error(new_grouped_df(tibble(x = 1:10), tibble(other = list(1:2)))))
Output
<error/rlang_error>
Error in `new_grouped_df()`:
! The last column of `groups` must be called ".rows".
Code
(expect_error(new_grouped_df(10)))
Output
<error/rlang_error>
Error in `new_grouped_df()`:
! `x` must be a data frame.
Code
(expect_error(grouped_df(data.frame(x = 1), "y", FALSE)))
Output
<error/rlang_error>
Error in `compute_groups()`:
! `vars` missing from `data`: `y`.
Code
(expect_error(grouped_df(data.frame(x = 1), 1)))
Output
<error/rlang_error>
Error in `grouped_df()`:
! `vars` must be a character vector.
dplyr.legacy_locale forces the system localeCode
result <- compute_groups(df, "x")
Condition
Warning:
`options(dplyr.legacy_locale =)` was deprecated in dplyr 1.2.0.
i If needed for `arrange()`, use `arrange(.locale =)` instead.
i If needed for `group_by() |> summarise()`, follow up with an additional `arrange(.locale =)` call.
i Use `Sys.getlocale("LC_COLLATE")` to determine your system locale, and compare against `stringi::stri_locale_list()` to determine the `.locale` value to use.
Code
result <- group_by(df, x)
Condition
Warning:
`options(dplyr.legacy_locale =)` was deprecated in dplyr 1.2.0.
i If needed for `arrange()`, use `arrange(.locale =)` instead.
i If needed for `group_by() |> summarise()`, follow up with an additional `arrange(.locale =)` call.
i Use `Sys.getlocale("LC_COLLATE")` to determine your system locale, and compare against `stringi::stri_locale_list()` to determine the `.locale` value to use.
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.