R/reexports.R

In kongdd/Ipaper: Collection of personal practical R functions

#' @export
transpose <- purrr::transpose

#' @importFrom purrr map map_depth `%||%`
#' @export
purrr::`%||%`

#' @export
purrr::map
# #' @importFrom progress progress_bar
# map <- function(.x, .f, ...) {
#     n = length(.x)
#     pb <- progress_bar$new(total = n)
#     .f <- as_mapper(.f, ...)
#     .f2 = function(..., .x = ..1, .y = ..2, . = ..1) {
#         pb$tick()
#         .f(..., .x, .y, .)
#     }
#     # browser()
#     .Call(purrr:::map_impl, environment(), ".x", ".f2", "list")
# }

#' @importFrom plyr mapvalues revalue
#' @export
plyr::mapvalues

#' @export
plyr::revalue

#' @importFrom dplyr mutate top_n top_frac as_tibble tribble select rename arrange
# #' @export
# dplyr::first

# #' @export
# dplyr::last
first <- function(x) {
  x[[1]]
}

last <- function(x) {
  x[[length(x)]]
}


#' @export
dplyr::select

#' @export
dplyr::rename

#' @export
dplyr::arrange

#' @export
dplyr::mutate

#' @export
dplyr::top_n

#' @export
dplyr::top_frac

#' @export
dplyr::as_tibble

#' @export 
dplyr::tribble

#' @export
magrittr::`%>%`

#' @export
magrittr::`%<>%`

#' @export
magrittr::set_names


#' @importFrom data.table data.table is.data.table as.data.table fread fwrite
#' @export
data.table::data.table

#' @export
data.table::is.data.table

#' @export
data.table::fread

#' @export
data.table::fwrite

#' @export
data.table::as.data.table

#' @importFrom lubridate make_date make_datetime days_in_month month year day
#' @export
lubridate::make_date

#' @export
lubridate::make_datetime

#' @import glue
#' @export
glue::glue

#' @export
lubridate::days_in_month

#' @importFrom foreach foreach %do% %dopar%
#' @export 
foreach::`%dopar%`

#' @export 
foreach::`%do%`

#' @import iterators
#' @export 
iterators::iter

#' @import matrixStats
#' @export
matrixStats::rowSums2

#' @export
matrixStats::rowMeans2

#' @export
matrixStats::rowQuantiles
matrixStats::rowQuantiles

#' @export
iterators::icount

# #' @export
# lubridate::date

#' @importFrom remotes install_github install_gitlab install_git
#' @export
remotes::install_github

#' @export
remotes::install_gitlab

#' @export
remotes::install_git

#' @import usethis
#' @export
usethis::edit_r_environ

#' @export
usethis::edit_r_profile

#' @export
usethis::use_git_ignore

#' @export
usethis::use_build_ignore

#' @import zeallot
#' @export
zeallot::`%->%`

#' @export
zeallot::`%<-%`