search for: elegantize

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

Hola a todos. Estoy atascado en un sitio que no me he encontrado antes, debe ser fácil y rápido, a ver si alguien me puede ayudar. Puesto fácil, tengo: > aa <- matrix(11:19,3,3) > aa [,1] [,2] [,3] [1,] 11 14 17 [2,] 12 15 18 [3,] 13 16 19 Quiero la fila cuyo primer elemento es 12 y el segundo 15. > aa[aa[,1:2] == (c(12,15)),] Error: (subscript) logical

Buenas tardes, Estoy intentando ajustar distribuciones utilizando un vector de ponderación en los datos (Weighted Likelihood). ¿Existen paquetes en R que resuelven esto? He mirado ya el paquete "wle" pero no me permite introducir los pesos mediante los cuales ponderar los datos. En un primer momento, se me ha ocurrido realizar lo siguiente: repetir cada elemento del vector datos

Hola: A ver si me podéis ayudar que estoy atascado... Necesito contar los subcasos de la columna 2 de un dataframe respecto a los casos de la columna 1. Es decir, tengo un data.frame a<-c(rep(c('a','b','c','b','c'),3),'b') b<-c(rep(c('x','y','z','w'),4)) c<-c(rep(c(1,1,0,0),4))

Hola a todos, Escribo para preguntarles sobre cómo programar algo, que estoy segura es algo bastante sencillo para muchos de Uds que tienen amplia experiencia programando. Lo describo a continuación. Tengo una base de datos (file = datos) de especies (de plantas) en donde cada fila es un individuo de una especie con ciertos atributos (alrededor de 1500 filas = individuos). Quería anexar en esta

¡Muchas gracias Olivier! Un saludo. El 16 de abril de 2015, 10:44, Olivier Nuñez <onunez en unex.es> escribió: > Mira el paquete survey. > Un saludo. Olivier > > ----- Mensaje original ----- > De: "Víctor Nalda Castellet" <victor.nalda.castellet en gmail.com> > Para: "r-help-es" <r-help-es en r-project.org> > Enviados: Miércoles, 15 de

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

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

Hola chicos, muchas gracias, funcionan vuestros códigos, pero no entiendo porqué el mío no funciona, y me gustaría aprender R bien. Quiero sacar números de 5 en 5, desplazándome una posición cada vez para la derecha: a <- c(8,10,4,1,7,2,4,6,3,8) b <- rep(0,5) i=1 while (i<=6) { b <- a[i:i+4] print(b) i=i+1 } quiero que en la primera iteración me saque en

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 hago esto:

Hola: Aplicaré lo que dices de usar data.table. Sobre hacer for, etc. Ya lo he hecho, pero pensaba que usar dplyr haría la tarea más rápida por estar este implementado en C (si no me equivoco). Siempre que puedo utilizo estas funciones, porque codificas menos y van más rápido. En este caso el problema es que no he encontrado la manera de hacer lo que quiero con dplyr o similar. La idea era al

...m vector to use for matrix multiplication means <- (d%*%s)/ncol(d) This is at least 1 order of magnitude faster than iterating through the rows and using the mean function (<1/100th seconds vs. 13/100th seconds on my computer). Two questions: 1) Do you see a way to further optimize/simplify/elegantize this calculation of the row means? 2) How do I proceed to calculate the row variances with matrix operations (specifically, how can I use matrix operations to subtract each element of each row from the corresponding row mean)? Thank you, Eric Kort -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-....

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

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

Hola, Otra forma, utilizando la función de intervalos y la que comprueba si otro intervalo se solapa del paquete "lubridate": #---------------------- library(lubridate) fe.chas <- data.frame( entra=c('2001-01-01','2001-06-01','2003-01-01') ,sale=c('2002-01-01','2002-06-01','2004-01-01') ) ref <-

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,

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