How do I change the colour and format for the trelli plot ?

 http://old.nabble.com/file/p26418382/hist1.png hist1.png  i want three
plots along on the side , how to i do that ?

 and I also want to change the colour of the bars for each plot, how do i
do that ?

i got the code here to draw that ..
columns <- 8:153 
plots <- vector("list", length(columns)) 
j <- 0 
for (i in columns) 
{   
  plots[[ j <- j+1 ]] <- 
    histogram( ~ data[,i], 
      ylab = "Frequency", xlab = "Score", 
      xlim = c(1,5), ylim = c(0,100), 
      main = colnames(data)[i]
    ) 
} 

print(plots[[1]]) 

# or export 

for (i in seq_along(plots)) 
{ 
  png(paste("hist", i, ".png", sep = "")) 
  print(plots[[i]]) 
  dev.off() 
} 

I have solved the first problem by using layout=c(1,3) 

but still cant find the solution for the next problem of getting
differenct colour for the bars in the 3 different histogram plots....


ychu066 wrote:

 http://old.nabble.com/file/p26418382/hist1.png hist1.png  i want three
plots along on the side , how to i do that ?

 and I also want to change the colour of the bars for each plot, how do i
do that ?

i got the code here to draw that ..
columns <- 8:153 
plots <- vector("list", length(columns)) 
j <- 0 
for (i in columns) 
{   
  plots[[ j <- j+1 ]] <- 
    histogram( ~ data[,i], 
      ylab = "Frequency", xlab = "Score", 
      xlim = c(1,5), ylim = c(0,100), 
      main = colnames(data)[i]
    ) 
} 

print(plots[[1]]) 

# or export 

for (i in seq_along(plots)) 
{ 
  png(paste("hist", i, ".png", sep = "")) 
  print(plots[[i]]) 
  dev.off() 
} 

http://old.nabble.com/file/p26418382/hist1.png hist1.png ?i want three plots
along on the side , how to i do that ?

?and I also want to change the colour of the bars for each plot, how do i do
that ?

i got the code here to draw that ..

columns <- 8:153
plots <- vector("list", length(columns))
j <- 0
for (i in columns)
{
?plots[[ j <- j+1 ]] <-
? ?histogram( ~ data[,i],
? ? ?ylab = "Frequency", xlab = "Score",
? ? ?xlim = c(1,5), ylim = c(0,100),
? ? ?main = colnames(data)[i]
? ?)
}

print(plots[[1]])

# or export

for (i in seq_along(plots))
{
?png(paste("hist", i, ".png", sep = ""))
?print(plots[[i]])
?dev.off()
}
--
View this message in context: http://old.nabble.com/How-do-I-change-the-colour-and-format-for-the-trelli-plot---tp26418382p26418382.html
Sent from the R help mailing list archive at Nabble.com.

Add col=i in the histogram call.

what is that ?



Hrishi Mittal wrote:

Add col=i in the histogram call.

what is that ?



Hrishi Mittal wrote:

Add col=i in the histogram call.

Fore example my code is 
histogram(~data[,8]|data[,2], ylab = "Frequency", xlab = "Score", xlim =
c(1,5), ylim = c(0,100),layout = c(3,1),col=data[,2] )

and i want the colour to be depended on the level of the factor in
data[,2].  how do i do that ?





ychu066 wrote:

what is that ?



Hrishi Mittal wrote:

Add col=i in the histogram call.

I want to change the colour of the histogram in each panel by the  
levels of
the conoditonal factor.

I have 3 levels in the factor

levels(data[,2])[1]
levels(data[,2])[2]
levels(data[,2])[3]

what can i do , in order to chnage the colour ??

ychu066 wrote:

Fore example my code is
histogram(~data[,8]|data[,2], ylab = "Frequency", xlab = "Score",  
xlim =
c(1,5), ylim = c(0,100),layout = c(3,1),col=data[,2] )

and i want the colour to be depended on the level of the factor in
data[,2].  how do i do that ?





ychu066 wrote:

what is that ?



Hrishi Mittal wrote:

Add col=i in the histogram call.

-- 
View this message in context: http://old.nabble.com/How-do-I-change-the-colour-and-format-for-the-trelli-plot---tp26418382p26421465.html
Sent from the R help mailing list archive at Nabble.com.

I want to change the colour of the histogram in each panel by the levels
of the conoditonal factor.

I have 3 levels in the factor 

levels(data[,2])[1]     
levels(data[,2])[2]
levels(data[,2])[3]

what can i do , in order to chnage the colour ??



ychu066 wrote:

Fore example my code is 
histogram(~data[,8]|data[,2], ylab = "Frequency", xlab = "Score", xlim =
c(1,5), ylim = c(0,100),layout = c(3,1),col=data[,2] )

and i want the colour to be depended on the level of the factor in
data[,2].  how do i do that ?





ychu066 wrote:

what is that ?



Hrishi Mittal wrote:

Add col=i in the histogram call.

On Thu, Nov 19, 2009 at 6:03 AM, ychu066 <ychu066 at aucklanduni.ac.nz>
wrote:

http://old.nabble.com/file/p26418382/hist1.png hist1.png ?i want three
plots
along on the side , how to i do that ?

?and I also want to change the colour of the bars for each plot, how do i
do
that ?

i got the code here to draw that ..

This code did not produce the plot you have linked to. The answer to
your question depends on how you created the plot, so you have to tell
us that. Changing the color in all panels is easy:

histogram(rnorm(100), col = "goldenrod")

Different colors in different panels is a little more work:

histogram(~rnorm(100) | gl(3, 1, 100),
          mycolors = sample(colors(), 3),
          panel = function(..., col, mycolors) {
              panel.histogram(..., col = mycolors[panel.number()])
          })

-Deepayan

columns <- 8:153
plots <- vector("list", length(columns))
j <- 0
for (i in columns)
{
?plots[[ j <- j+1 ]] <-
? ?histogram( ~ data[,i],
? ? ?ylab = "Frequency", xlab = "Score",
? ? ?xlim = c(1,5), ylim = c(0,100),
? ? ?main = colnames(data)[i]
? ?)
}

print(plots[[1]])

# or export

for (i in seq_along(plots))
{
?png(paste("hist", i, ".png", sep = ""))
?print(plots[[i]])
?dev.off()
}
--
View this message in context:
http://old.nabble.com/How-do-I-change-the-colour-and-format-for-the-trelli-plot---tp26418382p26418382.html
Sent from the R help mailing list archive at Nabble.com.

NICE!!! thanks 

Deepayan Sarkar wrote:

On Thu, Nov 19, 2009 at 6:03 AM, ychu066 <ychu066 at aucklanduni.ac.nz>
wrote:

http://old.nabble.com/file/p26418382/hist1.png hist1.png ?i want three
plots
along on the side , how to i do that ?

?and I also want to change the colour of the bars for each plot, how do
i do
that ?

i got the code here to draw that ..

This code did not produce the plot you have linked to. The answer to
your question depends on how you created the plot, so you have to tell
us that. Changing the color in all panels is easy:

histogram(rnorm(100), col = "goldenrod")

Different colors in different panels is a little more work:

histogram(~rnorm(100) | gl(3, 1, 100),
          mycolors = sample(colors(), 3),
          panel = function(..., col, mycolors) {
              panel.histogram(..., col = mycolors[panel.number()])
          })

-Deepayan

columns <- 8:153
plots <- vector("list", length(columns))
j <- 0
for (i in columns)
{
?plots[[ j <- j+1 ]] <-
? ?histogram( ~ data[,i],
? ? ?ylab = "Frequency", xlab = "Score",
? ? ?xlim = c(1,5), ylim = c(0,100),
? ? ?main = colnames(data)[i]
? ?)
}

print(plots[[1]])

# or export

for (i in seq_along(plots))
{
?png(paste("hist", i, ".png", sep = ""))
?print(plots[[i]])
?dev.off()
}
--
View this message in context:
http://old.nabble.com/How-do-I-change-the-colour-and-format-for-the-trelli-plot---tp26418382p26418382.html
Sent from the R help mailing list archive at Nabble.com.