Importar y exportar archivos GPX en R
El objetivo del presente
tutorial es aprender a importar un listado de archivos GPX (son los archivos
nativos que se toman con el GPS) en R y exportarlos como archivos .csv, para
aprender a exportar estos archivos csv a shapefile se puede leer este tutorial
realizado meses atrás.
Primero
instalamos la librería “plotKML” y “data.table”, mediante el siguiente comando:
install.packages("plotKML")
install.packages("data.table")
require(plotKML)
require(data.table)
Escribimos la ruta donde está el listado de archivos gpx.
path <- "D:/Personal/_blog/_importGPX/_gpx"
listado <-
list.files(path, full.names = T)
Ahora mediante el comando “lapply” aplicamos la función
readGPX a todos los archivos gpx.
gpx_wayPoints_2 <-
lapply(listado, FUN = readGPX, waypoints = TRUE, track = FALSE, routes = FALSE)
Ahora creamos un listado vacío para allí guardar las tablas
de waypoints (puntos tomados con el
GPS)
gpx_wayPoints3 <-
list()
Para obtener solamente las tablas del archivo gpx,
realizamos un ciclo mediante el cual iteramos en cada objeto de la lista
obteniendo solamente la tabla
for (i in
1:length(listado)){
gpx_wayPoints3[[i]] <-
gpx_wayPoints_2[[i]]$waypoints
}
Mediante la siguiente línea de comando podemos observar las
dimensiones de cada tabla, y así poder observar si tienen igual número de
columnas
lapply(gpx_wayPointsList2,
function(x){dim(x)})
Ahora mediante el comando “rbindlist” unimos los tres dataframe (tabla) dentro de uno solo
tabla <- rbindlist(gpx_wayPoints3)
dim(tabla) #podemos observer las dimensiones de la tabla
Por último guardamos la tabla en un archivo csv.
write.csv(tabla,
"D:/Personal/_blog/_importGPX/tabla.csv")
muy bien!
ResponderEliminar