Bioestatística

# Seja o gráfico de dispersão:

​

IMC <- Peso/(Altura^2)

plot(Idade,IMC,bty="l",pch=19)

​

# Modifique os valores em mar=c() e veja o resultado.

​

par(mar=c(5.1, 4.1, 4.1, 2.1))

​

 

Configurando a posição dos labels

​

par("mgp")

​

[1] 3 1 0

​

# O primeiro valor diz respeito à localização dos labels (xlab e ylab)

​

# O segundo valor diz respeito à posição dos valores nos eixos

​

# O terceiro valor diz respeito à posição das escalas nos eixos

​

par(mar=c(5.1, 4.1, 4.1, 2.1),mgp=c(3,1,0))   #  Default

​

 

Configurando a orientação dos valores nos eixos

par("las")

​

[1] 0

 

par(mar=c(5.1, 4.1, 4.1, 2.1),mgp=c(3,1,0),las=0)   #  Default

​

# las = 0: os valores aparecerão paralelos aos eixos (default)

​

# las = 1: horizontal

​

# las = 2: perpendicular

​

# las = 3: vertical

​

 

Legendas com caracteres subscritos ou sobrescritos

​

par(mar=c(5.1, 4.1, 4.1, 2.1),mgp=c(3,1,0),las=0) # Default

​

plot(Idade,IMC,bty="l",pch=19)

​

plot(Idade,IMC,bty="l",pch=19,ylab=expression(paste("IMC (kg/m"^2,")")))

​

par(mar=c(5.1, 5.1, 4.1, 2.1),mgp=c(3,1,0),las=0)

 

plot(Idade,IMC,bty="l",pch=19, ylab=expression(paste("IMC (kg/m"^2,")")),xlab="Idade (anos)")

 

# Subscrito

 

plot(Idade,IMC,bty="l",pch=19, ylab=expression(paste("IMC (kg/m"[2],")")),xlab="Idade (anos)")

​

​

Legendas com caracteres em itálico ou negrito

 

# Itálico

​

plot(Idade,IMC,bty="l",pch=19,ylab=expression(paste("IMC (kg/m"^2,")")),

  xlab=expression(italic("Idade (anos)")))

 

# Negrito

​

plot(Idade,IMC,bty="l",pch=19,ylab=expression(paste("IMC (kg/m"^2,")")),

  xlab=expression(bold("Idade (anos)")))

 

# Modificando o tamanho das legendas

​

plot(Idade,IMC,bty="l",pch=19,ylab=expression(paste("IMC (kg/m"^2,")")),

  xlab=expression(bold("Idade (anos)")), cex.lab=1.75)

 

​

Inserindo uma equação na área de plotagem

 

plot(Idade,IMC,bty="l",pch=19,ylab=expression(paste("IMC (kg/m"^2,")")),xlab="Idade (anos)")

 

text(58,45, expression(IMC==over(kg,m^2)))

​

​

Legendas com a função mtext()

 

plot(Idade,IMC,bty="l",pch=19,ylab=expression(paste("IMC (kg/m"^2,")")),xlab="")

​

mtext(side=1,line=3,"Idade (anos)")

 

# Negrito ou itálico (1=plain, 2=bold, 3=italic, 4=bold-italic)

 

plot(Idade,IMC,bty="l",pch=19,ylab=expression(paste("IMC (kg/m"^2,")")),xlab="")

​

mtext(side=1,line=3,"Idade (anos)",font=2)

​

​

Outros parâmetros gráficos

​

plot(Idade,IMC)       # Gera o gráfico com os parâmetros "padrões" do R

 

par(bty="l",pch=19)   # Modifica os padrões

​

# Em seguida, todos os gráficos gerados considerarão estes padrões

​

plot(Idade,IMC)

​

# Modificando a cor do fundo

​

par(bty="l",pch=19,bg="yellow")

​

plot(Idade,IMC)