[R-br] como salvar gráfico após o iso do comando identify

[Antonio Silva]

Caros,

Obtive na lista internacional duas sugestões para resolver o problema e as
deixo aqui para registro:

x<-c(1,2,3,4,5,6)
y<-c(20,30,15,7,25,40)
plot(x,y,type="b",ylim=c(0,45))
identify(x,y,labels=y)
dev2bitmap('test.png',width=20,height=20,units="cm",res=300)

x<-c(1,2,3,4,5,6)
y<-c(20,30,15,7,25,40)
plot(x,y,type="b",ylim=c(0,45))
marks <- identify(x,y,labels=y,pos=TRUE)
png(filename="test.png",width=20,height=20,units="cm",res=300)
plot(x,y,type="b",ylim=c(0,45))
xym <- cbind(x=x[marks$ind], y=y[marks$ind])
points(xym)
text(xym, labels=xym[,"y"], pos=marks$pos)
dev.off()

Sds

Antônio Olinto




Em 2 de fevereiro de 2015 11:57, Antonio Silva <aolinto.lst em gmail.com>
escreveu:

> Olá a todos
>
> Quero salvar um gráfico após o uso do comando identify mas não consegui.
>
> Utilizo o comando identify para adicionar etiquetas aos pontos de forma
> manual, para que os números não fiquem embolados ou sobre as linhas.
>
> Exemplo
>
> x<-c(1,2,3,4,5,6)
> y<-c(20,30,15,7,25,40)
> plot(x,y,type="b",ylim=c(0,45))
> identify(x,y,labels=y)
>
> No entanto, quando escrevo
>
> png(filename="teste.png",width=20,height=20,units="cm",res=300)
> x<-c(1,2,3,4,5,6)
> y<-c(20,30,15,7,25,40)
> plot(x,y,type="b",ylim=c(0,45))
> identify(x,y,labels=y)
> dev.off()
>
> o gráfico é gravado sem aparecer na tela e consequentemente sem a
> identificação dos pontos.
>
> Utilizo o R integrado ao gedit no UBUNTU Trusty Tahr 64 bits. Gostaria de
> fazer o procedimento pela linha de comando, sem a utilização de GUIs. Há
> alguma forma de gravar o gráfico com os pontos identificados?
>
> Obrigado!
>
> Antônio Olinto
>



-- 
Antônio Olinto Ávila da Silva
Biólogo / Oceanógrafo
Instituto de Pesca (Fisheries Institute)
São Paulo, Brasil
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20150202/0b49745a/attachment.html>