add .drop, .sep, .preserve to unnest s3 method

This commit is contained in:
Alex Kyllo 2023-03-16 15:34:38 -07:00
Родитель faef203f27
Коммит 417080aee1
2 изменённых файлов: 8 добавлений и 4 удалений

Просмотреть файл

@ -155,7 +155,8 @@ summarise.tbl_kusto_abstract <- function(.data, ..., .strategy = NULL, .shufflek
#' @param .preserve Needed for agreement with generic. Not otherwise used. #' @param .preserve Needed for agreement with generic. Not otherwise used.
#' @export #' @export
unnest.tbl_kusto_abstract <- function(data, cols, ..., keep_empty = FALSE, ptype = NULL, unnest.tbl_kusto_abstract <- function(data, cols, ..., keep_empty = FALSE, ptype = NULL,
names_sep = NULL, names_repair = NULL, .id = NULL) { names_sep = NULL, names_repair = NULL, .drop = NULL,
.id = NULL, .sep = NULL, .preserve = NULL) {
# dots <- quos(...) # dots <- quos(...)
dots <- enquo(cols) dots <- enquo(cols)
add_op_single("unnest", data, dots = dots, args = list(.id = .id)) add_op_single("unnest", data, dots = dots, args = list(.id = .id))

Просмотреть файл

@ -12,7 +12,10 @@
ptype = NULL, ptype = NULL,
names_sep = NULL, names_sep = NULL,
names_repair = NULL, names_repair = NULL,
.id = NULL .drop = NULL,
.id = NULL,
.sep = NULL,
.preserve = NULL
) )
} }
\arguments{ \arguments{
@ -35,10 +38,10 @@ to \code{df \%>\% mutate(y = fun(x, y, z)) \%>\% unnest(y)}.}
\item{names_repair}{Needed for agreement with generic. Not otherwise used.} \item{names_repair}{Needed for agreement with generic. Not otherwise used.}
\item{.id}{Data frame identifier - if supplied, will create a new column with name .id, giving a unique identifier. This is most useful if the list column is named.}
\item{.drop}{Needed for agreement with generic. Not otherwise used.} \item{.drop}{Needed for agreement with generic. Not otherwise used.}
\item{.id}{Data frame identifier - if supplied, will create a new column with name .id, giving a unique identifier. This is most useful if the list column is named.}
\item{.sep}{Needed for agreement with generic. Not otherwise used.} \item{.sep}{Needed for agreement with generic. Not otherwise used.}
\item{.preserve}{Needed for agreement with generic. Not otherwise used.} \item{.preserve}{Needed for agreement with generic. Not otherwise used.}