data-raw/namespace.R

cat("# Autogenerated from data-raw/namespace.R\n\n", file = "NAMESPACE")

append <- . %>% cat(sep="\n", file = "NAMESPACE", append = TRUE)

c("dplyr_compat", "plyr_compat", "plyr_warn_compat",
  lapply(c("d", "p"), sprintf, fmt=c("%smutate", "%scount", "%srename")) %>% unlist
  ) %>%
  sprintf("export(%s)", .) %>%
  append

"" %>% append

getNamespaceExports("plyr") %>%
  setdiff(c("mutate", "summarise", "summarize", "arrange", "failwith", "id", "rename", "desc", "count")) %>%
  sprintf('"%s"', .) %>%
  sprintf("importFrom(plyr,%s)", .) %>%
  append

"" %>% append

getNamespaceExports("dplyr") %>%
  setdiff(c("count", "mutate", "rename")) %>%
  sprintf('"%s"', .) %>%
  sprintf("importFrom(dplyr,%s)", .) %>%
  append
krlmlr/pdlyr documentation built on May 20, 2019, 6:17 p.m.