R/expdata.R

In LabRS: Laboratorio di Ricerca Sociale con R

#' Esporta un dataset in csv (standard italiano)
#'
#' Esportazione semplificata di un dataframe in formato csv,
#' con \code{\link[utils]{write.table}}, e
#' secondo lo standard italiano:
#' sep = ";",
#' dec = "," (separatore di decimali = virgola), NA = "" (celle vuote),
#' row.names = FALSE
#' (il dataframe da esportare ha una colonna / variabile per gli
#' identificativi di caso).
#' @param x dataset
#' @param file nome del file di esportazione (con estensione csv)
#' @param ... argomenti ereditati da \code{\link[utils]{write.table}}
#' @return file in formato csv
#' @examples
#' \dontrun{
#' data("MYSLID")
#' expdata(MYSLID, file = "MYSLID.csv")
#' }
#' @import utils
#' @export
expdata <- function(x, file, ...) {
  write.table(x, file, dec = ",", sep = ";", na = "", row.names = FALSE, ...)
}