[R-br] windows.options() - Linux

[Paulo Justiniano]

Mauro

Quando voce vai rodar comandos de outros posts deve olhar o contexto da 
mensagem, as ferramentas  sendo usadas.

quando uma mensagem deste tipo acontece é porque voce precisa 
instalar/carregar algum pacote

O R possui diversos mecanismos de procura (no comando ou na página)
que voce pode usar para achar as funçÕes

Se tivesse procurado iria encontrar que está é uma função do pacote
RColorBrewer

require(RColorBrewer)
?brewer.pal



On Fri, 27 Apr 2012, Mauro Sznelwar wrote:

> Tentei rodar o script mas dá mensagem que não existe a função brewer.pal
>       Boa tarde pessoal,
> Estou com a seguinte dúvida: 
> qual o comando que é similar ao windows.options() no Linux, pois este não existe para o Linux.
> 
> O objetivo final é criar uma função que me gera a figura da legenda, porém esta função tem rodar
> tanto no Windows quanto no Linux. Pois gostaria que a figura da legenda se ajuste para os mais
> variados números de faixas.
> 
> Abaixo segue um exemplo. (Acredito que função não a mais eficiente, qualquer sugestão é bem-vinda)
> 
> Obrigado.
> 
> brks <- c(0,5,10,15,20)
> r <- 3
> cols <- brewer.pal(4,"Blues")
> gera_figura_legenda=function(brks, cols,r) 
> 
> gera_figura_legenda=function(brks, cols,r) {
> brks = round(brks,r)
> dest.fig = tempfile(pattern="legenda",fileext=".png",tmpdir=getwd())
> windows.options(width=2.5, height=1.7, pointsize=12, reset = TRUE)
> CairoPNG(filename = dest.fig, width = 290, height = 290, bg="#FFFFFF00", pointsize = 10)
> par(bg="transparent", mar=c(0, 0, 0, 0))
> brks = round(brks,r)
> plot(1,1,col="white",axes=F,col.axis="white",xlab="",ylab="")
> aux1 = 2:(length(brks)-1)
> aux2 = expand.grid(aux1,aux1)
> d    = aux2[,1]-aux2[,2]
> aux3 = aux2[d==-1,]
> legend(
> "center",
> title = "Legenda",
> c(paste("<",brks[2]), paste(brks[aux3[,1]],brks[aux3[,2]],sep="-"), paste(">",brks[(length(brks)-1)])),
> fill=c(cols),
> cex=1.3,
> bg="#FFFFFF")
> dev.off()
> return (dest.fig)
> }
> 
> --
> Luís Gustavo Silva e Silva
> 
> .
> 
> 
>