Re: [R] Combined Marimekko/heatmap

2012-12-14 Thread Thomas Stewart
oductEnergy[,2:2] > > > #---plot the grid > plot.new() > plot.window(ylim=c(0,sum(CountryEnergy)),xlim=c(0,sum(ProductEnergy)),xaxs > = 'i',yaxs='i',las=1) > box() > abline(h = cumsum(CountryEnergy),lwd=2, col="gray60&q

Re: [R] Combined Marimekko/heatmap

2012-12-14 Thread Neal Humphrey
NULL #--Use ddd data to code the cells as yes/no for having a standard- # # # this is the part I need help with # # # #-- Neal Humphrey nhumph...@clasponline.org From: Thomas Stewart [mailto:t...@live.unc.edu] Sent: Friday, December 1

Re: [R] Combined Marimekko/heatmap

2012-12-14 Thread Thomas Stewart
Neal- Perhaps the following code is a start for what you want. -tgs par(mar=c(1,1,1,1), oma = c(0,0,0,0), mgp=c(1.5,.2,0), tcl=0, cex.axis=.75, col.axis="black", pch=16) Z <- textConnection(" country A1 A2 A3 A 3 4 5 B 6 9 8 C 6 9 5") ddd <- read.table(Z,header=TRUE) close(Z) Count