Zadanie1

Podsumuj najważniejsze statystyki srednią cen sprzedaży w mieście Sacramento wedłógł ich typów w tle

dane %>% 
  filter(city == "sacramento") %>%
  group_by(type) %>%
  
  summarise(
    
    średnia = mean(price, na.rm=TRUE),
    mediana = median(price, na.rm=TRUE),
    min = min(price),
    maksymalna = max(price),
    liczba = n()
    
    )

## Warning: There were 2 warnings in `summarise()`.
## The first warning was:
## ℹ In argument: `min = min(price)`.
## Caused by warning in `min()`:
## ! brak argumentów w min; zwracanie wartości Inf
## ℹ Run `dplyr::last_dplyr_warnings()` to see the 1 remaining warning.

## # A tibble: 0 × 6
## # ℹ 6 variables: type <chr>, średnia <dbl>, mediana <int>, min <dbl>,
## #   maksymalna <dbl>, liczba <int>