search for: borrar

...= 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 <- 1 while (n_borrar > 0) { df <- ddply(df, .(id), transform, delta = c(1000, diff(dates))) # find the first register by id in less than dif_days df <- ddply(df, .(id), transform, borrar = cumsum(delta < dif_days)) df <- ddply(df, .(id), transform, borrar = cumsum(borrar)...

...tes = 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")) ) Borra incluso los registros de más de meses y solo queda: > df id dates delta borrar 1 1 2023-01-01 1000 0 2 2 2023-01-01 1000 0 3 3 2023-01-01 1000 0 ¿Sabes que puede estar pasando? Muchas gracias por la ayuda y saludos! On Mon, 7 Oct 2024 13:24:56 +0200 "Carlos J. Gil Bellosta" <gilbellosta en gmail.com> wrote: > Hola, ¿qué tal? > &...

Hola, ¿qué tal? Modifica esto: ---- library(plyr) n_reg <- 332505 n_ids <- 63738 dif_days <- 90 df <- data.frame( id = sample(n_ids, n_reg, replace = T), dates = sample(1000, n_reg, replace = T) ) # important! df <- df[order(df$id, df$date),] n_borrar <- 1 while (n_borrar > 0) { df <- ddply(df, .(id), transform, delta = c(1000, diff(dates))) # find the first register by id in less than dif_days df <- ddply(df, .(id), transform, borrar = cumsum(delta < dif_days)) n_borrar <- sum(df$borrar == 1) print(n_borrar) df &l...

Hola a todos: Tengo un bucle que tarda horas y me gustaría optimizarlo. Me explico. Simplificando, tengo una tabla con 332.505 registros de 63.738 individuos. Cada registro es una medida realiza de unos días a unos meses o años después de la anterior. Lo que quiero es borrar aquellos registros que entre él y el anterior hayan transcurrido menos de 6 meses, de manera que me quede una tabla con sólo aquellas medidas realizadas al menos 6 meses después de la anterior. La tabla simplificada (no diferencio entre medida y ID y con una nueva columna ?BORRAR?) seria: ## Códi...

...p}" Try "help" to get a list of possible commands. smb: \> !mkdir -p /tmp/borrame/a smb: \> !mkdir -p /tmp/borrame/b smb: \> !touch /tmp/borrame/a/AM.xls smb: \> !touch /tmp/borrame/a/AT.xls smb: \> !touch /tmp/borrame/b/BT.xls smb: \> lcd /tmp/borrame smb: \> cd borrar smb: \borrar\> recurse smb: \borrar\> prompt smb: \borrar\> mask *M.xls smb: \borrar\> mput * putting file a/AT.xls as \borrar\a\AT.xls (0,0 kb/s) (average 0,0 kb/s) putting file a/AM.xls as \borrar\a\AM.xls (0,0 kb/s) (average 0,0 kb/s) putting file b/BT.xls as \borrar\b\BT.xls (0,0 kb...

...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 mineco.es > To: j.para.fernandez en hotmail.com; r-help-es en r-project.org > Subject: RE: [R-es] Borrar cada fila 400 > Date: Tue, 17 Nov 2015 14:22:14 +0000 > > Prueba con: > > Datos[-seq(from = 400, to=50000, by = 400), ] > > No necesitas un buche, para eliminar las filas. > > Un cordial saludo. > > -----Mensaje original----- > De: R-help-es [mailto:r-help-e...

Buenas, tengo un csv [csv final] con 50000 filas, que es unión de varios csv [csv particular]. Cada csv [csv particular] tiene en la última fila, la 400, una serie de valores que quiero eliminar, por lo que del [csv filan] quiero borrar la linea 400,800,1200,.... Lo he intentado con un bucle for: for(i in 1:50000){ if(i%%400 == 0) {datos[-i,]} } Pero no me funciona. Además me han dicho que con apply puede ser mucho más eficiente el algoritmo. ¿Alguna idea? Gracias [[alternative HTML version deleted]]

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) > > Pura aritmética, de nuevo. > > Un saludo, > > Carlos J. Gil Bellosta > h...

...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 tapply(datos,new,mean,na.rm=T) pero a parte de darme error no segmenta como quiero. Gracias Date: Tue, 17 Nov 2015 16:45:03 +0100 Subject: Re: [R-es] Borrar cada fila 400 From: cof en qualityexcellence.es To: j.para.fernandez en hotmail.com CC: cgb en datanalytics.com; r-help-es en r-project.org Hola, Esta es una forma: > DF <- data.frame(a=rnorm(1000)) > DF$new <- 1 + floor(1:nrow(DF) / 400) > unique(DF$new) [1] 1 2 3 Saludos, Car...

...or 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] Borrar cada fila 400 From: cof en qualityexcellence.es To: j.para.fernandez en hotmail.com CC: cgb en datanalytics.com; r-help-es en r-project.org Hola, Esta es una forma. Indicas con unos indices el trozo que quieres, lo seleccionas (df_df_reg) y sobre él calculas medias por fila o por columna. R tiene...

...t a list of possible commands. > smb: \> !mkdir -p /tmp/borrame/a > smb: \> !mkdir -p /tmp/borrame/b > smb: \> !touch /tmp/borrame/a/AM.xls > smb: \> !touch /tmp/borrame/a/AT.xls > smb: \> !touch /tmp/borrame/b/BT.xls > smb: \> lcd /tmp/borrame > smb: \> cd borrar > smb: \borrar\> recurse > smb: \borrar\> prompt > smb: \borrar\> mask *M.xls > smb: \borrar\> mput * > putting file a/AT.xls as \borrar\a\AT.xls (0,0 kb/s) (average 0,0 kb/s) > putting file a/AM.xls as \borrar\a\AM.xls (0,0 kb/s) (average 0,0 kb/s) > putting file b...

...ara los valores que quiera, isn usar un > bucle for, sino un apply, o un tapply... > > > From: j.para.fernandez en hotmail.com > > To: cof en qualityexcellence.es > > Date: Tue, 17 Nov 2015 19:17:30 +0100 > > CC: r-help-es en r-project.org > > Subject: Re: [R-es] Borrar cada fila 400 > > > > 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. > > > >...

...menor a 3, por no decir dos años). Si es que no comprendí mal, que también es posible. Javier Rubén Marcuzzi Técnico en Industrias Lácteas Veterinario De: Jesús Para Fernández Enviado: miércoles, 18 de noviembre de 2015 5:02 Para: Carlos Ortega CC: r-help-es en r-project.org Asunto: Re: [R-es] Borrar cada fila 400 Buenas Carlos, Lo que quiero hacer es calcular la media de diferentes regiones con un patrón de repetición. Ayer estaba algo espeso, a ver si ahora consigo explicarme mejor. Tengo un dataframe creado de la union de varios csv. Esta compuesto por n filas y x columnas, a la que he...

...! As in http://groups.google.es/group/rubyonrails-spinoffs/browse_thread/thread/bbd975bac3be748a?hl=es I have some problems with onDrop on a Droppable Instead of he I have only a sortable list with draggable elements (I make the list sortable and every element draggable) I try two forms: onDrop: Borrar where Borrar is something like: Borrar = function () { my code here } an onDrop: function() {my code here } without lucky The most significant think is when I try to drop an element on the droppable some "video interferences" appears (some parts of some div''s are render in a...

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 =

...> smb: \> !mkdir -p /tmp/borrame/a > > smb: \> !mkdir -p /tmp/borrame/b > > smb: \> !touch /tmp/borrame/a/AM.xls > > smb: \> !touch /tmp/borrame/a/AT.xls > > smb: \> !touch /tmp/borrame/b/BT.xls > > smb: \> lcd /tmp/borrame > > smb: \> cd borrar > > smb: \borrar\> recurse > > smb: \borrar\> prompt > > smb: \borrar\> mask *M.xls > > smb: \borrar\> mput * > > putting file a/AT.xls as \borrar\a\AT.xls (0,0 kb/s) (average 0,0 kb/s) > > putting file a/AM.xls as \borrar\a\AM.xls (0,0 kb/s) (average...

como puedo cambiar los permisos para un directorio de tal forma que en un cliente windows pueda leer, guardar pero no pueda borrar archivos??? _________________________________________________________ Do You Yahoo!? Construye tu p?gina personal en Yahoo! GeoCities. ?Es f?cil, r?pido y gratis! http://geocities.yahoo.com.mx

Hola a todos, Os envío una consulta que considero sencilla pero me está resultando imposible de resolver. Si ejecutáis el siguiente código, obtendréis la gráfica que os adjunto: library(ltm) modelo <- rasch(LSAT) plot(modelo, main="Curva probabilidad pregunta 1",legend = TRUE, cx = "bottomright", items=1,xlab="Conocimiento",ylab="Probabilidad") Resulta

...sellería de Sanidade Xunta de Galicia http://dxsp.sergas.es El 12/11/2015 a las 9:14, Isidro Hidalgo escribió: > Completando lo que ya te han dicho, si grabas un CSV desde Excel, 3 cosas más: > - Selecciona todas las columnas vacías a la derecha de tus datos y elimínalas > (no vale con borrar el contenido, usa el botón derecho y "Eliminar...") > - Selecciona todas las filas vacías abajo de tus datos y elimínalas (tampoco > vale con borrar el contenido, usa el botón derecho y "Eliminar...") > - cuidado con el formato de los datos en Excel. Los decimales que v...

A new update. Same behaviour with 4.6.16. Exact issue as Bug 1249. Many thanks. Kind regards. El lun., 24 ago. 2020 a las 12:23, LPC DPG (<lpcdpg at gmail.com>) escribi?: > Dear folks. > > Was hoping it had to do with the release, but have also tested in 4.4.16 > and the issue is also there. I am aware a RHEL/CEntOS based upon 6 > distribution is not the most up to date