Como criar um gráfico de barras em r
Um strip chart é um tipo de gráfico que exibe dados numéricos ao longo de uma única banda. Semelhante aos box plots , os gráficos de barras podem ajudá-lo a visualizar a distribuição dos dados. Os gráficos de barras podem ser uma boa alternativa aos gráficos de caixa quando os tamanhos de amostra são pequenos, para que você possa ver pontos de dados individuais.
Este tutorial explica como criar um gráfico de faixa em R usando a função stripchart() integrada.
A função stripchart()
A sintaxe básica para criar um gráfico de barras em R é:
stripchart (x, método, jitter, principal, xlab, ylab, col, pch, vertical, group.names)
- x : um vetor numérico ou uma lista de vetores numéricos a serem plotados. Este é o único argumento necessário para produzir um enredo.
- método : o método a ser usado para separar pontos que possuem valores idênticos. O método padrão “overplot” faz com que esses pontos sejam plotados em excesso, mas é possível especificar “jitter” para agitar os pontos ou “stack” para empilhar os pontos.
- jitter : Quando o método = “jitter” é usado, fornece a quantidade de jitter a ser aplicada.
- principal: título do gráfico
- xlab : rótulo do eixo x
- ylab : rótulo do eixo y
- col : cor dos pontos do gráfico
- pch : forma dos pontos do gráfico
- vertical : quando vertical é “TRUE”, o caminho é desenhado verticalmente em vez de horizontalmente por padrão
- group.names : rótulos de grupo para imprimir próximo ao gráfico, se vários vetores numéricos forem plotados.
Gráfico de barras para um único vetor digital
O exemplo a seguir usa a íris do conjunto de dados R incorporada para criar um gráfico de barras para um único vetor numérico.
#view first six rows of iris dataset
head(iris)
# Sepal.Length Sepal.Width Petal.Length Petal.Width Species
#1 5.1 3.5 1.4 0.2 setosa
#2 4.9 3.0 1.4 0.2 setosa
#3 4.7 3.2 1.3 0.2 setosa
#4 4.6 3.1 1.5 0.2 setosa
#5 5.0 3.6 1.4 0.2 setosa
#6 5.4 3.9 1.7 0.4 setosa
O código a seguir cria um gráfico de banda base para a variável Sepal.Length :
stripchart(iris$Sepal.Length)
Também podemos adicionar argumentos adicionais para adicionar um título e rótulo no eixo x, alterar a cor dos pontos, alterar a forma dos pontos e usar o método “jitter” para que os pontos individuais não se sobreponham:
stripchart(iris$Sepal.Length, main = 'Sepal Length Distribution', xlab = 'Sepal Length', col = 'red', pch = 1, method = 'jitter')
Em vez de misturar os pontos, podemos “empilha-los”:
stripchart(iris$Sepal.Length,
main = 'Sepal Length Distribution',
xlab = 'Sepal Length',
col = 'red',
pch = 1,
method = 'stack' )
Também podemos exibir o gráfico verticalmente em vez do horizontal padrão e alterar o rótulo do eixo para o eixo y:
stripchart(iris$Sepal.Length, main = 'Sepal Length Distribution', ylab = 'Sepal Length' , col = 'red', pch = 1, method = 'jitter', vertical = TRUE )
Gráfico de barras para vários vetores numéricos
Também podemos desenhar vários gráficos em um único gráfico, passando uma lista de vetores numéricos.
O código a seguir cria uma lista contendo as variáveis Sepal Length e Width no conjunto de dados da íris e produz um gráfico de barras para cada variável em um único gráfico:
#create list of variables x <- list('Sepal Length' = iris$Sepal.Length, 'Sepal Width' = iris$Sepal.Width) #create plot that contains one strip chart per variable stripchart(x, main = 'Sepal Width & Length Distributions', xlab = 'Measurement', ylab = 'Variable', col = c('steelblue', 'coral2'), pch = 16, method = 'jitter')
Assim como no exemplo anterior, podemos optar por traçar os gráficos de barras verticalmente em vez do padrão horizontal:
stripchart(x, main = 'Sepal Width & Length Distributions',
xlab = 'Measurement',
ylab = 'Variable',
col = c('steelblue', 'coral2'),
pch = 16,
method = 'jitter',
vertical = TRUE )
Além disso, podemos passar uma fórmula no formato y~x para a função stripchart(), onde y é um vetor numérico agrupado pelo valor de x .
Por exemplo, no conjunto de dados da íris , poderíamos agrupar os dados por espécie que possui três valores distintos (“setosa”, “versicolor” e “virginica”) e então traçar o comprimento da sépala para cada espécie em um gráfico de barras:
stripchart(Sepal.Length ~ Species, data = iris, main = 'Sepal Length by Species', xlab = 'Species', ylab = 'Sepal Length', col = c('steelblue', 'coral2', 'purple'), pch = 16, method = 'jitter', vertical = TRUE)
Para visualizar a documentação completa da função stripchart() em R, basta digitar:
?stripchart