Распечатайте Самую Большую Строку С Самым Коротким Кодом

  • Автор темы Светлана17
  • Обновлено
  • 26, Oct 2024
  • #2

Р, 541-9 = 532

При передаче имени встроенной функции в R консоль описывает ее параметры. Я уверен, что есть и более длинные, но я выбрал низко висящие плоды.

Код:

 
 
 help()
 

Выход:

function (all.available = FALSE, lib.loc = NULL) { if (is.null(lib.loc)) lib.loc <- .libPaths() if (all.available) { ans <- character() for (lib in lib.loc[file.exists(lib.loc)]) { a <- list.files(lib, all.files = FALSE, full.names = FALSE) pfile <- file.path(lib, a, "Meta", "package.rds") ans <- c(ans, a[file.exists(pfile)]) } return(unique(ans)) } s <- search() invisible(.rmpkg(s[substr(s, 1L, 8L) == "package:"])) } <bytecode: 0x103fdf200> <environment: namespace:base>

Редактировать: Спасибо Джузеппе за связь

 

Edwardwerb


Рег
06 Apr, 2014

Тем
60

Постов
198

Баллов
518
Тем
403,760
Комментарии
400,028
Опыт
2,418,908

Интересно