Carregar dados

load("C:/Users/Hp/Documents/GitHub/Base_de_dados/CARROS.RData")

Tratamento dos dados

CARROS$Tipodecombustivel <- as.factor(CARROS$Tipodecombustivel)
CARROS$TipodeMarcha<-as.factor(CARROS$TipodeMarcha)

Gráficos

boxplot(Preco ~ Tipodecombustivel, data = CARROS, col=c("red","skyblue"), main=
          "Gráfico 1 - Preço por tipo de combustível \n (0 = Gasolina, 1 = Álcool)")

boxplot(Kmporlitro ~ TipodeMarcha, data = CARROS, col=c("white","green"), main=
          "Gráfico 2 - Preço por tipo de Câmbio \n (0 = Automático, 1 = Manual)")

boxplot(Preco ~ Cilindros, data=CARROS,col=c("red","skyblue", "lightgreen"),
        main="Preço por cilindros")

library(ggplot2)
library(plotly)

grafico <- ggplot(CARROS) +
 aes(x = HP, y = Preco, colour = TipodeMarcha, size = Kmporlitro, group = Cilindros) +
 geom_point() +
 scale_color_viridis_d(option = "viridis") +
 labs(x = "Potência do Motor", y = "Preço do carro", title = "Meu gráfico ggplot", subtitle = "com esquisse", caption = "fonte: base de dados carros") +
 ggthemes::theme_solarized() +
 theme(legend.position = "bottom")

ggplotly(grafico)

conclusão

Carros a gasolina, automáticos e com maior número de Cilindros são mais caros.