r - Efficiently inserting default missing rows in a data.table -


suppose i've got following data.table :

dt <- data.table(id=c(1,1,1,1,1,1,2,2,2,2),            wday=c("mon","tue","wed","thu","fri","sat","mon","tue","thu","fri"),            val=c(2,3,5,8,6,2,3,4,2,6))      id wday val  1:  1  mon   2  2:  1  tue   3  3:  1  wed   5  4:  1  thu   8  5:  1  fri   6  6:  1  sat   2  7:  2  mon   3  8:  2  tue   4  9:  2  thu   2 10:  2  fri   6

this result of aggregation of data.table. represents count (val) of variable depending on week day (wday) different individuals (id). problem is, during operations i've lost week days count 0.

so question : how update data.table object efficiently inserting, each id, many rows there missing week days val=0 ?

the result following :

    id wday val  1:  1  mon   2  2:  1  tue   3  3:  1  wed   5  4:  1  thu   8  5:  1  fri   6  6:  1  sat   2  7:  1  sun   0  8:  2  mon   3  9:  2  tue   4 10:  2  wed   0 11:  2  thu   2 12:  2  fri   6 13:  2  sat   0 14:  2  sun   0

thanks lot help.

one straightforward way think of right use expand.grid combinations , use subset allow.cartesian = true:

setkey(dt, "id", "wday") vals <- c("mon", "tue", "wed", "thu", "fri", "sat", "sun") idx <- expand.grid(vals, unique(dt$id))[, 2:1] dt[j(idx), allow.cartesian=true]  #     id wday val #  1:  1  mon   2 #  2:  1  tue   3 #  3:  1  wed   5 #  4:  1  thu   8 #  5:  1  fri   6 #  6:  1  sat   2 #  7:  1  sun  na #  8:  2  mon   3 #  9:  2  tue   4 # 10:  2  wed  na # 11:  2  thu   2 # 12:  2  fri   6 # 13:  2  sat  na # 14:  2  sun  na

alternatively, possible directly build idx data table cj :

dt[cj(unique(dt$id),vals), allow.cartesian=true]

Comments

Post a Comment

Popular posts from this blog

css - Text drops down with smaller window -

i've adapted css use in website , can't quite figure out why 1 aspect of page acting way acting. basically, when shrink window below size horizontally, of text "drops down". becomes issue if user viewing website through ipad vertical orientation. can view issue here . i'm hoping make if window gets smaller, placement of text remains intact. the problem area not have enough space put both side navigation , content on 1 line. make automatically adjust page's width when exceeds decrements of width. this code example, , highly unlikely work. if see css more clearly, provide exact code. @media , (max-width:960px) { /* assuming #wrapper 960px across */ #content {width:560px;} /* opposed 720px */ } edit the content drops down @ 980px, have shrink width after there. @media , (max-width:980px) { #container {width:520px;} }
Read more

c# - DetailsView in ASP.Net - How to add another column on the side/add a control in each row? -

i have detailsview control on page used edit various fields of record, works in respect. i looking way add 1 column (and if works, why not more) right, absolutely read-only, show same fields of record comparison purposes. i aware there no obvious way such thing out of box detailsview . have looked other controls (transposed gridview , recommended formview , listview ), nothing satisfies. have special data binding setup using detailsview , can't out of without losing features. anyone on how "hack in" additional columns (for display only) on detailsview ? the solution have now, use second detailsview , visible set false in aspx. in code, make sure databind hidden detailsview hosts data third column first, initial detailsview named itemdetails . and in item created event, pass third column html rendering of hidden controls (in last code block) : protected void itemdetails_itemcreated(object sender, eventargs e) { if (dataite...
Read more

ruby on rails - Authlogic - how to make a registration and don't log in the new account? -

i have administration can create new accounts. creating new accounts using gem authlogic. admin, create new account new user without log in (the common process authlogic filling form -> sending form -> account created + new user logged in). need without log in. here's standard code creating new account: def create @user = user.new(params[:user]) respond_to |format| if @user.save format.html { redirect_to @user, notice: 'user created.' } format.json { render json: @user, status: :created, location: @user } else format.html { render action: "new" } format.json { render json: @user.errors, status: :unprocessable_entity } end end end how skip log-in thing? thanks you can use save_without_session_maintenance instead of save save user without logging in. def create @user = user.new(params[:user]) respond_to |format| if @user.save_without_session_maintenance f...
Read more