[R-br] Inserir espaço após título de um eixo no gráfico

Fernando Souza nandodesouza em gmail.com
Quarta Janeiro 24 19:43:29 -02 2018


Yury,

segue solução,

Basicamente consite em aumentar espaços na margem com a função par() e
então modificar o rótulo do eixo com a função title(), você alter a
distancia modificando o argumento "line", e o tamanho da fonte em "cex.lab"

Att

a.box = matrix(sample(1:500, 100, replace = T), ncol = 10, nrow = 10)

par(mar=c(5,7,4,2)+0.1,cex=.8)

b1 = boxplot(a.box,remove.outlier=NA, las = 1, xlab =
'Semeadura',main="BoxPlot",
             ylim = c(0,16000),cex=0.5, pch=16)
title(ylab =
"expression(Produtividade~atingível~(kg~ha^-1)",main="BoxPlot", cex.lab =
1.5,
      line = 5)

Em 24 de janeiro de 2018 11:54, Yury Duarte via R-br <
r-br em listas.c3sl.ufpr.br> escreveu:

> Olá, Fernando!
>
> Segue uma forma genérica do código enviado:
>
> *- Versão onde foi inserido espaço entre o titulo do eixo y e o próprio
> eixo (Problemas no sobrescrito)*
> setwd('C:\\Users\\Yury\\Desktop\\')
> a.box = matrix(sample(1:500, 100, replace = T), ncol = 10, nrow = 10)
> png(paste0('a', '.png'), width = 1600, height = 900, res = 196)
> par(mar=c(5,6,0.25,2))
> par(cex=.8)
> b1 = boxplot(a.box,remove.outlier=NA, las = 1, xlab = 'Semeadura',
>              ylab = expression('Produtividade atingível (kg ha^-1)\n'),
>              ylim = c(0,16000),cex=0.5, pch=16)
> grid.text(paste0('BoxPlot'),x=.5, y=.9)
> dev.off()
>
> *- Versão sem espaço entre o titulo do eixo y e o próprio eixo (Problemas
> no espaçamento entro o titulo e o eixo y)*
> setwd('C:\\Users\\Yury\\Desktop\\')
> a.box = matrix(sample(1:500, 100, replace = T), ncol = 10, nrow = 10)
> png(paste0('a', '.png'), width = 1600, height = 900, res = 196)
> par(mar=c(5,6,0.25,2))
> par(cex=.8)
> b1 = boxplot(a.box,remove.outlier=NA, las = 1, xlab = 'Semeadura',
>              ylab = expression(Produtividade~atingível~(kg~ha^-1)),
>              ylim = c(0,16000),cex=0.5, pch=16)
> grid.text(paste0('BoxPlot'),x=.5, y=.9)
> dev.off()
>
>
> Yury Duarte
> Engenheiro Agrônomo - ESALQ/USP
>
> Em 24 de janeiro de 2018 10:43, Yury Duarte <yurynepomuceno em gmail.com>
> escreveu:
>
>> Bom dia colegas listeiros!
>>
>> Estou encontrando um pequeno problema e gostaria de uma ajuda.
>> Ao executar o comando para gerar gráficos de boxplot, o titulo do eixo y
>> fica muito colado aos valores desse eixo.
>>
>> png(paste0(cidade[city], '.png'), width = 1600, height = 900, res = 196)
>>     par(mar=c(5,6,0.25,2))
>>     par(cex=.8)
>>     b1 = boxplot(a.box,remove.outlier=NA, las = 1, xlab = 'Semeadura',
>>                  ylab = expression(Produtividade~atingível~(kg~ha^-1)),
>>                  ylim = c(0,16000),cex=0.5, pch=16)
>>     grid.text(paste0(titulos[city]),x=.5, y=.9)
>>     dev.off()
>>
>> Dessa forma, pensei em inserir uma linha em branco entre o título do eixo
>> e o eixo y usando o comando \n
>>
>> png(paste0(cidade[city], '.png'), width = 1600, height = 900, res = 196)
>>     par(mar=c(5,6,0.25,2))
>>     par(cex=.8)
>>     b1 = boxplot(a.box,remove.outlier=NA, las = 1, xlab = 'Semeadura',
>>                  ylab = expression('Produtividade atingível (kg
>> ha^-1)\n'),
>>                  ylim = c(0,16000),cex=0.5, pch=16)
>>     grid.text(paste0(titulos[city]),x=.5, y=.9)
>>     dev.off()
>>
>> Usar esse comando inseriu a linha em branco mas assim fico com problemas
>> em ajustar a parte sobrescrita da legenda.
>>
>> Dessa forma, gostaria de uma ajuda para executar um comando que me desse
>> esse espaço entre a legenda e o eixo y sem prejudicar o sobrescrito da
>> legenda.
>>
>> Desde já, agradeço pela colaboração de todos!
>>
>> Yury Duarte
>> Engenheiro Agrônomo - ESALQ/USP
>>
>
>
> _______________________________________________
> R-br mailing list
> R-br em 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.
>



-- 
=========================================
Fernando Souza
Zootecnista, DSc. Produção e Alimentação Animal
Celular: (31)99796-8781 (Vivo)
E-mail:nandodesouza em gmail.com <e-mail%3Anandodesouza em gmail.com>
Lattes: http://lattes.cnpq.br/6519538815038307
Blog: https://producaoanimalcomr.wordpress.com/
==========================================
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20180124/de5874be/attachment.html>


Mais detalhes sobre a lista de discussão R-br