From: Jim Lemon <jim_at_bitwrit.com.au>

Date: Sun, 16 Dec 2007 20:50:39 +1100

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. Received on Sun 16 Dec 2007 - 09:51:21 GMT

Date: Sun, 16 Dec 2007 20:50:39 +1100

Bob Green wrote:

> Hello,

*>
**> Below is the code for a basic bar graph. I was seeking advice
**> regarding the following:
**>
**> (a) For each time period there are values from 16 people. How I can
**> change the colour value so that each person has a different colour,
**> which recurs across each of the three graphs/tie epriods?
**>
**> (b) I have seen much more sophisticated examples using lattice (e.g
**> each person has a separate panel/plot). I am open to alternative code
**> as to how I could present this data.
**>
**> Time1 <- c(9.0,6.0,1.0,5.0,7.0,9.0,5.0,7.5,6.0,8.0,5.0,5.0,9.0,4.0,5.0,5.0)
**> Time2 <- c (10,5,3,3,3,6,7,8,5,8,7,7,9,8,5,3)
**> Time3 <- c (10,0,3,0,0,6,0,0,0,0,0,0,0,0,0,0)
**> df <- rbind (Time1, Time2, Time3)
**> dft <- (t(df))
**> dft
**> barplot(dft, beside = TRUE, main= "Risk score by assessment", xlab =
**> " Score", ylab = "frequency", col="blue")
**>
*

Hi Bob,

library(plotrix)

barplot(dft, beside = TRUE, main= "Risk score by assessment", xlab =
" Score", ylab = "frequency",

col=color.scale(1:16,c(1,0.5,0),c(0,1,0),c(0,0.5,1)))
legend(44,9,1:16,

fill=color.scale(1:16,c(1,0.5,0),c(0,1,0),c(0,0.5,1)))

Jim

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. Received on Sun 16 Dec 2007 - 09:51:21 GMT

Archive maintained by Robert King, hosted by
the discipline of
statistics at the
University of Newcastle,
Australia.

Archive generated by hypermail 2.2.0, at Sun 16 Dec 2007 - 13:30:18 GMT.

*
Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help.
Please read the posting
guide before posting to the list.
*