search for: bucle

Buenas, ¿como puedo hacer que el bucle for se salte el error que salta cuando i<-0 en el codigo que paso?? count <- 0 for(i in -2:2){ z<-1/i z<-z*z modelo<-lm(z~1) } Gracias [[alternative HTML version deleted]]

Buenos días: A ver.... una duda muy general, y otra más específica... Después de haber conseguido tratar con R.... y hacer un script de 161 páginas... es hora de empezar a hacer bucles para reducirlo a menos de 5 hojas.... el primer problema que me encuentro es que se queja de que el vector de datos que intruduzco (una base de datos de 11 años) es demasiado grande; tengo segun R... un vector de 31,5 Mb... y no lo quiere abrir... ¿cuál es el límite? y segundo.... para evitar el...

Amigos de la erre. He creado mi primer bucle con for para entrenar unos modelos con GAM. La respuesta es quasipoisson porque estoy trabajando con densidades de peces. Sin embargo, tengo un problema, no se muy bien como añadir el offset a la formula siguiente cuando creo el bucle. GAM.A1 <-gam ((DYO)~s(DMA,k=4)+ s(WOD,k=4)+s(CIN,k=4)+s(DRA...

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...

...uiero de su ayuda con algo puntual: 1. Tengo en el vector Muestras: rm(list = ls()) set.seed(2085089)# Fija Datos data<-matrix(-1,30,ncol=10) > MuestraS [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [1,] 1 0 0 0 1 1 0 1 1 1 Ahora, dentro de un bucle for voy a generar muestras aleatorias, pero requiero que en ese mismo proceso, apenas se tenga una muestra duplicada esta se sobrescriba, no he logrado que el bucle se quede en una posición y de esta manera generar una nueva muestra que no este duplicada. Para hace lo descrito en el parrafo anterio...

Otra opcio es no incluir en 0 For (i in c(-2,-1,1,2) El 12 jun. 2017 14:43, <Guillermo.Vinue en uv.es> escribió: Hola, Creo que sería añadir if(i == 0) next Saludos, Guillermo > Buenas, ?como puedo hacer que el bucle for se salte el error que salta cuando i<-0 en el codigo que paso?? > > > > count <- 0 > for(i in -2:2){ > z<-1/i > z<-z*z > modelo<-lm(z~1) > } > > > Gracias > > > > > > [[alternative HTML version deleted]] > &...

Hola a todos. Estoy intentando implimentar un bucle que repita tantas veces un elemento como indique otro vector y me cree una tabla con ellos , por ejemplo: h<-c(1,2,3,1,2,3,1,1) g<-c(6,7,4,1,3,3,2,1) for(i in 1:sum(h)){ X <- rep(g[i], h[i]) as.vector(X)->X write.table(X, file="X.txt",append=TRUE,row.names=FALSE,col.names=...

Amigos de la erre. He creado mi primer bucle con for para entrenar unos modelos con GAM. La respuesta es quasipoisson porque estoy trabajando con densidades de peces. Sin embargo, tengo un problema, no se muy bien como añadir el offset a la formula siguiente cuando creo el bucle. GAM.A1 <-gam ((DYO)~s(DMA,k=4)+ s(WOD,k=4)+s(CIN,k=4)+s(DRA...

...hacer un poco mejor (sacando los ids que ya están limpios de la iteración), pero no vale la pena: tarda un par de minutos. Un saludo, Carlos J. Gil Bellosta http://www.datanalytics.com On Mon, 7 Oct 2024 at 12:01, Griera <griera en yandex.com> wrote: > 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...

Hola, Otra forma de hacerlo, es así: #--------------- > x<- c(24,12,45,68,45) > sum(apply(combn(x,2),2,prod)) [1] 14121 #--------------- Y te ahorras los líos del bucle y de los índices... Saludos, Carlos Ortega www.qualityexcellence.es El 24 de febrero de 2015, 10:36, Francisco Rodríguez <fjroar en hotmail.com> escribió: > Si he entendido bien el problema, lo que quieres hacer realmente es esto: > x<- c(24,12,45,68,45)n<-length(x)res=0for(i i...

...gt; iteración), pero no vale la pena: tarda un par de minutos. > > Un saludo, > > Carlos J. Gil Bellosta > http://www.datanalytics.com > > > On Mon, 7 Oct 2024 at 12:01, Griera <griera en yandex.com> wrote: > > > 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 reg...

...!!!!! Jesús ________________________________ De: R-help-es <r-help-es-bounces en r-project.org> en nombre de Javier Marcuzzi <javier.ruben.marcuzzi en gmail.com> Enviado: lunes, 12 de junio de 2017 14:48 Para: Xavi tibau alberdi; Guillermo.Vinue en uv.es Cc: Lista R Asunto: Re: [R-es] Bucle for que se salte los errores Case también podría ir, en realidad cualquier función de condicional, hay algo de gusto personal también (yo prefiero if). Javier Rubén Marcuzzi De: Xavi tibau alberdi Enviado: lunes, 12 de junio de 2017 9:46 Para: Guillermo.Vinue en uv.es CC: Lista R Asunto: Re: [R-...

Hola, Una forma puede ser la siguiente... Para comparar, he creado una nueva columna "new_zona" que es la que se va rellenando con un bucle... #------------------- > cont <- 1 > new_zona <- 0 > for(i in 1:nrow(data)) { + new_zona[i] <- cont + if(data$Subzona[i] == 1 & i > 1) { + cont <- cont + 1 + new_zona[i] <- cont + } + } > > data$new_zona <- new_zona > data Margen Zona Su...

...a logística modificada. Pero en mi caso, la convergencia de nlm depende de los valores iniciales de dichos parámetros. Para buscar dichos valores iniciales de manera automática, genero dos vectores de valores iniciales posibles, x01=seq(-10,-20,-0.1) x02=seq(0.1,0.9,0.01) y construyo un doble bucle para buscar los valores que llevan a la convergencia de la función: for (i in 1:length(x01)) { for (j in 1:length(x02)) { fit<-NULL #genero un objeto nulo llamado fit try(fit<-nlm(hood2par,c(x01[i],x02[j]),iterlim=300, catch=x[,c(3,4,5)],sp=.5),silent=TRUE) # Con try...

...inutos. > > > > Un saludo, > > > > Carlos J. Gil Bellosta > > http://www.datanalytics.com > > > > > > On Mon, 7 Oct 2024 at 12:01, Griera <griera en yandex.com> wrote: > > > > > 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 > borr...

...r el proceso. El problema radica en el comando par( mfrow =c(3,3)). Tal y como lo conozco, se escribirlo, y después colocar dos gráficas, por ejemplo par( mfrow =c(2,1)). indexplot bla bla bla indexplot bla bla bla. Pero ahora con el while, no puedo poner "dos" gráficas, sinó que es un bucle. Entonces no se si para mi caso tengo que utilizar el comando par y adaptarlo un poco, o con el comando par no puedo hacer lo que yo quiero y hay otro comando en R que desconzco. Os adjunto el codigo base que he pensado (tengo que pensar aun los argumentos y que resultado poner, porque el resultad...

Hola, quiero obtener la suma del producto de los elementos de un vector y cuando construyo el código me aparecen una serie de NA que me impiden calcular la suma. ¿Alguna sugerencia? El código es el siguiente: x<- c(24,12,45,68,45) n<-length(x) res<-numeric() for(i in 1:n-1){ for(j in i+1:n){ res<- sum(x[i]*x[j]) print(res) } } res [[alternative HTML version deleted]]

...ELECT * FROM TABLA1_2014") datos2<-sqlQuery(base ,"SELECT * FROM TABLA2_2014") datos3<-sqlQuery(base , "SELECT * FROM TABLA3_2014") base1<-Reduce(function(...) merge (...,by="ID", all=T), list(datos1,datos2,datos3)) Sin embargo, no he podido realizar un bucle para hacer este mismo proceso para el conjunto de datos. quiero hacer una función for para automatizar el proceso. agradecería una ayuda al respecto. <https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail> Libre de virus. w...

Estimados compañeros, hoy me ha surgido una duda, quizás trivial, pero que no encuentro sentido. Tengo un bucle con el siguiente código: for (i in 1:n) { if (rango_inr1[i]==1 & (inr[i]>= 2 & inr[i]<= 3)) cinr[i]<-1 if (rango_inr1[i]==2 & (inr[i]>= 2.5 & inr[i]<= 3.5)) cinr[i]<-2 if (rango_inr1[i]==3 & (inr[i]>= 2 & inr[i]<= 2.9)) cinr[i]<-3 if (rango_inr1[i...

Estimados me pueden ayudar con el siguiente problema, necesito reducir lineas de programación mediante un bucle, las instrucciones que estoy realizando son: matriz_lambda<-matrix(NA,32,19) m_lambda_b<-matrix(NA,32,19) for(i in 1:32){ if(i<32){ matriz_lambda[i,1]<-sum(matriz5[i,c((i+1):32)]) matriz_lambda[i,2]<-sum(matriz6[i,c((i+1):32)]) matriz_lambda[i,3]<-sum(matriz7[i,c((...