Mudanças entre as edições de "Linguagem R:Gráficos"
Ir para navegação
Ir para pesquisar
| (24 revisões intermediárias pelo mesmo usuário não estão sendo mostradas) | |||
| Linha 1: | Linha 1: | ||
= Gráficos Básicos do R = | = Gráficos Básicos do R = | ||
| + | Links para aprender mais | ||
| + | * [[https://www.learnbyexample.org/r-bar-plot-base-graph/ https://www.learnbyexample.org/r-bar-plot-base-graph/]] | ||
| + | |||
| + | == Plot == | ||
| + | '''plot(=nome da variável=)''' | ||
| + | |||
| + | [[Arquivo:Graficos plot.png|800px|Tipos de Gráficos Plot]] | ||
| + | |||
| + | === Largura Plot === | ||
| + | options(repr.plot.width=13, repr.plot.height=7) | ||
| + | plot(tb1) | ||
| + | |||
| + | === Gráfico pontos === | ||
| + | [[Arquivo:Linguagem r grafo 01.png|miniaturadaimagem]] | ||
| + | |||
| + | #Entada de dados | ||
| + | c <- c(3991,1059,493,287,184,131,113,85,64,65,41,47,32,28,21) | ||
| + | #Plotagem do gráfico | ||
| + | plot(c) | ||
| + | plot(c,type="p") | ||
| + | plot(c,type="l") | ||
| + | plot(c,type="b") | ||
| + | plot(c,type="c") | ||
| + | plot(c,type="o") | ||
| + | plot(c,type="h") | ||
| + | plot(c,type="s") | ||
| + | plot(c,type="S") | ||
| + | plot(c,type="n") | ||
| + | |||
| + | == Gráfico linha === | ||
| + | [[Arquivo:Linguagem r grafo 01 l.png|miniaturadaimagem|direita]] | ||
| + | #Entrada de dados do Gráfico | ||
| + | c <- c(3991,1059,493,287,184,131,113,85,64,65,41,47,32,28,21) | ||
| + | #Plotagem do Gráfico | ||
| + | plot(c,type="l") | ||
| + | |||
| + | === Tipos de Gráficos === | ||
| + | * "p" para pontos, | ||
| + | * "l" para linhas, | ||
| + | * "b" para ambos, | ||
| + | * "c" apenas para as linhas de "b", | ||
| + | * "o" para os dois 'overplot', | ||
| + | * "h" para linhas verticais do tipo 'histograma' (ou 'alta densidade'), | ||
| + | * "s" para degraus da escada, | ||
| + | * "S" para outras etapas, consulte "Detalhes" abaixo, | ||
| + | * "n" para nenhuma plotagem. | ||
| + | |||
| + | c <- (10,20,30,20,14,30) | ||
| + | freq <- table(c) | ||
| + | plot(freq) | ||
| + | |||
| + | # ORDENAR DO MAIOR PARA O MENOR | ||
| + | freq <- sort(freq, decreasing=TRUE) | ||
| + | plot(freq) | ||
| + | |||
| + | === Legenda na Vertical === | ||
| + | |||
| + | par(las=1) | ||
| + | plot(freq) | ||
| + | |||
| + | = Dispersion = | ||
| + | |||
| + | Dados padrão do R para exemplos | ||
| + | |||
| + | # Cria um modelo de dados | ||
| + | my_data <- mtcars | ||
| + | |||
| + | # Mostra as seis primeiras linhas | ||
| + | head(my_data, 6) | ||
| + | |||
| + | plot(x = my_data$wt, y = my_data$mpg, | ||
| + | pch = 16, frame = FALSE, | ||
| + | xlab = "wt", ylab = "mpg", col = "#2E9FDF") | ||
| − | |||
| − | |||
| Linha 8: | Linha 79: | ||
= Bar Plot = | = Bar Plot = | ||
barplot(=nome da variável=) | barplot(=nome da variável=) | ||
| + | |||
| + | |||
| + | barplot(x, | ||
| + | horiz = TRUE, | ||
| + | xlab = "Tipo de câmbio", | ||
| + | ylab = "Frequência absoluta", | ||
| + | col = c("seagreen", "#FF9911")) | ||
| + | box(bty = "L") | ||
| + | |||
| + | = Pie (Pizza) = | ||
| + | pie(x, | ||
| + | col = c("#5398ed", | ||
| + | rgb(12, 58, 114, max = 255)), | ||
| + | main = "Tipo de câmbio") | ||
| + | |||
| + | = GGPLOT2 = | ||
| + | |||
| + | == Pacotes == | ||
| + | |||
| + | # Installation | ||
| + | install.packages('ggplot2') | ||
| + | # Loading | ||
| + | library(ggplot2) | ||
| + | |||
| + | [http://www.sthda.com/english/wiki/ggplot2-essentials] | ||
| + | |||
| + | = SANKEY = | ||
| + | |||
| + | = Salvando gráfico em arquivo = | ||
| + | |||
| + | == PNG == | ||
| + | |||
| + | Temperature = c(15,15,15,15,20,21,12,32,23,33,32,19,54) | ||
| + | png(file="d:/lixo/saving_plot2.png", | ||
| + | width=600, height=350) | ||
| + | hist(Temperature, col="gold") | ||
| + | dev.off() | ||
| + | |||
| + | == BMP == | ||
| + | bmp(filename = "Rplot03d.bmp", | ||
| + | width = 480, height = 480, units = "px", pointsize = 12, | ||
| + | bg = "white", res = NA, family = "", restoreConsole = TRUE, | ||
| + | type = c("windows", "cairo"), antialias) | ||
| + | dev.off() | ||
| + | |||
| + | jpeg(filename = "Rplot03d.jpg", | ||
| + | width = 480, height = 480, units = "px", pointsize = 12, | ||
| + | quality = 75, | ||
| + | bg = "white", res = NA, family = "", restoreConsole = TRUE, | ||
| + | type = c("windows", "cairo"), antialias) | ||
| + | |||
| + | png(filename = "Rplot03d.png", | ||
| + | width = 480, height = 480, units = "px", pointsize = 12, | ||
| + | bg = "white", res = NA, family = "", restoreConsole = TRUE, | ||
| + | type = c("windows", "cairo", "cairo-png"), antialias) | ||
| + | |||
| + | tiff(filename = "Rplot03d.tif", | ||
| + | width = 480, height = 480, units = "px", pointsize = 12, | ||
| + | compression = c("none", "rle", "lzw", "jpeg", "zip", "lzw+p", "zip+p"), | ||
| + | bg = "white", res = NA, family = "", restoreConsole = TRUE, | ||
| + | type = c("windows", "cairo"), antialias) | ||
| + | |||
| + | dev.off() | ||
| + | |||
| + | Mais informações | ||
| + | http://www.leg.ufpr.br/~walmes/ensino/dsbd/7-vis-graphics.html [http://www.leg.ufpr.br/~walmes/ensino/dsbd/7-vis-graphics.html] | ||
Edição atual tal como às 11h43min de 26 de setembro de 2023
Índice
Gráficos Básicos do R
Links para aprender mais
Plot
plot(=nome da variável=)
Largura Plot
options(repr.plot.width=13, repr.plot.height=7) plot(tb1)
Gráfico pontos
#Entada de dados c <- c(3991,1059,493,287,184,131,113,85,64,65,41,47,32,28,21) #Plotagem do gráfico plot(c) plot(c,type="p") plot(c,type="l") plot(c,type="b") plot(c,type="c") plot(c,type="o") plot(c,type="h") plot(c,type="s") plot(c,type="S") plot(c,type="n")
Gráfico linha =
#Entrada de dados do Gráfico c <- c(3991,1059,493,287,184,131,113,85,64,65,41,47,32,28,21) #Plotagem do Gráfico plot(c,type="l")
Tipos de Gráficos
- "p" para pontos,
- "l" para linhas,
- "b" para ambos,
- "c" apenas para as linhas de "b",
- "o" para os dois 'overplot',
- "h" para linhas verticais do tipo 'histograma' (ou 'alta densidade'),
- "s" para degraus da escada,
- "S" para outras etapas, consulte "Detalhes" abaixo,
- "n" para nenhuma plotagem.
c <- (10,20,30,20,14,30) freq <- table(c) plot(freq)
# ORDENAR DO MAIOR PARA O MENOR freq <- sort(freq, decreasing=TRUE) plot(freq)
Legenda na Vertical
par(las=1) plot(freq)
Dispersion
Dados padrão do R para exemplos
# Cria um modelo de dados my_data <- mtcars
# Mostra as seis primeiras linhas head(my_data, 6)
plot(x = my_data$wt, y = my_data$mpg,
pch = 16, frame = FALSE,
xlab = "wt", ylab = "mpg", col = "#2E9FDF")
Bar Plot
barplot(=nome da variável=)
barplot(x,
horiz = TRUE,
xlab = "Tipo de câmbio",
ylab = "Frequência absoluta",
col = c("seagreen", "#FF9911"))
box(bty = "L")
Pie (Pizza)
pie(x,
col = c("#5398ed",
rgb(12, 58, 114, max = 255)),
main = "Tipo de câmbio")
GGPLOT2
Pacotes
# Installation
install.packages('ggplot2')
# Loading
library(ggplot2)
[1]
SANKEY
Salvando gráfico em arquivo
PNG
Temperature = c(15,15,15,15,20,21,12,32,23,33,32,19,54) png(file="d:/lixo/saving_plot2.png", width=600, height=350) hist(Temperature, col="gold") dev.off()
BMP
bmp(filename = "Rplot03d.bmp",
width = 480, height = 480, units = "px", pointsize = 12,
bg = "white", res = NA, family = "", restoreConsole = TRUE,
type = c("windows", "cairo"), antialias)
dev.off()
jpeg(filename = "Rplot03d.jpg",
width = 480, height = 480, units = "px", pointsize = 12,
quality = 75,
bg = "white", res = NA, family = "", restoreConsole = TRUE,
type = c("windows", "cairo"), antialias)
png(filename = "Rplot03d.png",
width = 480, height = 480, units = "px", pointsize = 12,
bg = "white", res = NA, family = "", restoreConsole = TRUE,
type = c("windows", "cairo", "cairo-png"), antialias)
tiff(filename = "Rplot03d.tif",
width = 480, height = 480, units = "px", pointsize = 12,
compression = c("none", "rle", "lzw", "jpeg", "zip", "lzw+p", "zip+p"),
bg = "white", res = NA, family = "", restoreConsole = TRUE,
type = c("windows", "cairo"), antialias)
dev.off()
Mais informações http://www.leg.ufpr.br/~walmes/ensino/dsbd/7-vis-graphics.html [2]
