This is a dataset of Seattle’s AirBNB market. Brought to you by Maddy Largent and Rachel McFadden. Made available from this link: https://myxavier-my.sharepoint.com/:x:/g/personal/largentm_xavier_edu/EfFRsW9hwq5Bg732pnvA2sABdlJGZY5AWGOVEv5o-X7pAA?download=1).
We are loading the data directly from OneDrive using read_csv()
seattle_homes<- read_csv("https://myxavier-my.sharepoint.com/:x:/g/personal/largentm_xavier_edu/EfFRsW9hwq5Bg732pnvA2sABdlJGZY5AWGOVEv5o-X7pAA?download=1")
## Warning: Missing column names filled in: 'X1' [1]
## Parsed with column specification:
## cols(
## X1 = col_double(),
## room_id = col_double(),
## host_id = col_double(),
## room_type = col_character(),
## address = col_character(),
## reviews = col_double(),
## overall_satisfaction = col_double(),
## accommodates = col_double(),
## bedrooms = col_double(),
## bathrooms = col_double(),
## price = col_double(),
## last_modified = col_time(format = ""),
## latitude = col_double(),
## longitude = col_double(),
## location = col_character(),
## name = col_character(),
## currency = col_character(),
## rate_type = col_character()
## )
## Warning: 3957 parsing failures.
## row col expected actual file
## 1 last_modified valid date 46:14.7 'https://myxavier-my.sharepoint.com/:x:/g/personal/largentm_xavier_edu/EfFRsW9hwq5Bg732pnvA2sABdlJGZY5AWGOVEv5o-X7pAA?download=1'
## 7 last_modified valid date 45:03.9 'https://myxavier-my.sharepoint.com/:x:/g/personal/largentm_xavier_edu/EfFRsW9hwq5Bg732pnvA2sABdlJGZY5AWGOVEv5o-X7pAA?download=1'
## 16 last_modified valid date 59:19.4 'https://myxavier-my.sharepoint.com/:x:/g/personal/largentm_xavier_edu/EfFRsW9hwq5Bg732pnvA2sABdlJGZY5AWGOVEv5o-X7pAA?download=1'
## 20 last_modified valid date 56:32.6 'https://myxavier-my.sharepoint.com/:x:/g/personal/largentm_xavier_edu/EfFRsW9hwq5Bg732pnvA2sABdlJGZY5AWGOVEv5o-X7pAA?download=1'
## 21 last_modified valid date 58:36.5 'https://myxavier-my.sharepoint.com/:x:/g/personal/largentm_xavier_edu/EfFRsW9hwq5Bg732pnvA2sABdlJGZY5AWGOVEv5o-X7pAA?download=1'
## ... ............. .......... ....... .................................................................................................................................
## See problems(...) for more details.
these are some summary stats for the variables I think are most interesting
seattle_homes %>%
select(reviews, overall_satisfaction, bedrooms, bathrooms, price) %>%
chart.Correlation(histogram = TRUE)
we were interested to see if there is a significant difference in the avg AirBNB price between Seattle, Redmond, and Bellevue