diff --git a/R/biclique.R b/R/biclique.R index c9a232b..873044d 100644 --- a/R/biclique.R +++ b/R/biclique.R @@ -166,7 +166,7 @@ bi.print <- function(envir = .GlobalEnv$.bienv) #' file.copy(system.file("extdata", "example2.el", package = "biclique"), dir) #' file.copy(system.file("extdata", "example5.bmat", package = "biclique"), dir) #' bi.format(file.path(dir, "example2.el")) -#' bi.format(file.path(dir, "example5.bmat", 1)) +#' bi.format(file.path(dir, "example5.bmat"), 1) #' @importFrom utils read.table write.table #' @export bi.format <- function(filename, filetype = 0) diff --git a/man/bi.format.Rd b/man/bi.format.Rd index dc37025..481160d 100644 --- a/man/bi.format.Rd +++ b/man/bi.format.Rd @@ -24,5 +24,5 @@ dir <- tempdir() file.copy(system.file("extdata", "example2.el", package = "biclique"), dir) file.copy(system.file("extdata", "example5.bmat", package = "biclique"), dir) bi.format(file.path(dir, "example2.el")) -bi.format(file.path(dir, "example5.bmat", 1)) +bi.format(file.path(dir, "example5.bmat"), 1) }