search for: elegante

Hola de nuevo: Veamos... Tengo mi aplicación organizada en varios módulos .r, de tal modo que una vez que los tengo cargados (mediante source("Load.R")) el usuario puede disfrutar de las funcionalidades llamando directamente a una serie de funciones que realizan análisis y generan resultados (numéricos y gráficos). El caso es que me gustaría "elegantizar" esa carga inicial

...egundo 15. > aa[aa[,1:2] == (c(12,15)),] Error: (subscript) logical subscript too long ¿Entonces? > aa[aa[,1:2] == t(c(12,15)),] Error in aa[, 1:2] == t(c(12, 15)) : non-conformable arrays Puedo hacer, claro, > aa[aa[,1]==12 & aa[,2]==15,] [1] 12 15 18 Pero necesito algo más "elegante" ya que la selección es sobre bastantes más columnas. Gracias de antemano y un saludo. -- Ignacio Ramos Álvarez i.ramos.alvarez@gmail.com [[alternative HTML version deleted]]

...siguiente: repetir cada elemento del vector datos tantas veces como indique el vector pesos ?modificado? (multiplicado por una potencia de 10, para que sean todos números enteros). Y con este vector de datos repetidos realizar el ajuste. Pero me gustaría conocer si existen otras formas "más elegantes" de hacerlo. Un saludo, y muchas gracias por adelantado. -- Víctor Nalda Castellet [[alternative HTML version deleted]]

...x 2/6 10 c y 1/6 11 c z 2/6 donde 1/3 es el número de filas con valor (a,x)/totalvalores a. En fin, no se si me explico. El problema que tengo es que voy a tener muchisimas filas con pocas repeticiones, y no consigo hacer algo minimamente eficiente (y ya no digamos elegante). Muchas gracias por vuestro tiempo! Att. Toni [[alternative HTML version deleted]]

...para que se leyera cada fila del archivo datos, se comparara con el listado de datos2 y se hiciera una nueva columna que tuviera las formas de vida de los 1500 individuos del archivo datos. Tardé 5 horas en escribir 5 líneas y como les comenté al final resultó, pero no sé si es la forma más "elegante" o "sofisticada" de hacerlo. Agradezco sus opiniones. file = datos Ind Especie Atributo1 Atributo n 1 B … 2 C ... 3 B .. ... 4 A ... ... 5 C ... ... 6 D ,,, ,,, 7 D ... ... ,,,, 8 A .... 9 B ... file = datos2 Especie FormaVida A árbol B árbol C arbust...

...; cada elemento del vector datos tantas veces como indique el vector pesos > ?modificado? (multiplicado por una potencia de 10, para que sean todos > números enteros). Y con este vector de datos repetidos realizar el ajuste. > > Pero me gustaría conocer si existen otras formas "más elegantes" de > hacerlo. > > > Un saludo, y muchas gracias por adelantado. > > -- > Víctor Nalda Castellet > > [[alternative HTML version deleted]] > > _______________________________________________ > R-help-es mailing list > R-help-es en r-project.org &g...

Carlos, en principio si sería algo así, sólo que en vez de quedarme con todas las columnas var1 a var4 tuviera sólo 3, ya que en mis datos no hay ningún caso que tenga el valor 1 en más de 3 variables.. Había llegado a una solución (mucho menos elegante que usando reshape), que implicaba un for sobre las filas. Jorge, creo que tu solución me vale. Muchas gracias a los dos.. Saludos El 11/04/14 13:49, Carlos J. Gil Bellosta escribió: > ¿Algo así? > > var1 <- c(rep(0,3),rep(1,2)) > var2 <- c(rep(1,2),0,0,1) > var3 <- c...

> > >> >> Hola a todos, >> >> es la primera pregunta que hago a esta lista, no se si estoy en el sitio correcto. >> >> Tengo el siguiente vector: >> >> a <- c(8,10,4,1,7,2,4,6,3,8) >> >> y quiero conseguir en pantalla 5 valores, empezando por el final, y recorriendo el vector de derecha i izquierda cada vez, es decir,

...arme los números comprendidos entre 2 y 6, me saca solamente el de la posición 6. Por qué? no veo el error. Muchas gracias El 15 de septiembre de 2015, 16:45, Salvador Castillo Raya < casraysa en hotmail.com> escribió: > > Perdonad por el formato del correo anterior. > > Menos elegante que el codigo de Oliver, pero en la linea que estabas siguiendo: > > > a<-c(8,10,4,1,7,2,4,6,3,8) > > b<-rep(0,5) > > i=6 > > while(i>=1){ > > j=i+4 > > b<-a[i:j] > > print(b) > > i=i-1 > > } > > Saludos, Salva. > > &g...

Hola Alguien tiene una soluci''on elegante para convertir una lista con elementos que tienen diferentes longitudes, por ejemplo: XX <- list( rep("A",2), rep("B",4), rep("C",5)) en un data.frame, donde cada fila es uno de los elementos y que los "huecos" se rellenen con "NA" ? Porque si...

...; donde 1/3 es el número de filas con valor (a,x)/totalvalores a. > > > > En fin, no se si me explico. > > > > El problema que tengo es que voy a tener muchisimas filas con pocas > > repeticiones, y no consigo hacer algo minimamente eficiente (y ya no > > digamos elegante). > > > > Muchas gracias por vuestro tiempo! > > > > Att. Toni > > > > [[alternative HTML version deleted]] > > > > _______________________________________________ > > R-help-es mailing list > > R-help-es en r-project.org &...

I need to calculate a large number of t statistics, and would like to do so via matrix operations. So far I have figured out a way to calculate the mean of each row of the matrix: d <- matrix(runif(100000,1,10), 1000, 10) # some test data s <- rep(1,ncol(d)) # a sum vector to use for matrix multiplication means <- (d%*%s)/ncol(d) This is at least 1 order of magnitude faster than

Hola, buenas a todos: Me dispongo a empezar un proyecto con logística bayesiana y sé que hay varios paquetes que puedo utilizar, arm, Bayelogit y MCMCpack. Me preguntaba si alguien tiene experiencia con éstos paquetes y me pueda decir cuál de ellos es mejor. Además de esto quería saber si sabíais alguna bibliografía para informarme mejor sobre lógica bayesiana, tengo algunas referencias,

Hola, El problema con la propuesta de Olivier es que los intervalos son diferentes para cada variable. La forma sencilla y rápida es: spplot(zm["part88"], col.regions=plotclr, at=class$brks) Pero para que quede más elegante hay que dar algunos pasos más: ## Intervalos en forma character op <- options(digits=4) tab <- print(class) options(op) intChar <- names(tab) ## Indice de correspondencia entre elemento e intervalo idxP88 <- findCols(class) ## Es sólo un wrapper alrededor de findIntervals. Lo anterior...

Estimados usuarios de R: Tengo que pedirles ayuda. Tengo un dataframe en el cual por número de vendedor tengo las ventas mes a mes que realizaron. No todos los vendedores tienen ventas todos los meses. A los vendedores que aparecen en la lista quiero agregarles ventas iguales cero en aquellos meses que no aparecen en el data.frame. Por ejemplo el data.frame se podría ser así: no_cliente

Gracias Beatriz, efectivamente, lo que indicas en tu ejemplo es lo que obtengo al final de mi proceso. En todo caso pruebo tu opción con mis datos, si es como imagino seguro que es más rápida de montar y más elegante que tratar el resultado de un sink() (recuerdo que en su momento lo intenté con fotify pero no supe bien como atacarlo, no conocía el enlace que me mandas, por tanto lo pruebo de nuevo). Mañana espero informaros Un saludo y gracias de nuevo From: mtnezb en gmail.com Date: Wed, 8 Oct 2014 22:22:59...

...)} + ,fe.chas$entra, fe.chas$sale, ref + ) [1] TRUE TRUE FALSE > ​ ​Saludos, Carlos Ortega www.qualityexcellence.es​ El 17 de julio de 2014, 21:18, Francisco Javier <iterador10@hotmail.com> escribió: > > > En primer lugar, muchas gracias Carlos por la rápida y elegante respuesta. > La he aplicado a mi base de datos, y rápidamente he obtenido "casi" el > mismo resultado que obtenía de forma rudimentaria. Digo "casi" porque hay > una pequeña diferencia de valor. Me ha faltado decir (me disculpo) que > también hay que seleccionar a la...

Sebastián No se para que vas a usar los datos, pero yo no usaría ceros cuando el dato no esta disponible ( me saltearía el último paso de la rutina que te mando). Seguramente hay mejores y mas eficientes maneras de hacerlo en R pero esta es una quizás no muy elegante: original <- matrix( c(1 ,1 ,1, 1, 223, 2, 1, 224, 3, 3, 447, 1, 78, 335.75, 8, 2901, 186.3, 2, 2901, 886.18, 3, 2901, 1013.39, 7, 2901, 979.14, 9, 2901, 177.09, 6), ncol= 3, byrow= TRUE) df_original <- as.data.frame(original) colnames(df_original) <- c('no_cliente', 'venta...

Buenas tardes, Tengo un data frame denominado “trabajadores”, que cubre desde el 1 de enero de 1997 hasta el 30 junio de 1999, con 3 columnas: Identificador (ID), la fecha de entrada en la empresa (ENT) y la fecha de salida (SAL). Deseo localizar aquellos trabajadores que, durante dicho periodo, NO han llegado a pasar un 31 de diciembre y un 1 de enero seguidos (cambio de año) como asalariados

Buenos días: Después de más de 20 años en SAS, ahora igual me toca trabajar en R. Y la transición es muy dura: la "lógica" de los dos lenguajes es, para mi, totalmente diferente. Disculpen si lo que pregunto es una obviedad, pero llevo todo el día con esto y no logro encontrar la respuesta adecuada con google. Estoy intentado crear una función que realice una descriptiva simple de