Nothing
Code
vec_ptype_show(mtcars)
Output
Prototype: data.frame<
mpg : double
cyl : double
disp: double
hp : double
drat: double
wt : double
qsec: double
vs : double
am : double
gear: double
carb: double
>
Code
vec_ptype_show(iris)
Output
Prototype: data.frame<
Sepal.Length: double
Sepal.Width : double
Petal.Length: double
Petal.Width : double
Species : factor<fb977>
>
Code
vec_ptype_show(df)
Output
Prototype: data.frame<
x: integer
a:
data.frame<
a: integer
b: character
>
b: list_of<double>
c:
list_of<
data.frame<
x: integer
y: character
>
>
>
x
must be a listCode
(expect_error(new_data_frame(1), "`x` must be a list"))
Output
<error/rlang_error>
Error:
! `x` must be a list
n
must be an integer of size 1Code
(expect_error(new_data_frame(n = c(1L, 2L)), "must be an integer of size 1"))
Output
<error/rlang_error>
Error in `new_data_frame()`:
! `n` must be an integer of size 1.
Code
(expect_error(new_data_frame(n = "x"), "must be an integer of size 1"))
Output
<error/rlang_error>
Error in `new_data_frame()`:
! `n` must be an integer of size 1.
n
can't be negative or missing (#1477)Code
(expect_error(new_data_frame(n = -1L)))
Output
<error/rlang_error>
Error in `new_data_frame()`:
! `n` can't be negative.
Code
(expect_error(new_data_frame(n = NA_integer_)))
Output
<error/rlang_error>
Error in `new_data_frame()`:
! `n` can't be missing.
class
must be a character vectorCode
(expect_error(new_data_frame(class = 1), "must be NULL or a character vector"))
Output
<error/rlang_error>
Error:
! `class` must be NULL or a character vector
Code
(expect_error(data_frame(a = 1, a = 1)))
Output
<error/vctrs_error_names_must_be_unique>
Error in `data_frame()`:
! Names must be unique.
x These names are duplicated:
* "a" at locations 1 and 2.
i Use argument `.name_repair` to specify repair strategy.
Code
(expect_error(data_frame(a = 1, a = 1, .error_call = call("foo"))))
Output
<error/vctrs_error_names_must_be_unique>
Error in `foo()`:
! Names must be unique.
x These names are duplicated:
* "a" at locations 1 and 2.
i Use argument `.name_repair` to specify repair strategy.
Code
(expect_error(data_frame(a = 1:2, b = int())))
Output
<error/vctrs_error_incompatible_size>
Error in `data_frame()`:
! Can't recycle `a` (size 2) to match `b` (size 0).
Code
(expect_error(data_frame(a = 1:2, b = int(), .error_call = call("foo"))))
Output
<error/vctrs_error_incompatible_size>
Error in `foo()`:
! Can't recycle `a` (size 2) to match `b` (size 0).
Code
(expect_error(df_list(a = 1, a = 1)))
Output
<error/vctrs_error_names_must_be_unique>
Error in `df_list()`:
! Names must be unique.
x These names are duplicated:
* "a" at locations 1 and 2.
i Use argument `.name_repair` to specify repair strategy.
Code
(expect_error(df_list(a = 1, a = 1, .error_call = call("foo"))))
Output
<error/vctrs_error_names_must_be_unique>
Error in `foo()`:
! Names must be unique.
x These names are duplicated:
* "a" at locations 1 and 2.
i Use argument `.name_repair` to specify repair strategy.
Code
(expect_error(df_list(a = 1:2, b = int())))
Output
<error/vctrs_error_incompatible_size>
Error in `df_list()`:
! Can't recycle `a` (size 2) to match `b` (size 0).
Code
(expect_error(df_list(a = 1:2, b = int(), .error_call = call("foo"))))
Output
<error/vctrs_error_incompatible_size>
Error in `foo()`:
! Can't recycle `a` (size 2) to match `b` (size 0).
Code
expect_error(data_frame(1:2, 1:3), class = "vctrs_error_incompatible_size")
.unpack
is validatedCode
df_list(.unpack = 1)
Condition
Error in `df_list()`:
! `.unpack` must be `TRUE` or `FALSE`.
Code
df_list(.unpack = c(TRUE, FALSE))
Condition
Error in `df_list()`:
! `.unpack` must be `TRUE` or `FALSE`.
.name_repair
can be quietCode
dfl_unique <- df_list(1, 2, .name_repair = "unique_quiet")
dfl_universal <- df_list(`if` = 1, `in` = 2, .name_repair = "universal_quiet")
df_unique <- data_frame(1, 2, .name_repair = "unique_quiet")
df_universal <- data_frame(`if` = 1, `in` = 2, .name_repair = "universal_quiet")
Code
local_error_call(call("my_function"))
(expect_error(vec_ptype2(df1, df3), class = "vctrs_error_incompatible_type"))
Output
<error/vctrs_error_ptype2>
Error in `my_function()`:
! Can't combine `df1$x` <double> and `df3$x` <character>.
Code
(expect_error(vec_ptype2(df3, df1), class = "vctrs_error_incompatible_type"))
Output
<error/vctrs_error_ptype2>
Error in `my_function()`:
! Can't combine `df3$x` <character> and `df1$x` <double>.
Code
(expect_error(vec_cast(df2, df1), class = "vctrs_error_incompatible_type"))
Output
<error/vctrs_error_cast_lossy_dropped>
Error in `my_function()`:
! Can't convert from `df2` <vctrs_foobar<
x: double
y: double
>> to <vctrs_foobar<x:double>> due to loss of precision.
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.