1
Does anyone know what the command is to let the bars of the graph generated by the code below get wider?
library(lattice)
rend <- read.table("http://www.leg.ufpr.br/~walmes/cursoR/rendimento.txt",
header=TRUE, sep="\t")
rend <- transform(rend, K=factor(K), A=factor(A), bloc=factor(bloc))
(rend$Trat = with(rend, interaction(K, A)))
(médias.Trat = with(rend, tapply(rg, Trat, mean)))
barchart(rg~K|A, groups=médias.Trat, data=rend)
Rui, I think AP passed the data. They are being downloaded from the link http://www.leg.ufpr.br/~walmes/cursor/performance.txt . But I believe that the problem has no solution, not at least as the AP wishes. When I do
length(médias.Trat)
, get 15. This implies that there are 15 groups being plotted. That is, although only 5 bars appear on each panel, there are 15 bars in total, which implies that the widths of the bars must be such that they fit 15 of them on each panel. In my view, it is impossible to solve this problem without decreasing the size ofmédias.Trat
.– Marcus Nunes