similar to: Borrar cada fila 400

Gracuas a todos!!! Por cierto, esta ya es de nota. Si quiero agregar una columna, y que cada 400 piezsa el valor se incremente en una unidad, es decir las 400 primeras, tendrian cada fila el valor 1. Las siguientes 400, 2, .... Lo he hecho con un for, pero va bastante lento: k<-1 for(i in 1:length(datos[,1])){ if(i%%400 == 0){k = k +1} datos[i,9] <- k; } > From: josea.bartolome en

Entiendo la logica pero no veo el como hacerlo. No se como implementar el 1+floor(1:nrow(datos)/400)) Gracias Jesús > Date: Tue, 17 Nov 2015 15:31:39 +0100 > Subject: Re: [R-es] Borrar cada fila 400 > From: cgb en datanalytics.com > To: j.para.fernandez en hotmail.com > CC: josea.bartolome en mineco.es; r-help-es en r-project.org > > 1 + floor(1:nrow(datos) / 400) >

La verad es que es un asolución sencilla pero muy eficaz. Ya con esta siguiente duda termino: La matriz de cada csv es de 400x500, es decir, 400 filas y 500 columnas. Si quiero calcular la media de diferentes regiones del csv, por ejemplo la media de las 20 primeras filas y 20 primreas columnas, pero del que tiene los 50.000 registros, tomando el valor 1, como pued hacerlo?? He probado con

Gracias Carlos una vez más, pero no es exactamente lo que quiero Con colMeans estas calculando por columnas, pero yo quiero que calcule asi: mean(datos[1:20,1:20]), pero claro, para toda la secuencia. mean(datos[1:20,1:20]) me devuelve el error-> Error in datos[1:2, 1:2] : object of type 'closure' is not subsettable Date: Tue, 17 Nov 2015 18:34:59 +0100 Subject: Re: [R-es]

¿Qué quieres decir con "valores que quiera"?. ¿Quieres calcular la media de unas regiones de la matriz con algún tipo de patrón? ¿periodicidad? Si es que no, basta como te mostraba en el ejemplo, definir unos índices (tu 1 y 20) y ya está... Saludos, Carlos Ortega www.qualityexcellence.es El 17 de noviembre de 2015, 19:29, Jesús Para Fernández < j.para.fernandez en hotmail.com>

Estimado Jesús Para Fernández El ejemplo que usted presenta es algo básico pero no por ello lejos de carecer importancia, al respecto hay varios autores de paquetes que abordaron ese problema buscando optimizar, facilitar, etc. Lo que usted piensa es correcto, si desea buscar optimizar puede leer algo de plyr, data.table, reshape (este tiene un video explicando casi lo que usted plantea), y

Prueba así: --- dif_days <- 180 # Cambiado 6 meses df <- data.frame( id = c(1, 1, 1, 2, 2, 2, 1, 3), dates = as.Date(c("2023-01-01", "2023-05-15", "2023-12-01", "2023-01-01", "2023-04-01", "2023-12-01", "2023-03-15", "2023-01-01")) ) # important! df <- df[order(df$id, df$dates),] n_borrar

Buenos días, estoy realizando análisis de texto con Twitter y tengo un problema con unos carácteres que no logro quitar. Són cadenas de letras con forma similar a *xaexdfxdeaxoa*. Creo que surgen de la códificación de los emojis. Yo suelo utilizar, más o menos el siguiente codigo con gsub para limpiar texto, pero no me sirve # remove rt x = gsub("rt", "", x) # remove at x =

Muchas gracias Carlos, la lógica es perfecta pero no se como identificar con código las lineas en blanco entre el bloque 2 y el bloque 3. Para de esta forma quedarme solo con el bloque 2. Tienes alguna idea? Muchas gracias. Joan 2016-07-28 17:00 GMT+02:00 Carlos Ortega <cof en qualityexcellence.es>: > Hola, > > Se me ocurre esta solución en pseudo-código...: > > >

Muchas gracias, Carlos, por esta ayuda! Desconocia la existencia de ddply y me cuesta interpretar el código. Estoy en ello. Realmente es mucho, pero mucho, más rápido. El problema es que si lo aplico a la tabla dde pruebas: id dates 1 1 2023-01-01 2 1 2023-05-15 3 1 2023-12-01 4 2 2023-01-01 5 2 2023-04-01 6 2 2023-12-01 7 1 2023-03-15 8 3 2023-01-01 dif_days <- 180 #

Hola, Por favor, necesito insertar una fila debajo de las filas que tengan DV distinto de cero, pero no me deja insertar hasta el final de la tabla. Esta es mi tabla y este es el código con el que estoy apurado. C ID TIME DV AMT RATE CMT SS II EVID GRUPO VISITA DOSIS VECES FORMA NAP EDAD SEXO ALTURA PESO 11 0 0 3 0 1 1 12 1 3 0 3 2 1 0 77 2 147 74 11 1.417 0.001 0 0 2 0 0 0 3 0 3 2 1 0.001

Otra opción es importar directamente los datos que necesites usando XLConnect (sin llevarlos a CSV). Ese paquete permite hacer cosas muy potentes desde el propio fichero de Excel. https://cran.r-project.org/web/packages/XLConnect/index.html Recomiendo, encarecidamente, la lectura de sus dos vignettes. Un Saludo, -- Miguel Ángel Rodríguez Muíños Dirección Xeral de Saúde Pública Consellería de

Hola a todos...Auxilio, estoy varado en esto y creo que mi terquedad no me deja avanzar ... terquedad ya que estoy usando la estructura data.table y no logro obtener el resultado. Tengo una DT contiene un DATO y los resultados de la aplicación de una validación (ERR01, ERR2, ERR3) y la concatenación de estos errores en una sola columna. Si tiene error, graba el número del error, si no lo tiene,

Estimado Javier, Gracias por tu mensaje. No, lo unico que requiero es la lista de números (i1, 2, 3, 1, 2, 3, 4, 5, 1, 2). Saludos cordiales, Jorge.- 2015-10-28 14:35 GMT-05:00 Javier Rubén Marcuzzi < javier.ruben.marcuzzi en gmail.com>: > Estimado Jorge I Velez > > > > No comprendo un punto, dices que deseas construir sub matrices y extraer > elementos de sub

Con data.table todo puede ir muy rapido. > require(data.table) > M=matrix(c(5,NA,NA,NA,6,NA,7,NA,8),3,3) > M [,1] [,2] [,3] [1,] 5 NA 7 [2,] NA 6 NA [3,] NA NA 8 > M2=data.table(M) > M2 V1 V2 V3 1: 5 NA 7 2: NA 6 NA 3: NA NA 8 > M3=melt(M2,variable.name = "columna") > M3 columna value 1: V1 5 2: V1 NA 3: V1

Estimados, les escribo para consultar, lo siguiente: Estoy haciendo un trabajo de text mining y necesito importar una serie de textos para preprocesarlos, es decir eliminar los Stopwords, hacer stemming, eliminar signos de puntuación etc. Esto último lo puedo realizar con los datasets que trae la librería TM. Lo que no puedo lograr es importar texto desde algún medio a pesar que existe funciones

Buenas Tengo un Data table de la siguiente manera: datos<-data.table(grupo=rep(c("a","b"),5),x=c(1:10),y=rnorm(10,2,1)) Lo que quiero es añadir una fila por cada grupo y en esa nueva fila, al valor de la x ponerle el valor anterior de la y Lo que hago es añadir una nueva fila por grupo, con: datos[,.SD[1:(.N+1)],by=grupo] Y para añadir el valor anterior uso la función

Hola a todos, tengo 170 .csv donde tengo que eliminar las primeras 20 lineas (primer bloque) y luego todo un último bloque de datos (tercer bloque) que está separado por dos filas sin datos del segundo bloque (que es el que me interesa). El tercer bloque empieza en cada .csv en una linea diferente por lo tanto no se si puedo automatizar en R quedarme tan solo con la información a partir de la

Hola a todos, Quisiera juntar las informacion de dos data.frames con una union de columnas un tanto especial. La informacion que tengo son datos de captura-recaptura de diferentes individuos, por ejemplo en una base de datos tengo:ID <- c(1,2,3,4)Fate_1 <- c(2,2,2,2)Fate_2 <- c(0,0,0,NA)Fate_3 <- c(0, NA, NA, NA) y en otra base de datos tengo:ID <- c(1,2,3)Fate_1 <- c(0, 0, 0,

Estimad en s eRRer en s, Tengo un txt que quiero importar a R. Pero no tiene un formato adecuado para usar cosas normales, como por ejemplo read.csv() El formato es algo así: time 1 col1 col2 col3 col4 dato dato dato dato dato dato dato dato dato dato dato dato dato dato dato dato dato dato dato dato end time 2 col1 col2 col3 col4 dato dato dato dato dato dato dato dato dato dato dato dato dato