[R-br] Inserir casas decimais no eixo (y) e no gráfico

[Marcio B]

Pessoal o objetivo é a formatação dos valores que aparecem no eixo (y) e
nos valores acima das barras do gráfico de barras.

Objetivo dos valores aparecer em 2 formatos como segue:
-> formatação 1 (br): 1.998,87
-> formatação 2 (en): 1,998.87

Segue o código:

soma <- matrix(c(1998.869,2650.337), nrow = 1,ncol = 2)

# formatação 1 (br)
barplot(soma, main = "Lucratividade (br)", ylim= c(0, (max(soma[1,1],
soma[1,2])) + 1000), xlab = "", ylab = "Lucratividade, R$", names.arg =
c("Método T","Método BT"), col=c("red","darkgreen"), beside=TRUE, axes =
FALSE)
text(1.5,soma[1,1]+500, round(soma[1,1],2)) # T
text(3.5,soma[1,2]+500 , round(soma[1,2],2))  # BT
axis(side = 2, at = axTicks(2), labels=formatC(axTicks(2), format="d",
big.mark='.', digits = 2))

# formatação 2 (en)
barplot(soma, main = "Lucratividade (en)", ylim= c(0, (max(soma[1,1],
soma[1,2])) + 1000), xlab = "", ylab = "Lucratividade, R$", names.arg =
c("Método T","Método BT"), col=c("red","darkgreen"), beside=TRUE, axes =
FALSE)
text(1.5,soma[1,1]+500, round(soma[1,1],2)) # T
text(3.5,soma[1,2]+500 , round(soma[1,2],2))  # BT
axis(side = 2, at = axTicks(2), labels=formatC(axTicks(2), format="d",
big.mark=',', digits = 2))

Obrigado desde já

-- 
Marcio B.

Cel.: (55 19) 996.483.949 tim  | 997.980.104 vivo
skype: maborbaa
http://www.linkedin.com/in/marciobar
https://www.facebook.com/marciobar

Empresa
http://www.techagr.com/

==== PAZ E BEM ====
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20170525/64e6f63d/attachment.html>