Caros amigos, recorro novamente para perguntar-lhes o seguinte: Com a rotina abaixo: data(pistonrings) attach(pistonrings) # 40 sample of 5 obs each qcc.groups(diameter, sample) # some obs are removed, the result is still a 40x5 matrix but with NAs added qcc.groups(diameter[-c(1,2,50,52, 199)], sample[-c(1,2,50,52, 199)]) old <- qcc.options() # save defaults qcc.options("cex.stats") # get a single parameter qcc.options("cex.stats"=1.2) # change parameters qcc.options(bg.margin="azure2") qcc.options("violating.runs" = list(pch = 15, col = "purple")) qcc.options("beyond.limits" = list(pch = 15, col = "orangered")) par(center=1,sd=0.5) qcc(rnorm(100),type = "xbar", center=1,std.dev = 0.5) # see the results qcc.options(old) # restore old default Gero o gráfico de xbarra para os dados do banco pistonrings, já consegui alterar os tamanhos das fontes dos labels de x e de y, não consegui alterar o tamanho da fonte dos limites "LCL" e "UCL", alguém tem alguma sugestão? Muito obrigado. [ ]'s. Edson Lira Estatístico Manaus-Amazonas