R/write_delim2.R

In lbraglia/yapomif: Yet another package of misc functions

#' Write a tab separated file with "," as decimal separator.
#' 
#' 
#' This function is a wrapper around read.table to write tab separated files
#' with "." as decimal separator.
#' 
#' @rdname write_delim2
#' @param x Matrix or data.frame to be exported
#' @param file file parameter of write.table
#' @param row.names row names
#' @param col.names col names
#' @param quote quote
#' @param append append
#' @param na NA string
#' @param dec Decimal separator
#' @return Return write.table stuff
#' @export write.delim2
write.delim2 <- function(x=NULL,
                        file="",
                        row.names=FALSE,
                        col.names=TRUE,
                        quote=TRUE,
                        append=FALSE,
                        na="",
                        dec=","){
    write.table(x = x,
                file=file,
                sep="\t",
                dec=dec,
                row.names=row.names,
                col.names=col.names,
                quote=quote,					
                append=append,
                na=na
                )
}