similar to: Encontrar la primera columna no NA

Otra solución algo más rapida: > t <- Sys.time() > dat[,jugador:=1:.N] > dat2=melt(dat,id.vars="jugador") > setkey(dat2,jugador) > dat2[,index:=min(which(!is.na(value))),by=jugador] > dat2[,.(First_month=variable[index[1]],Value_First_month=value[index[1]]),by=jugador] jugador First_month Value_First_month 1: 1 Uno 0.93520715 2:

Por último, utilizando la indexación lineal de matriz que propusó luisfo en su momento: > t <- Sys.time() > M=as.matrix(dat) > index <- which(!is.na(M)) - 1 > meses<-colnames(M) > M2<- data.table(columna=index %/% nrow(M) +1L, jugador=index %% nrow(M) +1L , valor=M[index+1L]) > setkey(M2,jugador,columna) >

Hola a todos, me ha gustado mucho la solución de Carlos, muy eficiente y muy ingeniosa al utilizar la funcion col() que o no la conocia o no me acordaba de ella. La parte mas "lenta" sigue siendo el apply que en el fondo no es mas que un ciclo for a traves de las filas, asi que inspirado por el metodo de Carlos pense que podria ser mas rapido si iteramos a traves de las columnas por lo

Buenas tardes, Quiero extraer datos de una web en la que ser relaciona la semana con la puntuación obtenida por un jugador. Ahora mismo llego a obtener elnodo en el que se relacionan la semana con la puntuación obtenida, pero no soy capaz de extraer esa informacion en una tabla de dos columna (semana, puntuacion) teniendo en cuenta que puede que haya semanas que no haya puntuado (en el ejemplo,

Hi, I have a problem with dialling internationals numbers, and I don't now what is the cause. I have one asterisk with a e100p card connected to the Telco (spain/telefonica) and it can dial local and national numbers without problems but when I try to dial a international number it hangs-up. I call the Telco to ask if the E1 can do international calls and it said that it can. I have tried

If I have a text with 7 words per line and I would like to put first and second word joined in a vector and the rest of words one per column in a matrix how can I do it? First 2 lines of my text file: "2008/12/31 12:23:31 numero 343.233.233 Rodeo Vaca Ruido" "2010/02/01 02:35:31 palabra 111.111.222 abejorro Rodeo Vaca" Results: Vector: 2008/12/31 12:23:31 2010/02/01 02:35:31

Muchas gracias a ambos!!!! Las dos soluciones me han funcionado. Un saludo. El día 18 de enero de 2016, 18:35, Carlos Ortega <cof en qualityexcellence.es> escribió: > Hola, > > Pero, si ya casi lo tienes... te quedan un par de pasos y ya está... > > Simplemente tienes que transformar "puntos_nodo" a bien un data.frame aunque > quedará lleno de cosas que no te

Hola erreros, Tengo dos data frame, que no tienen ni el mismo numero de filas ni de columnas. Uno de ellos tiene una columna con nombres largos. El otro sólo contiene una lista de todos los posibles valores de esa columna y un numero. Es digamos una tabla sólo para identificar los nombres y poder trabajar con los numeros en vez de con los nombres largos. Un ejemplo muy corto sería: data frame de

Hola! Quiero encontrar los outliers de una columna de datos que son diferencias de tiempo, aunque esta en formato numero no en horas. El paquete que encontre que me podria servir es el outliers e hice este script: library(outliers) filename<-"timediff.csv" time<-read.csv(filename, sep=";",header=TRUE,dec=",") chisq.out.test(time$TimeDiff) Pero me da error

Buenas, A ver si alguien sabe como hacer lo siguiente: Tengo un df con letras y numeros, quiero que si me detecta un numero en concreto me a?ada dicho numero en otra columna. Algo asi df<-data.frame(c("AV 23","PEPE 34","QWE","AV 24","WERRR ER34","AV 25")) colnames(df)<-c("nombre1") df[grepl("AV

Hola, Tengo la siguiente base de datos Numero de vuelo Nacionalidad Pax 1240 Argentina 2341 1240 Uruguaya 4432 1240 Paraguaya 67000 1240 Brasilera 1234 1241 Argentina 7344 1241 Uruguaya 543000 1241 Paraguaya 3000 1241 Brasilera 234000 y quiero que quede del siguiente modo: Numero de vuelo Nacionalidad_argentina Nacionalidad_uruguaya Nacionalidad_paraguaya Nacionalidad_brasilera 1240 2341 4432

Hola. Llevo poco tiempo con R y estoy atascado en un problemilla, a ver si podéis ayudarme. Estoy trabajando con una base de datos sobre personalidad en diferentes especies de aves. Esta base tiene datos de más de 7000 individuos y me gustaría crear un bucle mediante el cual realizar un test de Kruskal Wallis por cada especie (quiero ver si los comportamientos son consistentes dentro de cada

Con parse_number sacaria todos los numeros de la columna, pero lo que busco es sacar solo los que empiezan por AV y descartar el resto. De todas maneras muchas gracias, le voy a dar otra vuelta. ________________________________ De: Juan Carlos Lopez Mesa <jclopez5 en unal.edu.co> Enviado: martes, 22 de septiembre de 2020 21:32 Para: Samura . <tontito82 en hotmail.com> Cc: r-help-es

Buenas noches. Soy nuevo en programar en R Quiero calcular la raiz de cualquier numero apartir de la imagen seleccionando que la formula nos establece como irme acercando a ese valor de la raiz. Agradezco su colaboración. Saludos. ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL:

Buenas, Tengo dos data.frame DF1 color numero verde 2 rojo 4 azul 3 y DF2 color verde verde verde rojo rojo azul Quieo que se añada en el segundo dataframe el contenido del DF1 .El ejemplo puesto est trivial y parece que se podria resolver fácilmente con un par de ifelse, pero en la realidad existen más de 4000 registros diferentes para el DF1. ¿Como puedo

Hola a todos: Debe de ser una tontería, pero no consigo saber porque la siguiente linea no devuelve la fecha actual: as.Date(as.numeric(Sys.time())) He hecho esa prueba porque no consigo pasar un numero convertido a partir de una fecha y modificado a fecha de nuevo. Gracias por adelantado. Un saludo, Alberto. [[alternative HTML version deleted]]

Hola a todos, Necesito crear una variable que sólo coja los valores positivos de otra, y que los negativos o 0 los rellene con 0. Sin embargo, me está dando este error con el código que estoy metiendo: > Datos$variable.nueva<-Datos$variable.antigua[Datos$variable.antigua>0] Error in `$<-.data.frame`(`*tmp*`, Evolution.Bestselling.Positive, value = c(0.00572935181893588, :

Hi, I need to use the grant table mechanism, but I can''t find any example regarding how to do it. Could you please provide some examples? Thanks Carlo -- È molto più bello sapere qualcosa di tutto, che sapere tutto di una cosa. Blaise Pascal _______________________________________________ Xen-devel mailing list Xen-devel@lists.xensource.com http://lists.xensource.com/xen-devel

Buenas noches, tengo dos vectores con nombres. El primero es largo, nombreL, y el segundo corto, nombreC. Quiero contar cuantas veces aparece alguno de los nombres del vector corto en el largo. Lo que estoy haciendo es lo siguiente: cuenta <- 0 topL <- length(nombreL) topC <- length(nombreC) for (i in 1:topL) { for (j in 1:topC) {

Buenas, tengo 30 000 000 de datos, y el R no me deja trabajar, como podria corregir eso problema para trabajar con los 30 000 000, mintras es estoy trabajando cada 1 000 000 pero no es igual. Espero puedan ayudarme saludos -- Manuel Bonilla