Você não explorou o suficiente o argumento par. Veja se é isto aí!
op - par(mfrow=c(3,1),
mai = c(2,1,0,0),
oma = c(3,0,0,0),
pin = c(5.5,1.6),
xpd = T)
tempo-c(5,7,9,11,13)
m1A-rnorm(5,90,4)
m2A-rnorm(5,90,4)
m3A-rnorm(5,90,4)
m4A-rnorm(5,90,4)
plot(m1A ~ tempo,
axes = F,
Ivan, obrigado mais uma vez e desculpe a falta de atenção da minha parte.
Maurício
2013/11/19 Ivan Bezerra Allaman ivanala...@yahoo.com.br
Você não explorou o suficiente o argumento par. Veja se é isto aí!
op - par(mfrow=c(3,1),
mai = c(2,1,0,0),
oma = c(3,0,0,0),
pin =
Obrigado mais uma vez Ivan.
Com o par e mtext consegui melhorar um pouco o aspecto do conjunto
formado pelos três gráficos, porém não exatamente como eu queria.
Já com o legend não deu certo. A legenda aparece sempre dentro de cada um
dos gráfico. Eu preciso que ela fique do lado de fora do
Ivan, obrigado pela atenção.
Na sua dica, tentei e não consegui:
1. diminuir a distância entre os gráficos;
Veja ?par
2. acrescentar uma legenda indicando os quatro modelos;
Veja ?legend
3. acrescentar um título (único) para os três gráficos, mantendo os nomes
que separam cada gráfico.
Veja ?mtext
É isso jovem?
x - seq(1,10)
y1 - rnorm(10)
y2 - rnorm(10)
y3 - rnorm(10)
par(mfrow=c(3,1))
plot(y1 ~ x,
axes = F,
xlab = '',
ylab = '',
main = 'A',
type = 'l')
axis(2)
plot(y2 ~ x,
axes = F,
xlab = '',
ylab = '',
main = 'B',
type = 'l')
axis(2)
Ivan, obrigado pela atenção.
Na sua dica, tentei e não consegui:
1. diminuir a distância entre os gráficos;
2. acrescentar uma legenda indicando os quatro modelos;
3. acrescentar um título (único) para os três gráficos, mantendo os nomes
que separam cada gráfico.
Veja o CMR:
par(mfrow=c(3,1))
Manoel, desculpe a demora em dar um retorno. Fiquei envolvido com outras
atividades e me faltou tempo para isso.
Tentei usar o que recomendou mas não deu certo. Eu preciso de uma gráfico
dividido em três partes, com o mesmo eixo x.
Nos comandos que passou, aparecem 12 linhas juntas. Preciso que
Veja se é mais ou menos isso que você quer:
matriz - as.data.frame(matriz)
names(matriz) - paste(series, 1:12)
matriz$tempo - 1:nrow(matriz)
meltenMatriz - melt(matriz, id='tempo' )
meltenMatriz$lbls - meltenMatriz$variable
p - ggplot(meltenMatriz, aes(x = tempo, y = value, group=variable)) +
Caros,
Continuo quebrando a cabeça para tentar produzir o gráfico que preciso.
Consegui chegar próximo mas ainda não é o ideal.
No CRM abaixo, o gráfico é construído porém preciso:
1) acrescentar a legenda para cada uma das linhas (estou denominando cada
uma delas de m1,m2,m3 e m4);
2) substituir
Maurício,
estou sem tempo agora, mas acho que dá pra fazer o que você quer com o
ggplot2.
No meu blog, fiz um gráfico
parecidohttp://prafalardecoisas.wordpress.com/2013/11/03/ugly-bar-plot-graphic-and-a-simple-alternative-rstats/,
coloquei inclusive o sript lá. A única diferença para o seu
Bom dia,
Já testou ts.plot {stats}?
### para o exemplo dado...
z - ts(matrix(rnorm(300), 100, 3), start = c(1961, 1), frequency = 12)
plot(z)
ts.plot(z)
ts.plot(z, lty=c(1:4), col=c(1:4))
### no help tem outro exemplo...
?ts.plot
Éder Comunello c
Éder, obrigado pela atenção.
Não consegui. ts.plot constrói o gráfico com várias séries porém apenas
um.
Minha intenção é produzir três gráficos (como o ts) com o mesmo eixo x e
em cada um deles ter quatro linhas.
Grato,
Maurício
2013/10/31 Éder Comunello comunello.e...@gmail.com
Bom dia,
Saudações a todos,
Observando este exemplo (help da função ts)
z - ts(matrix(rnorm(300), 100, 3), start = c(1961, 1), frequency = 12)
plot(z)
tem-se três gráficos empilhados, com uma série em cada um.
Gostaria de saber se há possibilidade de que, em cada um dos gráficos,
acrescentar outras
13 matches
Mail list logo