Week 1 Analysis Tanner Norton 4/26/2019
Stephanie1 is a student that will be starting school at BYU-Idaho next semester. Suppose she sent you the following email.
“Hi. My name is Stephanie. I would like to learn about what housing options I have for living at BYU-Idaho next semester. It will be my first semester there, so I would like to find something that is close to campus and around $300 a month in rent. I’m not too picky on roomates, but I would like somewhere that has a lot of people around so I can get to know as many people as possible. Thanks in advance!”
Dear Stephanie,
From what I understood you are looking for an apartment that has 3 things which are 1. Close to campus 2. About $300 a month & 3. Has a lot of residents. Here in Rexburg there are 57 womens approved single housing apartments which range from around $ 220/month to about $ 400/month. As you can see there are lots of options. Below I created an interactive graph that allows you to see every womens apartment and how larger apartments are priced against smaller ones. I do think that it is important to get to know people your first semester. However, you can see a trend in the graph that larger complexes tend to be more expensive than the smaller ones. That being said there are some relatively large apartment complexes that charge just over and under your $300 dollar range. In conclusion I would suggest these 3 as they best fit the categories you wanted in order of least price Birch Plaza, Royal Crest, & The Ivy. To me it appears the best option would be Birch Plaza as it is the least expensive, closest to campus, and relatively large in comparison to other apartments with 343 people. I would encourage you to visit their websites and check out what features they offer to help you make your final decision. Best regards,
Tanner Norton
# Code to get you started, be sure to use a subset of Rent instead of Rent in this code though.
datatable(Rent, options=list(lengthMenu = c(3,10,30)), extensions="Responsive")#build a chunck
Rent3 <- read.csv("../Data/Rent3.csv", header=TRUE)
plot_ly(Rent3) %>%
add_markers(y= ~Price_month, x= ~Capacity, text= ~Apartment) %>%
layout(title="Rexburg Womens Housing", xaxis=list(title="Complex Capacity"), yaxis=list(title="Price per Month"))Note that Stephanie is a fictional character who is based on real experiences of many faculty and staff here at BYU-Idaho.↩