Я не мог найти встроенный в один, но, глядя на источник для функций, выполняющих большую часть работы, вот функция, которая может извлекать текст со страницы справки.
help_text <- function(...) {
file <- help(...)
path <- dirname(file)
dirpath <- dirname(path)
pkgname <- basename(dirpath)
RdDB <- file.path(path, pkgname)
rd <- tools:::fetchRdDB(RdDB, basename(file))
capture.output(tools::Rd2txt(rd, out="", options=list(underline_titles=FALSE)))
}
Вы можете использовать его со страницами справки и страницами справки по функциям.
h1 <- help_text(utils)
h2 <- help_text(adist)
Вы получите массив строк со страницы справки. Вы можете распечатать их с помощью
cat(h1, sep="\n")
убедитесь, что создали новый google-services.json в firebase или удалите тот, который уже находится в корневой папке вашего проекта.
Из консоли Firebase: