Script Gráfico Aula ANOVA
3 participantes
Página 1 de 1
Script Gráfico Aula ANOVA
Oi prof. Marcos,
Eu adorei o gráfico que você mostrou nos slides da aula de anova.
Tentei fazer algo parecido com vários comandos que você já ensinou.
Até funcionou.... mas ficou muito feio!
Teria como:
- Deixar os conjuntos de dados mais próximos um dos outros? (eu acho que eles estão afastados porque no gráfico original o eixo x está dividido a cada 0,5 e eu não consegui mudar isso...)
- Tentei começar o y no 1, mas não funcionou pq acho que ele está pulando de 2 em 2 e eu tb não consegui mudar isso.
- Por fim, eu queria que as bordas do gráfico ficassem no formato de L, mas também não funcionou
- E se não for pedir muito... eu queria aprender a deixar cada conjunto de dados com uma cor diferente
#Script:
Peso <- c(1,2,3,4,3,4,5,6,8,9,10,11)
Dieta <- c("A","A","A","A","B","B","B","B","C","C","C","C")
dados<- data.frame(Dieta, Peso)
dados
# 1) Criando gráfico sem eixos
plot.default(dados$Dieta, dados$Peso, bty="l", las=1, ylab="Pesos (g)", xlab="Dieta", pch=16, ylim=range(c(1:12)), axes=FALSE)
# 2) Colocando o eixo Y
axis(2)
# 3) Colocando o eixo X
axis(1, 1:3, c("A", "B", "C"))
# 4) Fechando a caixa
box(bty="l")
Eu adorei o gráfico que você mostrou nos slides da aula de anova.
Tentei fazer algo parecido com vários comandos que você já ensinou.
Até funcionou.... mas ficou muito feio!
Teria como:
- Deixar os conjuntos de dados mais próximos um dos outros? (eu acho que eles estão afastados porque no gráfico original o eixo x está dividido a cada 0,5 e eu não consegui mudar isso...)
- Tentei começar o y no 1, mas não funcionou pq acho que ele está pulando de 2 em 2 e eu tb não consegui mudar isso.
- Por fim, eu queria que as bordas do gráfico ficassem no formato de L, mas também não funcionou
- E se não for pedir muito... eu queria aprender a deixar cada conjunto de dados com uma cor diferente
#Script:
Peso <- c(1,2,3,4,3,4,5,6,8,9,10,11)
Dieta <- c("A","A","A","A","B","B","B","B","C","C","C","C")
dados<- data.frame(Dieta, Peso)
dados
# 1) Criando gráfico sem eixos
plot.default(dados$Dieta, dados$Peso, bty="l", las=1, ylab="Pesos (g)", xlab="Dieta", pch=16, ylim=range(c(1:12)), axes=FALSE)
# 2) Colocando o eixo Y
axis(2)
# 3) Colocando o eixo X
axis(1, 1:3, c("A", "B", "C"))
# 4) Fechando a caixa
box(bty="l")
vanessavk- Mensagens : 27
Data de inscrição : 20/05/2019
Re: Script Gráfico Aula ANOVA
Ah!
As cores eu já consegui olhando o script do post de gráfico do Carlos Augusto
cores <-c("blue", "green", "orange")
plot.default(dados$Dieta, dados$Peso, bty="l", las=1, ylab="Pesos (g)", xlab="Dieta", pch=16, ylim=range(c(1:12)), col=cores[dados$Dieta], axes=FALSE)
As cores eu já consegui olhando o script do post de gráfico do Carlos Augusto
cores <-c("blue", "green", "orange")
plot.default(dados$Dieta, dados$Peso, bty="l", las=1, ylab="Pesos (g)", xlab="Dieta", pch=16, ylim=range(c(1:12)), col=cores[dados$Dieta], axes=FALSE)
vanessavk- Mensagens : 27
Data de inscrição : 20/05/2019
Re: Script Gráfico Aula ANOVA
Oi, Vanessa!
A parte do eixo y, de começar no 1 e "andar" de 1 em 1, é fácil, basta usar o argumento yaxp, veja aqui como fica o seu exemplo com ele:
A parte do eixo y, de começar no 1 e "andar" de 1 em 1, é fácil, basta usar o argumento yaxp, veja aqui como fica o seu exemplo com ele:
- Código:
#Script:
Peso <- c(1,2,3,4,3,4,5,6,8,9,10,11)
Dieta <- c("A","A","A","A","B","B","B","B","C","C","C","C")
dados<- data.frame(Dieta, Peso)
dados
# 1) Criando gráfico sem eixos
plot.default(dados$Dieta, dados$Peso, bty="l", las=1, ylab="Pesos (g)", xlab="Dieta", pch=16, ylim=range(c(1:12)), axes=FALSE)
# 2) Colocando o eixo Y
axis(2, yaxp=c(1, 12, 11))
# 3) Colocando o eixo X
axis(1, 1:3, c("A", "B", "C"))
# 4) Fechando a caixa
box(bty="l")
Re: Script Gráfico Aula ANOVA
Agora, em relação ao x, você quer diminuir os espaços entre A, B e C, é isso? Vou tentar descobrir como, mas temos que ter em mente que como temos três classes, o R ajusta o tamanho do gráfico da melhor forma possível, e em pare isto é consequência deste ajuste.
Agora, pode ser que se colocarmos o A um pouco mais distante do começo e C um pouco mais distante do fim possa funcionar, vou tentar e posto aqui se der certo!
Agora, pode ser que se colocarmos o A um pouco mais distante do começo e C um pouco mais distante do fim possa funcionar, vou tentar e posto aqui se der certo!
Re: Script Gráfico Aula ANOVA
Acho que resolvi! Veja se é isto que você quer:
- Código:
#Script:
Peso <- c(1,2,3,4,3,4,5,6,8,9,10,11)
Dieta<-c(rep(1.2, 4), rep(1.5, 4), rep(1.8, 4))
Dieta<-as.factor(Dieta)
dados<- data.frame(Dieta, Peso)
dados
# 1) Criando gráfico sem eixos
cores <-c("blue", "green", "orange")
plot.default(dados$Dieta, dados$Peso, bty="l", las=1, ylab="Pesos (g)", xlab="Dieta", pch=16, ylim=range(c(1:12)), col=cores[dados$Dieta], axes=FALSE, xlim=c(0,4))
# 2) Colocando o eixo Y
axis(2, yaxp=c(1, 12, 11))
# 3) Colocando o eixo X
axis(1, 1:3, c("A", "B", "C"))
# 4) Fechando a caixa
box(bty="l")
Re: Script Gráfico Aula ANOVA
Perfeito!
Obrigada!
Obrigada!
vanessavk- Mensagens : 27
Data de inscrição : 20/05/2019
Re: Script Gráfico Aula ANOVA
boa tarde,
entrei no fórum, acessando um site de busca na rede, pois estou iniciando os estudos em R.
preciso de ajuda para rodar um dic em fatorial duplo.
alguma sugestão de script?
entrei no fórum, acessando um site de busca na rede, pois estou iniciando os estudos em R.
preciso de ajuda para rodar um dic em fatorial duplo.
alguma sugestão de script?
Fabricio- Mensagens : 1
Data de inscrição : 06/12/2019
Tópicos semelhantes
» Não acho o script da aula 5.15
» Script da aula sobre sistema de ajuda
» DÚVIDAS da AULA 8.10 ANOVA de medidas repetidas x Modelos Mistos
» Algo estranho com o comando da CA & CAA. Sera q alguem do curso ja passou por isso?Script da aula 5.24
» ANOVA fatorial de medidas repetidas
» Script da aula sobre sistema de ajuda
» DÚVIDAS da AULA 8.10 ANOVA de medidas repetidas x Modelos Mistos
» Algo estranho com o comando da CA & CAA. Sera q alguem do curso ja passou por isso?Script da aula 5.24
» ANOVA fatorial de medidas repetidas
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
|
|