WriteMatrixToFile <- function(tmpMatrix, tmpFileName, blnRowNames,
    blnColNames) {
    output <- file(tmpFileName, "at")
    write.table(tmpMatrix, output, sep="\t", quote=FALSE,
        row.names=blnRowNames, col.names=blnColNames)

test_WriteMatrixToFile <- function() {
    checkException(WriteMatrixToFile(tmpMatrix= "string",
        tmpFileName= 1, blnRowNames=TRUE,
        blnColNames=TRUE), msg="Unable to use a number for file name")

Try the multiClust package in your browser

Any scripts or data that you put into this service are public.

multiClust documentation built on Nov. 8, 2020, 5:23 p.m.