r - Removing empty group spaces in barcharts of ggplot2/lattice -


this follows on q&a regarding plotting defined groups using barchart in lattice. following solution little exercise, i've realised r plots data appears in dataframe , leaves spaces between each bar, when next row of data allocated space on barchart. if @ plot you'll understand mean: 

> data.frame(soexample2)    study.id diagnosis   level 1         1    cancer 1040.58 2         2    cancer  810.92 3         3    cancer 2087.80 4         4    cancer 3959.02 5         5    cancer 3648.48 6         6    cancer 1191.74 7         7    cancer 1156.90 8         8    cancer 2705.56 9         9    cancer  827.26 10       10    cancer  867.16 11       11    cancer  575.10 12       12    cancer  699.85 13       13    cancer 1121.86 14       14    cancer 1830.62 15       15    cancer 4203.01 16       16    cancer  874.59 17       17    cancer 1037.20 18       18    cancer 1398.56 19       19    cancer  910.49 20       20    cancer  725.60 21       21    cancer  894.05 22       22    cancer 1489.25 23       23    cancer 1518.76 24       24    cancer  821.60 25       25    cancer  530.35 26       26    cancer 1191.80 27       27    cancer 1920.12 28       28    cancer 1330.60 29       29    cancer  835.95 30       30    cancer  525.22  require(lattice) soexample2$group<-ifelse(level>median(level),1,0) barchart(level~factor(group), data=soexample2, groups=study.id)

this gives me following barchart:

read chart left right understand how r makes spaces between groups

similarly, can same in ggplot2, same thing occurs: 

require(ggplot2) g1<-ggplot(soexample2, aes(x=group, y=level)) g1+geom_histogram(stat="identity")+facet_grid(.~group)+labs(x="group")+labs(y="levels")

the same plot made ggplot

so, ideas on how remove these empty spaces?

cheers,

oliver

you can use study.id x values , convert them factor ensure values aren't interpreted numeric. ggplot2 solution inside facet_grid() add argument scale="free" remove empty levels.

ggplot(soexample2,aes(factor(study.id),y=level))+              geom_bar(stat="identity")+              facet_grid(.~group,scales="free")

enter image description here


Comments

Post a Comment

Popular posts from this blog

Android layout hidden on keyboard show -

i have strange problem layout. when tap on edittext , keyboard shown edittext stay on bottom , when tap on to hide keyboard , keyboard hides , edittext go should when want input text. when tap again, keyboard shown , edittext goes down behind keyboard... <relativelayout android:layout_width="match_parent" android:layout_height="match_parent" > <scrollview android:layout_width="match_parent" android:layout_height="fill_parent" android:above="@+id/rl_commands"> <textview android:layout_width="match_parent" android:layout_height="wrap_content"/> </scrollview> <relativelayout android:layout_width="match_parent android:layout_height="24dp" android:id="@+id/rl_commands" android:alignparentbottom="true">
Read more

google app engine - 403 Forbidden POST - Flask WTForms -

i have flask application running on google app engine. trying submit form built using wtform , keep getting following error. 403 forbidden: don't have permission access requested resource. either read-protected or not readable server. location.html (part of code) <form method=post action="/home/location"> .... <button type="submit" class="btn btn-primary" value="submit"> directions </button> </form> main.py @app.route('/home/location', methods=['post', 'get']) def location(): form = cfcdirections.direction(request.form) print(request.method) if request.method == 'post' , form.validate(): print("after if") directions = cfcdirections() street_no = directions.no street = directions.street suburb = directions.suburb postcode = directions.postcode
Read more

c - Why would PK11_GenerateRandom() return an error -8023? -

i looking through internet trying find source of pk11_generaterandom() function see why function fail. have program uses function when moved new flavor of linux, fails after forking ( fork() ) since not believe there problem nss, suspect doing incorrectly disregarded in older versions of linux new 1 there issue. the openssl package same on 'good' , 'bad' server: openssl 0.9.8e-fips-rhel5 01 jul nss rpm differs though. 'good' has nss-3.12.2.0-2.el5 and bas has version nss-3.15.3-4.el5_10 the 'good' server uses quite obsolete linux: linux 2.6.18-128.el5 #1 smp wed jan 21 08:45:05 est 2009 x86_64 x86_64 x86_64 gnu/linux enterprise linux enterprise linux server release 5.3 (carthage) red hat enterprise linux server release 5.3 (tikanga) the 'bad' server newer: linux bad 2.6.18-371.4.1.el5 #1 smp wed jan 29 11:05:49 pst 2014 x86_64 x86_64 x86_64 gnu/linux oracle linux server release 5.10 red hat enterprise linux server release
Read more