r - Density of each group of weighted geom_density sum to one -

-

how can group density plot , have density of each group sum one, when using weighted data?

the ggplot2 geom_density() suggests hack using weighted data: dividing sum of weights. when grouped, means combined density of groups totals one. density of each group total one.

i have found 2 clumsy ways this. first treat each group separate dataset:

m <- ggplot() m + geom_density(data = movies[movies$action == 0, ], aes(rating, weight = votes/sum(votes)), fill=na, colour="black") +     geom_density(data = movies[movies$action == 1, ], aes(rating, weight = votes/sum(votes)), fill=na, colour="blue")

obvious disadvantages manual handling of factor levels , aesthetics. tried using windowing functionality of data.table package create new column total votes per action group, dividing instead:

movies.dt <- data.table(movies) setkey(movies.dt, action) movies.dt[, votes.per.group := sum(votes), action] m <- ggplot(movies.dt, aes(x=rating, weight=votes/votes.per.group, group = action, colour = action)) m + geom_density(fill=na)

are there neater ways this? because of size of tables, i'd rather not replicate rows weighting sake of using frequency.

i think auxillary table might option. had similar problem here. issue seems that, when ggplot uses aggregating functions in aes(...), applies them whole dataset, not subsetted data. when write 

aes(weight=votes/sum(votes))

the votes in numerator subsetted based on action, votes in denominator, sum(votes), not. same true implicit grouping facets.

if else has way around i'd love hear it.


Comments

Post a Comment

Popular posts from this blog

javascript - Slick Slider width recalculation -

-
i'm trying add slide in panel on slick container css. carousel works except new width not being calculated when space has been added. recalibrate once advance next slide i'd happen each time panel opened or closed. i've tried adding both margin , padding, neither makes difference. ideas? https://jsfiddle.net/mhigley/dpf7mlpl/ html: <button type="button" id="button"><i class="fa fa-arrow-right"></i></button> <aside> <h2>slide in panel</h2> <ol> <li>list item</li> <li>list item</li> <li>list item</li> <li>list item</li> <li>list item</li> </ol> </aside> <main role="main"> <div class="sections"> <section> <article> <h2>first slide</h2> <p>lorem ipsum d...
Read more

jsf - PrimeFaces Datatable - What is f:facet actually doing? -

-
looking through primefaces code in app noticed following line: <f:facet name="header">#{trainsearch.traincount} trains</f:facet> it looks overriding header, makes sense, can explain me in little more detail? what happening line of code? complete code listed below: <p:datatable id = "results" value = "#{trainsearch.trains}" var = "train" rendered="#{not empty trainsearch.trains}" styleclass = "train-search-table horizontal-border"> <f:facet name="header">#{trainsearch.traincount} trains</f:facet> <p:column headertext = "train id"> <p:panelgrid columns="1" styleclass = "train-id-grid" layout = "grid"> <h:outputtext styleclass = "train-id-label" value="#{train.traini}"/> <h:outputtex...
Read more

angular2 services - Angular 2 RC 4 Http post not firing -

-
i trying fire post request app , it's not working, tried multiple ways. don't see request being fired under network tab in chrome. not sure problem is, appreciated. import { injectable } '@angular/core'; import { http, headers } '@angular/http'; @injectable() export class userservice{ private _url="users"; constructor(private _http: http){ } checkifusernameexists(username){ return this._http.get(this._url+"/"+username) .map(response => response.json()) } createuser(user){ let headers = new headers(); headers.append('content-type', 'application/json') console.log(json.stringify(user)); return this._http.post(this._url, json.stringify(user),{headers: headers}) .map(response => response.json()) } } first need capture error , solve error: this._http.post(this._url, json.stringify(user),{headers: headers}) .subscribe( ...
Read more