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