r - Aggregate values for all combinations of factor levels including missing ones -


i'm trying find minimum value of dataframe based on multiple columns. i'm able using aggregate function below. however, result not contain combinations of factors there no data in input data frame.

what i've got:

# possibilities of fruits, cities, , vegetables: fruits<-c('apple','banana','grape') cities<-c('new york','chicago','los angeles') vegetables<-c('cucumber','mushroom')  #my input (ie, sample test: inputdf<-data.frame(fruit=c('apple','apple','apple','banana','banana','banana','grape','grape','grape'),city=c('new york','new york','new york','new york','chicago','los angeles','chicago','chicago','chicago'),vegetable=c('cucumber','cucumber','mushroom','cucumber','mushroom','mushroom','cucumber','cucumber','cucumber'),value=c(5,3,4,6,5,7,2,7,4))  #my aggregation: outdf<-aggregate(value ~ fruit + city + vegetable,inputdf,function(x) min(x))

the output is:

fruit   city        vegetable   value grape   chicago     cucumber    2 apple   new york    cucumber    3 banana  new york    cucumber    6 banana  chicago     mushroom    5 banana  los angeles mushroom    7 apple   new york    mushroom    4

this correct, however, want rows correspond combinations of columns didnt exist @ in input df:

fruit   city        vegetable   value apple   new york    cucumber    3 apple   new york    mushroom    4 apple   chicago     cucumber    na apple   chicago     mushroom    na apple   los angeles cucumber    na apple   los angeles mushroom    na banana  new york    cucumber    6 banana  new york    mushroom    na banana  chicago     cucumber    na banana  chicago     mushroom    5 banana  los angeles cucumber    na banana  los angeles mushroom    7 grape   new york    cucumber    na grape   new york    mushroom    na grape   chicago     cucumber    2 grape   chicago     mushroom    na grape   los angeles cucumber    na grape   los angeles mushroom    na

i'd able number of columns on combine. there simple way that? reason want output because need transform nas specific value , average values on same subsets again. thanks!

you can using expand.grid generate combinations, using merge:

outdf<-aggregate(value ~ fruit + city + vegetable,inputdf,function(x) min(x)) df=expand.grid(fruits, cities, vegetables) outdf=merge(outdf,df,by.x=c('fruit','city','vegetable'),by.y=c('var1','var2','var3'),all.y=t)  > outdf     fruit        city vegetable value 1   apple     chicago  cucumber    na 2   apple     chicago  mushroom    na 3   apple los angeles  cucumber    na 4   apple los angeles  mushroom    na 5   apple    new york  cucumber     3 6   apple    new york  mushroom     4 7  banana     chicago  cucumber    na 8  banana     chicago  mushroom     5 9  banana los angeles  cucumber    na 10 banana los angeles  mushroom     7 11 banana    new york  cucumber     6 12 banana    new york  mushroom    na 13  grape     chicago  cucumber     2 14  grape     chicago  mushroom    na 15  grape los angeles  cucumber    na 16  grape los angeles  mushroom    na 17  grape    new york  cucumber    na 18  grape    new york  mushroom    na

Comments

Post a Comment

Popular posts from this blog

android - InAppBilling registering BroadcastReceiver in AndroidManifest -

i'm implementing inapp billing in android app. works well, however, i'm trying decouple broadcast receiver activity manifest. suggestion in android's trivialdrive sample: // important: dynamically register broadcast messages updated purchases. // register receiver here instead of <receiver> in manifest // because call getpurchases() @ startup, therefore can ignore // broadcasts sent while app isn't running. // note: registering listener in activity bad idea, done here // because sample. regardless, receiver must registered after // iabhelper setup, before first call getpurchases(). currently there's class extends broadcastreceiver : public class iabbroadcastreceiver extends broadcastreceiver { /** * intent action receiver should filter for. */ public static final string action = "com.android.vending.billing.purchases_updated"; private final iabbroadcastlistener mlistener; public iabbroadcastreceiver(iabbroadcastlistener listener) { m...
Read more

python Tkinter Capturing keyboard events save as one single string -

is possible store keyboard events 1 string? code below stores 1 char , prints it. card reader or bar code reader, contains collection of character/ string not 1 character @ time. goal save char pressed text variable. from tkinter import * root = tk() def key(event): text= event.char text+= event.char print ("pressed", text) def callback(event): frame.focus_set() print ("clicked at", event.x, event.y) frame = frame(root, width=100, height=100) frame.bind("<key>", key) frame.bind("<button-1>", callback) frame.pack() root.mainloop() currently, creating text variable , everytime key() function gets called, , text stores last character typed. you can define text module level variable , , use module level text inside key function - text = '' def key(event): global text text+= event.char print("pressed", text)
Read more

sql server - Why does Linq-to-SQL add unnecessary COUNT()? -

here tables: create table customer ( cid int primary key, name varchar(32) ) create table ord ( oid int primary key, cid int foreign key references customer, address varchar(20) ) here's linq-to-sql statement: var aaa = c in db.customer select new { c, o = c.ord.tolist() }; and here's inexplicable query generated linq-to-sql: select [t0].[cid] [cid], [t0].[name] [name], [t1].[oid] [oid], [t1].[cid] [cid2], [t1].[address] [address], (select count(*) [dbo].[ord] [t2] [t2].[cid] = [t0].[cid]) [value] [dbo].[customer] [t0] left outer join [dbo].[ord] [t1] on [t1].[cid] = [t0].[cid] order [t0].[cid], [t1].[oid] i want understand how rid of count(*) part. it's entirely uncalled for! linq needs count(*) in order determine number of entries returned o = c.ord.tolist() .
Read more