Last active
February 11, 2023 21:30
-
-
Save moritzpschwarz/ea367a59fa3ef68eb785d8f1847c824c to your computer and use it in GitHub Desktop.
Add :: to package functions
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
library(xfun) | |
gsub_dir(dir = "R", pattern = "mutate\\(", replacement = "dplyr::mutate\\(") | |
gsub_dir(dir = "R", pattern = "select\\(", replacement = "dplyr::select\\(") | |
gsub_dir(dir = "R", pattern = "filter\\(", replacement = "dplyr::filter\\(") | |
gsub_dir(dir = "R", pattern = "bind_rows\\(", replacement = "dplyr::bind_rows\\(") | |
gsub_dir(dir = "R", pattern = "bind_cols\\(", replacement = "dplyr::bind_cols\\(") | |
gsub_dir(dir = "R", pattern = "case_when\\(", replacement = "dplyr::case_when\\(") | |
gsub_dir(dir = "R", pattern = "left_join\\(", replacement = "dplyr::left_join\\(") | |
gsub_dir(dir = "R", pattern = "full_join\\(", replacement = "dplyr::full_join\\(") | |
gsub_dir(dir = "R", pattern = "contains\\(", replacement = "dplyr::contains\\(") | |
gsub_dir(dir = "R", pattern = "distinct\\(", replacement = "dplyr::distinct\\(") | |
gsub_dir(dir = "R", pattern = "first\\(", replacement = "dplyr::first\\(") | |
gsub_dir(dir = "R", pattern = "any_of\\(", replacement = "dplyr::any_of\\(") | |
gsub_dir(dir = "R", pattern = "all_of\\(", replacement = "dplyr::all_of\\(") | |
gsub_dir(dir = "R", pattern = "group_by\\(", replacement = "dplyr::group_by(") | |
gsub_dir(dir = "R", pattern = "relocate\\(", replacement = "dplyr::relocate(") | |
# new | |
gsub_dir(dir = "R", pattern = "across\\(", replacement = "dplyr::across\\(") | |
gsub_dir(dir = "R", pattern = "starts_with\\(", replacement = "dplyr::starts_with\\(") | |
gsub_dir(dir = "R", pattern = "rename_with\\(", replacement = "dplyr::rename_with\\(") | |
gsub_dir(dir = "R", pattern = "rename\\(", replacement = "dplyr::rename\\(") | |
gsub_dir(dir = "R", pattern = "arrange\\(", replacement = "dplyr::arrange\\(") | |
gsub_dir(dir = "R", pattern = "summarise\\(", replacement = "dplyr::summarise\\(") | |
gsub_dir(dir = "R", pattern = "rowwise", replacement = "dplyr::rowwise()") | |
gsub_dir(dir = "R", pattern = "rowwise\\(\\)\\(", replacement = "rowwise\\(") | |
gsub_dir(dir = "R", pattern = "ungroup", replacement = "dplyr::ungroup()") | |
gsub_dir(dir = "R", pattern = "ungroup\\(\\)\\(\\)", replacement = "ungroup()") | |
gsub_dir(dir = "R", pattern = "ungroup\\(", replacement = "dplyr::ungroup(") | |
gsub_dir(dir = "R", pattern = "tibble\\(", replacement = "dplyr::tibble\\(") | |
gsub_dir(dir = "R", pattern = "as_dplyr::tibble\\(", replacement = "dplyr::as_tibble\\(") | |
gsub_dir(dir = "R", pattern = "pull", replacement = "dplyr::pull()") | |
gsub_dir(dir = "R", pattern = "pull\\(\\)\\(", replacement = "pull(") | |
gsub_dir(dir = "R", pattern = "pull\\(", replacement = "dplyr::pull\\(") | |
# USE WITH CARE! | |
gsub_dir(dir = "R", pattern = "n\\(\\)", replacement = "dplyr::n\\(\\)") | |
gsub_dir(dir = "R", pattern = "returdplyr::n\\(\\)", replacement = "return()") | |
gsub_dir(dir = "R", pattern = "getRversiodplyr::n()", replacement = "getRversion") | |
## tidyr | |
gsub_dir(dir = "R", pattern = "pivot_longer\\(", replacement = "tidyr::pivot_longer\\(") | |
gsub_dir(dir = "R", pattern = "pivot_wider\\(", replacement = "tidyr::pivot_wider\\(") | |
gsub_dir(dir = "R", pattern = "separate\\(", replacement = "tidyr::separate\\(") | |
gsub_dir(dir = "R", pattern = "drop_na\\(", replacement = "tidyr::drop_na\\(") | |
gsub_dir(dir = "R", pattern = "unnest\\(", replacement = "tidyr::unnest\\(") | |
## stringr | |
gsub_dir(dir = "R", pattern = "str_extract_all\\(", replacement = "stringr::str_extract_all\\(") | |
gsub_dir(dir = "R", pattern = "str_detect\\(", replacement = "stringr::str_detect\\(") | |
## ggplot | |
gsub_dir(dir = "R", pattern = "scale_color_discrete\\(", replacement = "ggplot2::scale_color_discrete\\(") | |
gsub_dir(dir = "R", pattern = "scale_color_viridis_d\\(", replacement = "ggplot2::scale_color_viridis_d\\(") | |
gsub_dir(dir = "R", pattern = "aes\\(", replacement = "ggplot2::aes\\(") | |
gsub_dir(dir = "R", pattern = "ggplot\\(", replacement = "ggplot2::ggplot\\(") | |
gsub_dir(dir = "R", pattern = "facet_wrap\\(", replacement = "ggplot2::facet_wrap\\(") | |
gsub_dir(dir = "R", pattern = "geom_line\\(", replacement = "ggplot2::geom_line\\(") | |
gsub_dir(dir = "R", pattern = "scale_y_continuous\\(", replacement = "ggplot2::scale_y_continuous\\(") | |
gsub_dir(dir = "R", pattern = "labs\\(", replacement = "ggplot2::labs\\(") | |
gsub_dir(dir = "R", pattern = "theme\\(", replacement = "ggplot2::theme\\(") | |
gsub_dir(dir = "R", pattern = "theme_minimal\\(", replacement = "ggplot2::theme_minimal\\(") | |
gsub_dir(dir = "R", pattern = "element_blank\\(", replacement = "ggplot2::element_blank\\(") | |
gsub_dir(dir = "R", pattern = "arrow\\(", replacement = "ggplot2::arrow\\(") | |
gsub_dir(dir = "R", pattern = "unit\\(", replacement = "ggplot2::unit\\(") | |
gsub_dir(dir = "R", pattern = "unit\\(", replacement = "ggplot2::unit\\(") | |
## utils | |
gsub_dir(dir = "R", pattern = "tail\\(", replacement = "utils::tail\\(") | |
## remove errors | |
gsub_dir(dir = "R", pattern = "dplyr::dplyr::dplyr::", replacement = "dplyr::") | |
gsub_dir(dir = "R", pattern = "dplyr::dplyr::", replacement = "dplyr::") | |
gsub_dir(dir = "R", pattern = "tidyr::tidyr::", replacement = "tidyr::") | |
gsub_dir(dir = "R", pattern = "ggplot2::ggplot2::", replacement = "ggplot2::") | |
gsub_dir(dir = "R", pattern = "stringr::stringr::", replacement = "stringr::") | |
gsub_dir(dir = "R", pattern = "utils::utils::", replacement = "utils::") |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment