I did not have much success with ggplot2 and reshape libraries, so finally I
managed to work out the graph in a rather complicated way. The only thing I
cannot figure out is, how do I place the legend outside the barplot column
area?
attach(tolerancija.data)
ateist = table(G09_01)
dvasin = table(G09_02)
gamtos = table(G09_03)
kr_klm = table(G09_04)
musulm = table(G09_05)
na_kri = table(G09_06)
pagoni = table(G09_07)
satani = table(G09_08)
rytų_k = table(G09_08)
satani = table(G09_09)
tradic = table(G09_10)
eilutes=cbind(ateist,dvasin,gamtos,krikšč,musulm,kr_klm,na_kri,pagoni,rytų_k,satani,tradic)
barplot(prop.table(eilutes,2),col=c("red3","red2","cyan","green2","green3"),legend.text=c("visiškai
sutinku","nesutinku","abejoju","sutinku","visiškai sutinku"),main="My title")
dettach(tolerancija.data)
However, this is a lot of writing. How do I make into a function to be
reusable?
Donatas
On Jul 16, 2007, at 9:06 , Donatas G. wrote:
> Hi,
>
> I cannot figure out how to draw a certain plot: could someone help
> me out?
>
> I have this data.frame from a survey
> my.data
>
> that looks like something like this:
>
> col1 col2 col3 col4
> 1 5 5 4 5
> 2 3 5 3 1
> 3 2 3 4 5
> 4 3 1 1 2
> 5 5 5 4 5
> 6 4 2 5 5
> ....
>
>
> Each row represents a single questionnaire with someone giving his
> agreement/disagreement with a statement (each column is a
> statement) that is
> coded from 1 to 5.
>
> I need to draw a barplot giving a visual representation showing
> differences
> between the five columns: Each bar should represent a single
> column, and
> should be divided into 5 sections, the thickness of each depending
> on the
> number of respondents who choose that particular answer.
>
> How do I do that? All I have managed to do so far is to produce a
> barplot of a
> single column, and that - only with bars side by side...
--
Donatas Glodenis
http://dg.lapas.info
______________________________________________
R-help@stat.math.ethz.ch 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.
