dwww Home | Show directory contents | Find package

foobar <- function(argument) {
  argument
}

#' foobar2
#' @export
#' @examples
#' foobar2()

foobar2 <- function() {
  outfile <- Sys.getenv("RCMDCHECK_OUTPUT", "")
  if (nzchar(outfile)) {
    cat(Sys.getpid(), sep = "\n", file = outfile)
  }
}

foobar2()

while (TRUE) Sys.sleep(1000)

Generated by dwww version 1.15 on Sat May 18 10:39:16 CEST 2024.