como salvar gráfico após o iso do comando identify

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

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@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

Se vc tiver interesse em salvar o código tex desse gráfico pode usar o pacote tikz. Ele vai gerar um arquivo tex que vc pode dar \input no latex. Não testei essa solução, é apenas um caminho. Sent from my iPhone

Mais uma sugestão... ### <code r> windows(480, 480, bg="white") ### cria o gráfico em uma nova janela com as dimensões desejadas para o PNG 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) ### o programa fica aguardando a intervenção do usuário na nova janela dev.copy(png, "plot1.png"); dev.off() ### </code> Éder Comunello <c <comunello.eder@gmail.com>omunello.eder@gmail.com> Dourados, MS - [22 16.5'S, 54 49'W] Em 2 de fevereiro de 2015 10:57, Antonio Silva <aolinto.lst@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
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.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) e forneça código mínimo reproduzível.
participantes (3)
-
Antonio Silva
-
Roney Fraga Souza
-
Éder Comunello