carica pacchetti di base

library(readr); library(dplyr); library(ggplot2)A

leggi il csv (metti il file nella stessa cartella del .Rmd)

df <- read_csv(“realestate_texas.csv”, show_col_types = FALSE)

grafico semplice: vendite per anno

df %>% group_by(year) %>% summarise(total_sales = sum(sales), .groups=“drop”) %>% ggplot(aes(year, total_sales)) + geom_line() + geom_point() S