r - Resample with replacement by group -


this first post please bear me. below small sample of data. actual dataset has on 4,000 individual ids , each id can have anywhere 1 2 hundred separate dollar amounts assigned it.

id   dollars 001  17000 001  18000 001  23000 002  64000 002  31000 003  96000 003  164000 003  76000

what i'm trying can best explained using example. want generate 5 random samples, replacement, each id. each sample have size of 5 or 5 randomly sampled dollar values. final result have 20,000 separate samples (5 samples, per 4000 ids, each containing 5 randomly selected dollar amounts id). doing in order compare distributions of dollars in each sample fellow samples same id.

as of right now, i'm attempting garner such answer using code referenced below. should point out when run script receive error 'results must atomic'. i'm not sure if need add additional steps or what.

x <- function(func)      {       func<-(lapply(1:5, function(i)         sample(data$dollars, size=5, replace=true)))      }      grouped.samples<-ddply(data,.variables="id",.fun=x)

i’m sorry in advance if question posed unclear; had difficulty articulating problem i'm having.

thanks in advance help

using data.table:

library(data.table) dt = as.data.table(your_df)  dt[, dollars[sample.int(.n, 5, true)], = id] #    id     v1 # 1:  1  17000 # 2:  1  18000 # 3:  1  18000 # 4:  1  23000 # 5:  1  17000 # 6:  2  31000 # 7:  2  31000 # 8:  2  31000 # 9:  2  31000 #10:  2  64000 #11:  3  96000 #12:  3  96000 #13:  3  76000 #14:  3 164000 #15:  3  76000

Comments

Post a Comment

Popular posts from this blog

javascript - RequestAnimationFrame not working when exiting fullscreen switching space on Safari -

request animation frame stops working when exiting fullscreen clicking on original space's safari window. fine if fullscreen mode canceled escape key or calling cancelfullscreen(). steps reproduce: open https://dl.dropboxusercontent.com/u/769042/prezi/safari-fullscreen.html click "draw raf", kittie appears click "fullscreen", go fullscreen click "draw raf", kittie appears go space original safari was, showing "click exit fullscreen mode", click anywhere, out fullscreen click "draw raf", nothing happens what handling click calling: window.requestanimationframe(draw); which draws on canvas context: function draw() { ctx.drawimage(img, math.random()*500|0, math.random()*400|0, 100, 100); } i checked .hidden , .visibilitystate, updated correctly. tested on osx 10.9.3, safari 7.0.4 (9537.76.4). has workaround/solution other switching old settimeout? this sounds webkit bug 88940 : using reque
Read more

Python ctypes access violation with const pointer arguments -

i have api i'm trying wrap in python (2.7.6 on win7) code using ctypes. here's api: client_dllfunc bool clientapi search_exporttoclipcopy(clienthsearch handle, int channel, lpctstr filename, const time_t& from, const time_t& to, const bool* cameras, int length, bool usepassword, lpctstr password, bool includetextin = false, bool excludeplayer = false); the issue i'm having cameras argument; , i've had issue other const pointer arguments well. here's how i'm wrapping api: def search_exporttoclipcopy(self, hsearch, csearch, filename, tfrom, tto, cameras, length, usepassword, password, includetextin=true, excludeplayer=false): exporttoclipcopy = self.sdkdll.search_exporttoclipcopy exporttoclipcopy.argtypes = [c_int, c_int, c_wchar_p, c_long, c_long, pointer(c_bool), c_int, c_bool, c_wchar_p, c_bool, c_bool] exporttoclipcopy.restype = c_bool exporttoclipcopy(hsearch, csearch, filename, tfrom, tto, cameras, length, usepassword, pass
Read more