8 Importar y exportar datos
8.1 Leer datos de un archivo
8.1.1 Transformar datos en formato TXT o CSV
Hay muchas maneras de leer el contenido de un archivo con R. Sin embargo, nos enfocaremos en leer los archivos TXT y CSV que son los más comunes y los más confiables. Con raras excepciones, todos los archivos de datos se pueden transformar fácilmente en formatos TXT y CSV. Esta es la práctica preferida para el análisis de datos con R.
En concreto, desde Microsoft Excel, simplemente vamos a Archivo, luego Guardar como, seleccionamos el lugar donde queremos guardar nuestro archivo (hablaremos en el siguiente capítulo sobre la gestión de un proyecto R) y luego en el la ventana de copia de seguridad cambiamos el Tipo desde XLSX hacia CSV. Desde LibreOffice Calc, simplemente vamos a Archivo, luego Guardar como, luego seleccionamos el tipo CSV. Es importante saber que el archivo CSV no admite el formato de archivos de hoja de cálculo con, por ejemplo, colores, y que el archivo CSV contiene solo una pestaña. Si tenemos un archivo de hoja de cálculo con varias pestañas, tendremos que guardar tantos archivos CSV como pestañas.
CSV viene del Inglés Comma-separated values (https://es.wikipedia.org/wiki/Valores_separados_por_comas) y representa los datos de hoja de cálculo en un formato de texto separado por comas (o punto y coma según el país). Siempre se puede abrir un archivo CSV con software de hoja de cálculo, pero también con un editor de texto simple como el bloc de notas de Windows o con Notepad++. Es preferible abrir archivos CSV con un editor de texto porque las hojas de cálculo tienden a querer cambiar automáticamente los archivos CSV y esto tiene el efecto de dificultar su lectura.
Una vez que se obtiene el archivo TXT o CSV, la lectura del contenido desde R es fácil, aun que requiere un poco de rigor.
8.1.2 Leer un archivo CSV
Esta es la fuente de error más común para los principiantes en R. Es por eso que es importante leer y volver a leer este capítulo y lo siguiente sobre la gestión de un proyecto R con mucha atención.
R funciona en un directorio definido por defecto. Los usuarios de Rstudio u otro entorno de desarrollo especializado para R intentarán usar las opciones disponibles a través de los menús para establecer su directorio de trabajo o cargar el contenido de un archivo. En este libro, estas técnicas nunca se usarán porque no permiten la reproducibilidad de los resultados. Un script debe poder funcionar para todos los sistemas operativos y sin tener en cuenta el entorno de desarrollo del usuario.
El directorio de trabajo por defecto se puede obtener con la función getwd() y cambiar con la función setwd().
oldWd <- getwd()
print(oldWd)## [1] "C:/Users/nous/Documents/Francois/GITHUB/myRbook_SP"setwd("..")
getwd()## [1] "C:/Users/nous/Documents/Francois/GITHUB"setwd(oldWd)
getwd()## [1] "C:/Users/nous/Documents/Francois/GITHUB/myRbook_SP"Entonces tenemos cuatro opciones:
- podemos leer el contenido de un archivo indicando a R su ruta completa (limitacion para la reproducibilidad de los resultados)
- podemos leer el contenido de un archivo indicando a R su ruta relativa
- podemos mover el archivo en el directorio de trabajo de R
- podemos modificar el directorio de trabajo de R para que coincida con la ubicación de nuestro archivo (con su ruta relativa)
Un ejemplo de una ruta completa sería:
/home/myName/myFile.csven un entorno UNIXC:/users/myName/myFile.csvbajo un entorno de Windows (tenga cuidado, bajo R utilizamos/y no\como es el caso por defecto en Windows)
Un camino relativo sería:
myName/myFiles.csv
Para navegar por las rutas relativas, podemos usar .. que permite volver al directorio de origen. Por ejemplo, si el directorio de trabajo es myScripts y el árbol de mis archivos es:
## -myProject
## |-myFiles
## |-|-data01.csv
## |-|-data02.csv
## |-myScripts
## |-|-myFirstScript.RLa ruta relativa al archivo data01.csv sería ../myFiles/data01.csv
Entonces, para leer el contenido del archivo data01.csv, privilegiaremos la opción 2 (leer el contenido de un archivo que indicando su ruta relativa) o la opción 4 (modificar el directorio de trabajo de R para que coincida con la ubicación de nuestro archivo). En el último caso:
myWD <- "../myFiles/"
setwd(myWd)
getwd() # para verificar que estamos en el directorio correcto
list.files() # para verificar que el archivo está aquíEl error más común:
## Error in setwd("../myFiles/") :
## no se puede cambiar el directorio de trabajoEsto significa que el directorio no existe (se debe verificar que la sintaxis sea correcta y que el directorio exista con esta ruta).
Una vez que el directorio de trabajo está definido correctamente o la ruta relativa al archivo está establecida correctamente, podemos leer el archivo con la función read.table(). Algunos usan la función read.csv() pero este es solo un caso especial de read.table().
myWD <- "../myFiles/"
setwd(myWd)
read.table(file = "data01.csv")o alternativamente:
read.table(file = "../myFiles/data01.csv")Si la ruta no se llena correctamente o si el archivo de datos no existe, R devolverá el siguiente error:
## Error in file(file, "rt") : incapaz de abrir la conexión
## De más : Warning message:
## In file(file, "rt") :
## incapaz de abrir el archivo '../myFiles/data01.csv' : No such file or directorySi todo está bien, R muestra el contenido del archivo data01.csv. Advertencia a los usuarios de Windows porque por defecto no aparece la extensión de los archivos… Así que cuando navegamos a través de directorios con el explorador de archivos, no hay data01.csv, pero sólo un archivo data01. Es esencial remediar este problema para evitar errores. Para hacer esto, simplemente abrimos las ‘Opciones del Explorador de archivos’ a través de la tecla ‘Windows’, luego en la pestaña ‘Ver’, verificamos que la opción ‘Ocultar extensiones de archivos cuyo tipo es conocido’ no está marcado.
Consultando la ayuda sobre la función read.table(), podemos ver que tiene muchos argumentos. Los principales son:
header = FALSE: ¿el archivo contiene nombres de columna? Si es así, cambiamos el valor aheader = TRUEsep =" ": ¿cómo se separan los datos de la tabla? En un archivo CSV es la coma o el punto y coma, así que cambiamos asep = ","osep = ";"dec =". ": ¿cuál es el separador de los números decimales? Si es la coma, entonces debes cambiar adec = ","
Con estos tres argumentos, la mayoría de los archivos se pueden leer sin ningún problema. En caso de necesidad, la ayuda de esta función es muy completa.
La función read.table () devuelve el contenido del archivo como data.frame. Para poder usar el contenido del archivo, almacenaremos el data.frame en un objeto.
myWD <- "../myFiles/"
setwd(myWd)
data01 <- read.table(file = "data01.csv")
str(data01) # verificar el formato de los datos
head(data01) # vverificar los primeros datosEl estudio de caso sobre el análisis de datos de datalogger se basa en un archivo CSV. Aquí hay un extracto:
bdd <- read.table("myFiles/E05C13.csv", skip = 1, header = TRUE,
sep = ",", dec = ".", stringsAsFactors = FALSE)
colnames(bdd) <- c("id", "date", "temp")
head(bdd)## id date temp
## 1 1 11/12/15 23:00:00 4.973
## 2 2 11/12/15 23:30:00 4.766
## 3 3 11/13/15 00:00:00 4.844
## 4 4 11/13/15 00:30:00 4.844
## 5 5 11/13/15 01:00:00 5.076
## 6 6 11/13/15 01:30:00 5.282tail(bdd)## id date temp
## 32781 32781 09/25/17 21:00:00 7.091
## 32782 32782 09/25/17 21:30:00 6.914
## 32783 32783 09/25/17 22:00:00 6.813
## 32784 32784 09/25/17 22:30:00 6.611
## 32785 32785 09/25/17 23:00:00 6.331
## 32786 32786 09/25/17 23:30:00 5.385str(bdd)## 'data.frame': 32786 obs. of 3 variables:
## $ id : int 1 2 3 4 5 6 7 8 9 10 ...
## $ date: chr "11/12/15 23:00:00" "11/12/15 23:30:00" "11/13/15 00:00:00" "11/13/15 00:30:00" ...
## $ temp: num 4.97 4.77 4.84 4.84 5.08 ...8.1.3 Leer un archivo de texto
La función más simple para leer un archivo que contiene texto es readlines(). Aquí hay un ejemplo con el archivo README.md de este libro, que se encuentra en GitHub.
readmeGitHub <- "https://raw.githubusercontent.com/frareb/myRBook_SP/master/README.md"
readLines(readmeGitHub)## [1] "# myRBook_SP"
## [2] "Aqui se encuentra el código fuente del libro *Aprender R: iniciación y perfeccionamiento*, construido con bookdown."
## [3] ""
## [4] "Este libro está diseñado para actualizarse de acuerdo con las nuevas caracterÃsticas de R y según la disponibilidad de sus colaboradores. Es un libro de colaboración, asà que siéntase libre de compartir sus comentarios o colaborar directamente para mejorarlo."
## [5] ""
## [6] "Si tiene algún comentario, sugerencia o si identifica errores, no dude en enviarme un correo electrónico (francois.rebaudo@ird.fr), o si está familiarizado con GitHub en el sitio web del proyecto (https://github.com/frareb/myRBook_SP). Este libro es colaborativo, se basa en su participación."
## [7] ""
## [8] "Este libro también está disponible en francés (http://myrbookfr.netlify.com/). Más allá de este libro, puede acceder a las diapositivas del [último curso de R realizado en marzo de 2019 en Quito, Ecuador](http://myrbooksp.netlify.com/myHtmls/Ecuador_Quito_2019/R00_links.html)."
## [9] ""
## [10] "## Últimas modificaciones"
## [11] ""
## [12] "**05/02/2021**"
## [13] ""
## [14] "* revisiones del estilo"
## [15] ""
## [16] "**31/05/2020**"
## [17] ""
## [18] "* modificaciones menores "
## [19] ""
## [20] "**12/12/2019**"
## [21] ""
## [22] "* De la gráfica a la figura en un artÃculo cientÃfico"
## [23] ""
## [24] "**10/04/2019**"
## [25] ""
## [26] "* Modificaciones en el estudio de caso: [dataloggers](#studyCase1)"
## [27] ""
## [28] "**28/03/2019**"
## [29] ""
## [30] "* diapositivas del [curso de R en Quito - Ecuador](http://myrbooksp.netlify.com/myHtmls/Ecuador_Quito_2019/R00_links.html)"
## [31] ""
## [32] "**22/01/2019**"
## [33] ""
## [34] "* CapÃtulo [Paquetes gráficos](#graph3) "
## [35] ""
## [36] "**10/12/2018**"
## [37] ""
## [38] "* CapÃtulo [Gestión del color](#graph2) "
## [39] ""
## [40] "**29/11/2018**"
## [41] ""
## [42] "* CapÃtulo [Gráficos simples](#graph1) "
## [43] ""
## [44] "**09/11/2018**"
## [45] ""
## [46] "* CapÃtulo [Gestión de proyectos con R](#project)"
## [47] "* La primera parte de este libro sobre conceptos básicos está completa"
## [48] ""
## [49] "**08/11/2018**"
## [50] ""
## [51] "* algorÃtmico (5/6) [`next` y `break`](#l17spe)"
## [52] "* algorÃtmico (6/6) [Los bucles de la familia `apply`](#l17applyfamily)"
## [53] ""
## [54] "**19/10/2018**"
## [55] ""
## [56] "* algorÃtmico (3/6) [el bucle `for`](#l17for)"
## [57] "* algorÃtmico (4/6) [el bucle `while`](#l17while)"
## [58] "* algorÃtmico (4'/6) [el bucle `repeat`](#l17repeat)"
## [59] ""
## [60] "**28/09/2018**"
## [61] ""
## [62] "* algorÃtmico (1/6) [Pruebas lógicas con `if`](#l17if)"
## [63] "* algorÃtmico (2/6) [Pruebas lógicas con `switch`](#l17switch)"
## [64] ""
## [65] "**17/09/2018**"
## [66] ""
## [67] "* Introducción"
## [68] ""
## [69] "**10/09/2018**"
## [70] ""
## [71] "* Importar y exportar datos (parte 2-3/3): [Guardar y exportar datos](#l016save)"
## [72] ""
## [73] "**06/09/2018**"
## [74] ""
## [75] "* Importar y exportar datos (parte 1/3): [Leer datos desde un archivo](#l016read)"
## [76] ""
## [77] "**30/08/2018**"
## [78] ""
## [79] "* Nuevo estudio de caso: [dataloggers](#studyCase1)"
## [80] "* Modificaciones de Marc G. sobre el [tipo de datos numeric](#dataType1) y los [entornos de desarrollo](#IDE)"
## [81] ""
## [82] "**24/08/2018**"
## [83] ""
## [84] "* CapÃtulo sobre [las funciones (3/3)](#fonctions)"
## [85] ""
## [86] "**27/07/2018**"
## [87] ""
## [88] "* CapÃtulo sobre [las funciones (2/3)](#fonctions)"
## [89] ""
## [90] "**25/07/2018**"
## [91] ""
## [92] "* CapÃtulo sobre [las funciones (1/3)](#fonctions)"
## [93] ""
## [94] "**17/07/2018**"
## [95] ""
## [96] "* edición y corrección del español (Susi L.) "
## [97] "* tercera parte del capÃtulo [*Contenedores de datos*](#dataType2): El contenedor [*data.frame*](#l014dataframe)"
## [98] "* cuarta parte del capÃtulo [*Contenedores de datos*](#dataType2): El contenedor [*matrix*](#l014matrix)"
## [99] "* quinta parte del capÃtulo [*Contenedores de datos*](#dataType2): El contenedor [*array*](#l014array)"
## [100] ""
## [101] "**16/07/2018**"
## [102] ""
## [103] "* edición y corrección del español (EstefanÃa Q.) "
## [104] ""
## [105] "**12/07/2018**"
## [106] ""
## [107] "* segunda parte del capÃtulo [*Contenedores de datos*](#dataType2): El contenedor [*list*](#l014list)"
## [108] ""
## [109] "**06/07/2018**"
## [110] ""
## [111] "* edición y corrección del español (Camila B.) "
## [112] "* primera parte del capÃtulo [*Contenedores de datos*](#dataType2): El contenedor [*vector*](#l014vector)"
## [113] ""
## [114] "**04/07/2018**"
## [115] ""
## [116] "* tabla de contenidos con los próximos capÃtulos"
## [117] "* error de tipografÃa en *Elegir un entorno de desarrollo*"
## [118] ""
## [119] "**02/07/2018**"
## [120] ""
## [121] "* tres capÃtulos en lÃnea (*primeros pasos*, *elegir un entorno de desarrollo*, *tipos de datos*)"También está la función scan() que devolve todas las palabras separadas por espacios. Podemos consultar la ayuda para obtener más información.
scan(readmeGitHub, what = "character")## [1] "#"
## [2] "myRBook_SP"
## [3] "Aqui"
## [4] "se"
## [5] "encuentra"
## [6] "el"
## [7] "código"
## [8] "fuente"
## [9] "del"
## [10] "libro"
## [11] "*Aprender"
## [12] "R:"
## [13] "iniciación"
## [14] "y"
## [15] "perfeccionamiento*,"
## [16] "construido"
## [17] "con"
## [18] "bookdown."
## [19] "Este"
## [20] "libro"
## [21] "está"
## [22] "diseñado"
## [23] "para"
## [24] "actualizarse"
## [25] "de"
## [26] "acuerdo"
## [27] "con"
## [28] "las"
## [29] "nuevas"
## [30] "caracterÃsticas"
## [31] "de"
## [32] "R"
## [33] "y"
## [34] "según"
## [35] "la"
## [36] "disponibilidad"
## [37] "de"
## [38] "sus"
## [39] "colaboradores."
## [40] "Es"
## [41] "un"
## [42] "libro"
## [43] "de"
## [44] "colaboración,"
## [45] "asÃ"
## [46] "que"
## [47] "siéntase"
## [48] "libre"
## [49] "de"
## [50] "compartir"
## [51] "sus"
## [52] "comentarios"
## [53] "o"
## [54] "colaborar"
## [55] "directamente"
## [56] "para"
## [57] "mejorarlo."
## [58] "Si"
## [59] "tiene"
## [60] "algún"
## [61] "comentario,"
## [62] "sugerencia"
## [63] "o"
## [64] "si"
## [65] "identifica"
## [66] "errores,"
## [67] "no"
## [68] "dude"
## [69] "en"
## [70] "enviarme"
## [71] "un"
## [72] "correo"
## [73] "electrónico"
## [74] "(francois.rebaudo@ird.fr),"
## [75] "o"
## [76] "si"
## [77] "está"
## [78] "familiarizado"
## [79] "con"
## [80] "GitHub"
## [81] "en"
## [82] "el"
## [83] "sitio"
## [84] "web"
## [85] "del"
## [86] "proyecto"
## [87] "(https://github.com/frareb/myRBook_SP)."
## [88] "Este"
## [89] "libro"
## [90] "es"
## [91] "colaborativo,"
## [92] "se"
## [93] "basa"
## [94] "en"
## [95] "su"
## [96] "participación."
## [97] "Este"
## [98] "libro"
## [99] "también"
## [100] "está"
## [101] "disponible"
## [102] "en"
## [103] "francés"
## [104] "(http://myrbookfr.netlify.com/)."
## [105] "Más"
## [106] "allá"
## [107] "de"
## [108] "este"
## [109] "libro,"
## [110] "puede"
## [111] "acceder"
## [112] "a"
## [113] "las"
## [114] "diapositivas"
## [115] "del"
## [116] "[último"
## [117] "curso"
## [118] "de"
## [119] "R"
## [120] "realizado"
## [121] "en"
## [122] "marzo"
## [123] "de"
## [124] "2019"
## [125] "en"
## [126] "Quito,"
## [127] "Ecuador](http://myrbooksp.netlify.com/myHtmls/Ecuador_Quito_2019/R00_links.html)."
## [128] "##"
## [129] "Últimas"
## [130] "modificaciones"
## [131] "**05/02/2021**"
## [132] "*"
## [133] "revisiones"
## [134] "del"
## [135] "estilo"
## [136] "**31/05/2020**"
## [137] "*"
## [138] "modificaciones"
## [139] "menores"
## [140] "**12/12/2019**"
## [141] "*"
## [142] "De"
## [143] "la"
## [144] "gráfica"
## [145] "a"
## [146] "la"
## [147] "figura"
## [148] "en"
## [149] "un"
## [150] "artÃculo"
## [151] "cientÃfico"
## [152] "**10/04/2019**"
## [153] "*"
## [154] "Modificaciones"
## [155] "en"
## [156] "el"
## [157] "estudio"
## [158] "de"
## [159] "caso:"
## [160] "[dataloggers](#studyCase1)"
## [161] "**28/03/2019**"
## [162] "*"
## [163] "diapositivas"
## [164] "del"
## [165] "[curso"
## [166] "de"
## [167] "R"
## [168] "en"
## [169] "Quito"
## [170] "-"
## [171] "Ecuador](http://myrbooksp.netlify.com/myHtmls/Ecuador_Quito_2019/R00_links.html)"
## [172] "**22/01/2019**"
## [173] "*"
## [174] "CapÃtulo"
## [175] "[Paquetes"
## [176] "gráficos](#graph3)"
## [177] "**10/12/2018**"
## [178] "*"
## [179] "CapÃtulo"
## [180] "[Gestión"
## [181] "del"
## [182] "color](#graph2)"
## [183] "**29/11/2018**"
## [184] "*"
## [185] "CapÃtulo"
## [186] "[Gráficos"
## [187] "simples](#graph1)"
## [188] "**09/11/2018**"
## [189] "*"
## [190] "CapÃtulo"
## [191] "[Gestión"
## [192] "de"
## [193] "proyectos"
## [194] "con"
## [195] "R](#project)"
## [196] "*"
## [197] "La"
## [198] "primera"
## [199] "parte"
## [200] "de"
## [201] "este"
## [202] "libro"
## [203] "sobre"
## [204] "conceptos"
## [205] "básicos"
## [206] "está"
## [207] "completa"
## [208] "**08/11/2018**"
## [209] "*"
## [210] "algorÃtmico"
## [211] "(5/6)"
## [212] "[`next`"
## [213] "y"
## [214] "`break`](#l17spe)"
## [215] "*"
## [216] "algorÃtmico"
## [217] "(6/6)"
## [218] "[Los"
## [219] "bucles"
## [220] "de"
## [221] "la"
## [222] "familia"
## [223] "`apply`](#l17applyfamily)"
## [224] "**19/10/2018**"
## [225] "*"
## [226] "algorÃtmico"
## [227] "(3/6)"
## [228] "[el"
## [229] "bucle"
## [230] "`for`](#l17for)"
## [231] "*"
## [232] "algorÃtmico"
## [233] "(4/6)"
## [234] "[el"
## [235] "bucle"
## [236] "`while`](#l17while)"
## [237] "*"
## [238] "algorÃtmico"
## [239] "(4'/6)"
## [240] "[el"
## [241] "bucle"
## [242] "`repeat`](#l17repeat)"
## [243] "**28/09/2018**"
## [244] "*"
## [245] "algorÃtmico"
## [246] "(1/6)"
## [247] "[Pruebas"
## [248] "lógicas"
## [249] "con"
## [250] "`if`](#l17if)"
## [251] "*"
## [252] "algorÃtmico"
## [253] "(2/6)"
## [254] "[Pruebas"
## [255] "lógicas"
## [256] "con"
## [257] "`switch`](#l17switch)"
## [258] "**17/09/2018**"
## [259] "*"
## [260] "Introducción"
## [261] "**10/09/2018**"
## [262] "*"
## [263] "Importar"
## [264] "y"
## [265] "exportar"
## [266] "datos"
## [267] "(parte"
## [268] "2-3/3):"
## [269] "[Guardar"
## [270] "y"
## [271] "exportar"
## [272] "datos](#l016save)"
## [273] "**06/09/2018**"
## [274] "*"
## [275] "Importar"
## [276] "y"
## [277] "exportar"
## [278] "datos"
## [279] "(parte"
## [280] "1/3):"
## [281] "[Leer"
## [282] "datos"
## [283] "desde"
## [284] "un"
## [285] "archivo](#l016read)"
## [286] "**30/08/2018**"
## [287] "*"
## [288] "Nuevo"
## [289] "estudio"
## [290] "de"
## [291] "caso:"
## [292] "[dataloggers](#studyCase1)"
## [293] "*"
## [294] "Modificaciones"
## [295] "de"
## [296] "Marc"
## [297] "G."
## [298] "sobre"
## [299] "el"
## [300] "[tipo"
## [301] "de"
## [302] "datos"
## [303] "numeric](#dataType1)"
## [304] "y"
## [305] "los"
## [306] "[entornos"
## [307] "de"
## [308] "desarrollo](#IDE)"
## [309] "**24/08/2018**"
## [310] "*"
## [311] "CapÃtulo"
## [312] "sobre"
## [313] "[las"
## [314] "funciones"
## [315] "(3/3)](#fonctions)"
## [316] "**27/07/2018**"
## [317] "*"
## [318] "CapÃtulo"
## [319] "sobre"
## [320] "[las"
## [321] "funciones"
## [322] "(2/3)](#fonctions)"
## [323] "**25/07/2018**"
## [324] "*"
## [325] "CapÃtulo"
## [326] "sobre"
## [327] "[las"
## [328] "funciones"
## [329] "(1/3)](#fonctions)"
## [330] "**17/07/2018**"
## [331] "*"
## [332] "edición"
## [333] "y"
## [334] "corrección"
## [335] "del"
## [336] "español"
## [337] "(Susi"
## [338] "L.)"
## [339] "*"
## [340] "tercera"
## [341] "parte"
## [342] "del"
## [343] "capÃtulo"
## [344] "[*Contenedores"
## [345] "de"
## [346] "datos*](#dataType2):"
## [347] "El"
## [348] "contenedor"
## [349] "[*data.frame*](#l014dataframe)"
## [350] "*"
## [351] "cuarta"
## [352] "parte"
## [353] "del"
## [354] "capÃtulo"
## [355] "[*Contenedores"
## [356] "de"
## [357] "datos*](#dataType2):"
## [358] "El"
## [359] "contenedor"
## [360] "[*matrix*](#l014matrix)"
## [361] "*"
## [362] "quinta"
## [363] "parte"
## [364] "del"
## [365] "capÃtulo"
## [366] "[*Contenedores"
## [367] "de"
## [368] "datos*](#dataType2):"
## [369] "El"
## [370] "contenedor"
## [371] "[*array*](#l014array)"
## [372] "**16/07/2018**"
## [373] "*"
## [374] "edición"
## [375] "y"
## [376] "corrección"
## [377] "del"
## [378] "español"
## [379] "(EstefanÃa"
## [380] "Q.)"
## [381] "**12/07/2018**"
## [382] "*"
## [383] "segunda"
## [384] "parte"
## [385] "del"
## [386] "capÃtulo"
## [387] "[*Contenedores"
## [388] "de"
## [389] "datos*](#dataType2):"
## [390] "El"
## [391] "contenedor"
## [392] "[*list*](#l014list)"
## [393] "**06/07/2018**"
## [394] "*"
## [395] "edición"
## [396] "y"
## [397] "corrección"
## [398] "del"
## [399] "español"
## [400] "(Camila"
## [401] "B.)"
## [402] "*"
## [403] "primera"
## [404] "parte"
## [405] "del"
## [406] "capÃtulo"
## [407] "[*Contenedores"
## [408] "de"
## [409] "datos*](#dataType2):"
## [410] "El"
## [411] "contenedor"
## [412] "[*vector*](#l014vector)"
## [413] "**04/07/2018**"
## [414] "*"
## [415] "tabla"
## [416] "de"
## [417] "contenidos"
## [418] "con"
## [419] "los"
## [420] "próximos"
## [421] "capÃtulos"
## [422] "*"
## [423] "error"
## [424] "de"
## [425] "tipografÃa"
## [426] "en"
## [427] "*Elegir"
## [428] "un"
## [429] "entorno"
## [430] "de"
## [431] "desarrollo*"
## [432] "**02/07/2018**"
## [433] "*"
## [434] "tres"
## [435] "capÃtulos"
## [436] "en"
## [437] "lÃnea"
## [438] "(*primeros"
## [439] "pasos*,"
## [440] "*elegir"
## [441] "un"
## [442] "entorno"
## [443] "de"
## [444] "desarrollo*,"
## [445] "*tipos"
## [446] "de"
## [447] "datos*)"8.2 Guardar datos para R
A veces es útil poder guardar un objeto R para poder reutilizarlo más tarde. Este es el caso, por ejemplo, cuando el tiempo de cálculo para llegar a un resultado es muy largo, o cuando queremos liberar espacio en la RAM. Para hacer esto, existe la función save() que toma como argumento principal el nombre de los objetos que queremos guardar.
El objeto guardado se almacenará en un archivo. Por convención, es bueno dar como nombre de extensión .RData a los archivos que contienen objetos R, preferir un solo objeto por archivo, y dar el nombre del objeto como nombre del archivo.
myObject <- 5
ls(pattern = "myObject")## [1] "myObject"save(myObject, file = "myFiles/myObject.RData")
rm(myObject)
ls(pattern = "myObject")## character(0)Si necesitamos el objeto guardado en el archivo, podemos volver a cargarlo con la función load().
ls(pattern = "myObject")## character(0)load("myFiles/myObject.RData")
ls(pattern = "myObject")## [1] "myObject"print(myObject)## [1] 58.3 Exportar datos
La mejor forma de comunicar sus resultados o datos es enviar sus scripts y archivos de datos. A veces esto no es posible o no es adecuado, y puede ser útil exportar sus datos en un archivo de texto o CSV. Para hacer esto, existe la función genérica write() y la función write.table() para data.frame.
Por ejemplo, crearemos un data.frame con los números del 1 al 26 y las letras correspondientes, luego los guardaremos en un archivo CSV, luego volveremos a leer los datos contenidos en este archivo.
dfLetters <- data.frame(num = 1:26, letters = letters)
write.table(dfLetters, file = "myFiles/dfLetters.csv",
sep = ",", col.names = TRUE, row.names = FALSE)
read.table(file = "myFiles/dfLetters.csv", header = TRUE, sep = ",")## num letters
## 1 1 a
## 2 2 b
## 3 3 c
## 4 4 d
## 5 5 e
## 6 6 f
## 7 7 g
## 8 8 h
## 9 9 i
## 10 10 j
## 11 11 k
## 12 12 l
## 13 13 m
## 14 14 n
## 15 15 o
## 16 16 p
## 17 17 q
## 18 18 r
## 19 19 s
## 20 20 t
## 21 21 u
## 22 22 v
## 23 23 w
## 24 24 x
## 25 25 y
## 26 26 z8.4 Conclusión
Felicitaciones! Ahora sabemos cómo leer datos de un archivo de texto o CSV, guardar y cargar datos de RData, y escribir en un archivo. El error más común entre los principiantes en R es la lectura de archivos de datos. Es por eso que este capítulo es para leer y volver a leer sin moderación.