rpivotTable: Construa uma ferramenta de análise descritiva que produz gráficos e tabelas
rpivotTable: Construa uma ferramenta de análise descritiva que produz gráficos e tabelas
require(rpivotTable)
library(readxl)
RELATORIO <- read_excel("C:/Users/usuario/Downloads/RELATORIO.xls")
-executar rpivotTable(RELATORIO)
-Exemplo:
Gráfico de Pizza
-Utilize o R básico ao invés do Rstudio
RELATORIO <- within(RELATORIO, {
Sexo <- factor(Sexo, labels=c('F','M'))
})
contagem = table(RELATORIO$Sexo)
nomes = levels(RELATORIO$Sexo)
porcent = round(contagem/sum(contagem)*100,2)
rotulo=paste(nomes," (",porcent,"%",")",sep="")
pie(table(RELATORIO$Sexo),labels=rotulo, main="Sexo", col=c("red","blue"))