R Markdown

This is an R Markdown document. Markdown is a simple formatting syntax for authoring HTML, PDF, and MS Word documents. For more details on using R Markdown see http://rmarkdown.rstudio.com.

When you click the Knit button a document will be generated that includes both content as well as the output of any embedded R code chunks within the document. You can embed an R code chunk like this:

Tabs

VADeaths

colors <- c("green","red","blue","black","orange")
gf <- VADeaths
barplot(gf,ylab = 'eixo y',xlab = 'eixo x',col=colors, main = 'Titulo Q1')

ClassificaçãoDoença

estag <- c("leve","moderado","severo")
estpac <- c(8,9,3)

pct <- round(estpac/sum(estpac)*100)
lbls <- paste(estag,pct)
lbls <- paste(lbls,"%",sep="")
pie(estpac,
    main="Grafico q2",
    labels=lbls
    )

    legend("topright",
    legend = estag)

USArrests

library(plotly)
## Warning: pacote 'plotly' foi compilado no R versão 4.6.2
## Carregando pacotes exigidos: ggplot2
## 
## Anexando pacote: 'plotly'
## O seguinte objeto é mascarado por 'package:ggplot2':
## 
##     last_plot
## O seguinte objeto é mascarado por 'package:stats':
## 
##     filter
## O seguinte objeto é mascarado por 'package:graphics':
## 
##     layout
USArrests$City = c("Georgia","Mississipi","Florida","Lousiana","South Carolina")
cc <- USArrests$City
df_ordenado <- USArrests[order(-USArrests$Murder), ]
colors <- c("green","orange","blue")


cities <- cc
cG <- c(17.4,60,211)
cM <- c(16.1,44,259)
cF <- c(15.4,80,335)
cL <- c(15.4,66,249)
cS <- c(14.4,48,279)

data <- data.frame(cG,cM,cF,cL,cS)

  
  fig <- plot_ly(
    data,
    x = cc,
    y = data,
    type = 'bar'
  )

Orange

plot(Orange$age,Orange$circumference,type="o")