[R] generating a bar chart with two axis for co-linear variable

[arun]

HI,
Not sure if this is what you wanted.

pdf("BarplotsNew.pdf")
library(plotrix)
lst2<-lapply(seq_len(ncol(dat1)),function(i){
                    Ctdat<- table(dat1[,i])
                    Ctdat1<-(Ctdat/sum(Ctdat))*100
                    dat2<-data.frame(Ctdat,Ctdat1,stringsAsFactors=FALSE)[,-3]
                    colnames(dat2)[3]<-"Rel.Freq"
                    dat2[,1]<- as.numeric(as.character(dat2[,1]))
                    with(dat2,twoord.plot(Var1,Rel.Freq,Freq,
                        lylim=c(0,100),rylim=c(0,1000),
                        ylab="Relative Frequency",
                        rylab="Frequency",main=paste("Bar plot:",colnames(dat1)[i],sep=" "),
                        type=c("bar","l"),lcol=2,rcol=4,xtickpos=Var1,xticklab=Var1))
                        })
 dev.off()

A.K.



----- Original Message -----
From: arun <smartpink111 at yahoo.com>
To: Sudha Krishnan <Sudha.Krishnan at marlabs.com>
Cc: R help <r-help at r-project.org>
Sent: Thursday, June 6, 2013 2:44 PM
Subject: Re: [R]  generating a bar chart with two axis for co-linear variable

HI,

May be this helps:
dat1<- read.table("sampledata.txt",header=TRUE,sep=",",stringsAsFactors=FALSE)
pdf("Barplots.pdf")
 lst1<-lapply(seq_len(ncol(dat1)),function(i) {Ctdat<- table(dat1[,i]);Ctdat1<-(Ctdat/sum(Ctdat))*100;barplot(Ctdat1,ylim=c(0,100),xlab=colnames(dat1)[i],ylab="Relative Frequency",main=paste("Barplot:",colnames(dat1)[i],sep=" "))})
dev.off()
A.K.




----- Original Message -----
From: Sudha Krishnan <Sudha.Krishnan at marlabs.com>
To: "r-help at r-project.org" <r-help at r-project.org>
Cc: 
Sent: Thursday, June 6, 2013 2:37 AM
Subject: [R]  generating a bar chart with two axis for co-linear variable



Hello Dimitris,



I was goggling for some help on Sensitivity vs 1-specificity and saw your link.



I hope you can be of help to me in one of the issue that I am facing in generating combo chart(bar chart and plot). I am a novice and have some difficulty in getting this logic correct.





I am give a dataset (I am attaching a sample dataset).



I am using a barplot() and passing values for percentage frequency and the corresponding variables. I am struck here, what my function does is only calculate the frequency for the listed variables and not the frequency percentage. Is there a method or a script with which I can pass the frequency percent and the related values as category columns for x axis?



I will attach the graphs that I have generated so that you can suggest the better way.



Sampledata - Sampledata.txt

What my function does to calculate the frequency with category names in X axis - 1.png

My requirement is to generate percentage frequency of the variable in y1 and not the frequency itself. 2.png (where x categories are missing)





Thanks,

Sudha Krishnan



______________________________________________
R-help at r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: BarplotsNew.pdf
Type: application/pdf
Size: 29361 bytes
Desc: not available
URL: <https://stat.ethz.ch/pipermail/r-help/attachments/20130606/4a9a0aae/attachment.pdf>