Displaying 6 results from an estimated 6 matches for "jvg".
Did you mean:
jpg
2016 Oct 27
3
Encontrar la primera columna no NA
...tos que cuesta \n===============================\n" )
beepr::beep(3)
# E Primera solucion ------------------------------------------------------
# S comparativa -----------------------------------------------------------
library(microbenchmark)
N <- 1e2
tabla <-
microbenchmark(
JVG_dplyr ={ dat %>%
apply( MARGIN = 1, FUN =
function(x){
which( !is.na(x) ) %>% min( na.rm = TRUE ) %>%
return()
}
)
},
JVG ={
apply(X = dat, MARGIN = 1, FUN =
function(x){...
2016 Oct 27
4
Encontrar la primera columna no NA
...ect.org>
Enviado: Thu, 27 Oct 2016 17:17:12 +0200 (CEST)
Asunto: Re: [R-es] Encontrar la primera columna no NA
Hemos mejorado bastante desde el inicio. Pero aun andamos lejos. Igual es
por el merge que hago. Seguire mirando
library(microbenchmark)
N <- 1e1
tabla <-
microbenchmark(
# JVG_dplyr ={
# dat %>%
# apply( MARGIN = 1, FUN =
# function(x){
# which( !is.na(x) ) %>% min( na.rm = TRUE ) %>%
return()
# }
# )
# dat[ , First_month := First_month]
# N_for <- length( unique(First_...
2016 Oct 27
2
Encontrar la primera columna no NA
...tos que cuesta \n===============================\n" )
beepr::beep(3)
# E Primera solucion ------------------------------------------------------
# S comparativa -----------------------------------------------------------
library(microbenchmark)
N <- 1e2
tabla <-
microbenchmark(
JVG_dplyr ={ dat %>%
apply( MARGIN = 1, FUN =
function(x){
which( !is.na(x) ) %>% min( na.rm = TRUE ) %>%
return()
}
)
},
JVG ={
apply(X = dat, MARGIN = 1, FUN =
function(x){...
2016 Oct 28
2
Encontrar la primera columna no NA
...cpp, pero creo que al menos por mi parte llego hasta aqui.
Muy interesante tanto el problema como las soluciones propuestas, un saludo!
Adolfo.
library(microbenchmark)
library(data.table)
library(dplyr)
library(tidyr)
set.seed(123456)
numero <- 1e5
N <- 1e1
tabla <-
microbenchmark(
JVG ={
dat <-
data.table( Uno = sample( c(runif(numero) , rep(NA , numero /2e0
)) , size = numero ) ,
dos = sample( c(runif(numero) , rep(NA , numero /1e1
)) , size = numero ) ,
tres = sample( c(runif(numero) , rep(NA , numero /2e1
)) , s...
2006 Oct 31
3
zfs: zvols minor #''s changing and causing probs w/ volumes
...23 21:38 /vol4/vol4
=====================end summary of the
problem==========================
--
Jason Gallagher
Operating Systems Group Support Team
Sun Microsystems, Inc.
Working hours: Sat/Sun 6am - 6pm & Mon/Tue 8am - 5pm MNT
Phone: Call 1-800-USA4-SUN and reference your case id
e-mail: jvg at sun.com
Case info located at http://www.sun.com/service/online
2009 Jul 23
1
[PATCH server] changes required for fedora rawhide inclusion.
...YW at JLP>I0Ix784<URQ03&ky4up?VemjiN?T;aZ;ko^B&~_pYLv;HtgfK*8
zH)wkhe*yqQbo*Y)OZI`bpK|vBga?s6MEL-Sa{$CS0OE8%O^rXmQG+cS_zdL(pG8-W
zfE6}t;ByFJugJ?nt&n~mY1pWNM-jqq4LpVrHf`W>gs%&W4S?MuuvY}Oiom83*sVKH
zQl4^3)CqV|l%f2uFHx?(jPMntUq$$ur~~0Sz#D)!0dE1`7UCuRukRrKF5o at D`+yHX
z{}ACv2tNjVg7~KhKL>nC`Q2Y3{2Jjml;8O+HCm{A at DG#^{*iL;&w%p)=(qP5gckq}
zI;W#_UOpC{>o}cPU^V$B=-dZ$?}I7#O+<VWU@~9|05j^t%=o4vjxwp!be=u~WoPNU
zYBs_-I=^Qg!ubG{B`AB(0)((9_bk-8x(IR9bI)RwTY at -zu6vduTn0e9_bf-a0<aSC
zRf3Lks}Zh2dM!e<d(S$AqQ4tZ$41 at g=HS)$B8e_mZwB<^)mwBP+^Tb9o6bWI>OA}~
z;1R$Mz at...