tente trocar dados por dados[, -1] (para tirar a 1a coluna, que é texto)
2013/6/3 <[email protected]> > Boa tarde, > porque será que o gráfico não é desenhado? > pode ser por as medianas serem iguais? > código: > setwd("G:/SIN/Users/Ana Rua/dados não Panakeia e Panakeia") > dados<-read.table("**Dadoshgbnaophgbp2sem2011.csv",**header=TRUE,sep=";", > stringsAsFactors=TRUE, dec=",") > dados > > > #objectivo é: > #verificar se há diferenças estatisticamente significativas entre os > custos e os valores de hemoglobina para clinicas não panakeia no 2semestre > de 2011. > # Imprime as hipoteses do teste > > cat("\n\t Teste Wilcoxon\n") > cat("Teste bicaudal:\n\tH0: há diferenças significativas entre os valores > de hemoglobina para clínicas não Panakeia e Panakeia, mediana=0", > > "\n\tH1: Não há diferenças significativas entre os valores de hemoglobina > para clínicas não Panakeia e Panakeia, mediana diferente de 0 \n") > > wilcox.test(dados$**hgbnaopanakeia, dados$hgbpanakeia, paired=TRUE) > > > boxplot(dados, axes=FALSE) # O parametro axes=FALSE faz com que os eixos > não sejam desenhados > title(col.main='blue',main= 'Valores de hemoglobina das clínicas não > Panakeia e Panakeia no 2semestre de 2011') # Acrescenta o título do gráfico > title(col.lab='blue',xlab= 'meses do 2semestre do ano 2011') # Acrescenta > o titulo do eixo X > title(col.lab="blue", ylab= 'Valores') # Acrescenta o titulo do eixo Y > box() # Desenha a caixa em torno do gr?fico > axis(2) # Coloca o eixo Y (o 2 ali representa o eixo Y) no gráfico > axis(1, 1:6, c('Jul', 'Ago', 'Set', 'Out', 'Nov', 'Dez')) # Coloca no eixo > X (representado pelo 1), nos pontos 1 a 6, as etiquetas Jul a Dez. > > dados: > X2sem2011 hgbnaopanakeia hgbpanakeia > 1 JUL 75.9 75.4 > 2 AGO 77.5 77.1 > 3 SET 79.4 77.0 > 4 OUT 76.8 77.2 > 5 NOV 76.1 78.0 > 6 DEZ 78.3 76.7 > Ana > > > ______________________________**_________________ > R-br mailing list > [email protected] > https://listas.inf.ufpr.br/**cgi-bin/mailman/listinfo/r-br<https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br> > Leia o guia de postagem > (http://www.leg.ufpr.br/r-br-**guia<http://www.leg.ufpr.br/r-br-guia>) > e forneça código mínimo reproduzível. >
_______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
