Buenas Tardes, Les escribo para solicitarles una ayuda dado que tengo 2 tablas, una con los campos: cedula | nombre | direccion y la otra con la tabla: cedula | barrio | municipio Lo que necesito es hacer una comparación del campo cedula de las dos tablas y si son iguales, agregarle los campos barrio y municipio de la segunda tabla a la fila correspondiente de esa cedula de la primera tabla al lado de direccion. Agradeciendo todo su apoyo, CESAR AUGUSTO LOPEZ [[alternative HTML version deleted]]
?merge El 26 de septiembre de 2016, 22:09, Cesar Lopez <cesarlopez-1 en hotmail.com> escribió:> Buenas Tardes, > > > Les escribo para solicitarles una ayuda dado que tengo 2 tablas, una con > los campos: > > > cedula | nombre | direccion > > > y la otra con la tabla: > > > cedula | barrio | municipio > > > Lo que necesito es hacer una comparación del campo cedula de las dos > tablas y si son iguales, agregarle los campos barrio y municipio de la > segunda tabla a la fila correspondiente de esa cedula de la primera tabla > al lado de direccion. > > > Agradeciendo todo su apoyo, > > > CESAR AUGUSTO LOPEZ > > [[alternative HTML version deleted]] > > > _______________________________________________ > R-help-es mailing list > R-help-es en r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es >[[alternative HTML version deleted]]
Buenas Noches,
Les escribo para solicitarles una ayuda con lo siguiente:
"Primero leo las primeras 100 lineas de mi archivo"
inicial <- read.csv("cartera1.csv", header=TRUE, sep=";",
fileEncoding="latin1", nrows=100)
"Segundo determino las clases o tipos de objetos"
clases <- sapply(inicial, class)
"Tercero reviso clases"
clases
USUARIO NOMBRE
"integer"
"factor"
DIRECCION ESTRATO
"factor"
"integer"
CICLO DEUDA_PENDIENTE
"integer"
"factor"
INTERESES_PENDIENTES_MES INTERESES_PENDIENTES_ACUMULADOS
"numeric"
"numeric"
MESES_MORA CUOTA_INICIAL
"factor"
"integer"
CUOTA_SALDO CUOTA_VALOR
"numeric"
"numeric"
CUOTA_INTERESES CUOTA_PENDIENTES
"numeric"
"integer"
PAGADAS FACTURADO
"integer"
"numeric"
ABONOS
"integer"
"Cuarto intento importar el archivo con el colclasses"
datos <- read.csv("cartera1.csv", header=TRUE, sep=";",
fileEncoding= "latin1", colClasses=clases)
"Me aparece el siguiente error"
Error in scan(file = file, what = what, sep = sep, quote = quote, dec = dec, :
scan() expected 'a real', got '13.060.496'
Que es lo que estoy haciendo mal o porque me sale dicho error ?
Agradeciendo todo su apoyo,
CESAR AUGUSTO LOPEZ
[[alternative HTML version deleted]]
Hola, Al margen de la solución técnica a tu problema, me intriga un tanto el objetivo que persigues. Si tu objetivo es determinar las clases para luego optimizar la lectura, mi sugerencia es que si el fichero que quieres leer es muy grande, puedes utilizar la función "fread()" del paquete "data.table" que hace este trabajo por ti. También tienes otra alternativa con el paquete "readr" (incluye una función read_csv) que utiliza una estrategia equivalente a la que estás buscando, aunque sus tiempos de lectura son peores que las que ofrece "fread()". Saludos, Carlos Ortega www.qualityexcellence.es El 27 de septiembre de 2016, 6:30, Cesar Lopez <cesarlopez-1 en hotmail.com> escribió:> Buenas Noches, > > > Les escribo para solicitarles una ayuda con lo siguiente: > > "Primero leo las primeras 100 lineas de mi archivo" > inicial <- read.csv("cartera1.csv", header=TRUE, sep=";", > fileEncoding="latin1", nrows=100) > > "Segundo determino las clases o tipos de objetos" > > clases <- sapply(inicial, class) > > > "Tercero reviso clases" > > clases > USUARIO NOMBRE > "integer" "factor" > DIRECCION ESTRATO > "factor" "integer" > CICLO DEUDA_PENDIENTE > "integer" "factor" > INTERESES_PENDIENTES_MES INTERESES_PENDIENTES_ACUMULADOS > "numeric" "numeric" > MESES_MORA CUOTA_INICIAL > "factor" "integer" > CUOTA_SALDO CUOTA_VALOR > "numeric" "numeric" > CUOTA_INTERESES CUOTA_PENDIENTES > "numeric" "integer" > PAGADAS FACTURADO > "integer" "numeric" > ABONOS > "integer" > > > "Cuarto intento importar el archivo con el colclasses" > > datos <- read.csv("cartera1.csv", header=TRUE, sep=";", fileEncoding> "latin1", colClasses=clases) > > > "Me aparece el siguiente error" > > Error in scan(file = file, what = what, sep = sep, quote = quote, dec > dec, : > scan() expected 'a real', got '13.060.496' > > > Que es lo que estoy haciendo mal o porque me sale dicho error ? > > > Agradeciendo todo su apoyo, > > > CESAR AUGUSTO LOPEZ > > [[alternative HTML version deleted]] > > _______________________________________________ > R-help-es mailing list > R-help-es en r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es >-- Saludos, Carlos Ortega www.qualityexcellence.es [[alternative HTML version deleted]]