On 03/03/2014 09:19 PM, Andre Oliveira wrote:
Pessoal, estou aqui tentando, mas sem sucesso colocar a estatística Ztab, Zcal, mas sem sucesso.
media <- 170 stder <- 8 x <- seq(media-3*stder, media+3*stder, 0.01) y <- dnorm(x, media, stder) plot(x, y, type='l',axes=F,xlab="",ylab="") abline(h=0) hx <- seq(media+2*stder, media+3*stder, 0.01) hy <- dnorm(hx, media, stder) n <- length(hy) polygon(c(hx, rev(hx)), c(hy, rep(0, n)), col=2)
# Tentei
text(locator(n=1),"Zcal=3.53") text(locator(n=1),"Ztab=1,64")
Mas, preciso aumentar a área abaixo do gráfico para plotar estes valores e não consegui! Alguém tem alguma sugestão? Outra situação é que Z_{cal} para ficar mais elegante não funcionou com locator.
Andre Porque voce nao coloca o texto por coordenadas e diminui a fonte ao mesmo tempo, por exemplo: text(x=189,y=.001,labels='Zcal=3,53',cex=.7) text(x=190,y=.002,labels='Ztab=1,64',cex=.7) []s Tura