diff --git a/summary-manchester.org b/summary-manchester.org index 7facd29..9cb7f1d 100644 --- a/summary-manchester.org +++ b/summary-manchester.org @@ -60,6 +60,7 @@ RENT RATES. ASSUME THEY DON'T.* See [[file:./on-the-market-manchester.org][On Th | On The Market | 438 | 1005 | £300–£1250 | 395 | 1250 | | Open Rent | 114 | 735 | £400–£1500 | 400 | 1350 | | Zoopla | 5 | 1138 | £400–£1300 | 1050 | 1250 | +| Prime Location | 109 | 1041 | £400–£1250 | 550 | 1250 | #+begin_src lisp :var table=manc-avg-rent :results output raw (let ((filepath #P"working-data/manc-avg-rent-feb-march-2024.csv")) @@ -80,25 +81,26 @@ RENT RATES. ASSUME THEY DON'T.* See [[file:./on-the-market-manchester.org][On Th [[file:working-data/manc-avg-rent-feb-march-2024.csv]] #+begin_src lisp :results file - (let* ((values - (lisp-stat:plist-df - `(:x-axis #("Right Move" "Spare Room" "Ideal Flatmate" - "Roomies" "On The Market" "Open Rent" "Zoopla") - :y-axis #(1204 589 714 641 1005 735 1138))))) - (vega:defplot manc-avg-rent - `(:title "Monthly Average Rent Rates (Bills Inc.) Manchester Feb–March 2024" - :mark :bar - :width 600 - :height 600 - :data ,values - :layer #((:mark (:type :bar) - :encoding (:x (:field :x-axis :title "Company" :type :nominal :axis ("labelAngle" 0)) - :y (:field :y-axis :title "Rent (£)" :type :quantitative) - :tooltip (:field :y-axis))) - (:mark (:type :rule :color "darkorange" :size 3) - :encoding (:y (:field :y-axis :type :quantitative :aggregate :average) - :tooltip (:field :y-axis :type :quantitative :aggregate :average)))))) - (vega:write-html manc-avg-rent "renders/manc-rent-averages-feb-march-2024.html")) + (let* ((values + (lisp-stat:plist-df + `(:x-axis #("Right Move" "Spare Room" "Ideal Flatmate" + "Roomies" "On The Market" "Open Rent" "Zoopla" + "Prime Location") + :y-axis #(1204 589 714 641 1005 735 1138 1041))))) + (vega:defplot manc-avg-rent + `(:title "Monthly Average Rent Rates Manchester Feb–March 2024" + :mark :bar + :width 600 + :height 600 + :data ,values + :layer #((:mark (:type :bar) + :encoding (:x (:field :x-axis :title "Company" :type :nominal :axis ("labelAngle" 0)) + :y (:field :y-axis :title "Rent (£)" :type :quantitative) + :tooltip (:field :y-axis))) + (:mark (:type :rule :color "darkorange" :size 3) + :encoding (:y (:field :y-axis :type :quantitative :aggregate :average) + :tooltip (:field :y-axis :type :quantitative :aggregate :average)))))) + (vega:write-html manc-avg-rent "renders/manc-rent-averages-feb-march-2024.html")) #+end_src #+RESULTS: @@ -115,3 +117,51 @@ directory. #+RESULTS: [[file:./renders/manc-rent-averages-feb-march-2024.png]] + +* Website Listing Totals + +I've created a data-frame here, instead of above, because this is a +work-in-programm file and I'm writing/working it out as I go along. I should +work this data-frame back into the ~manc-avg-rent~ plot above at some point. + +#+begin_src lisp :session + (lisp-stat:defdf *man-sum* + (lisp-stat:read-csv #P"working-data/manc-avg-rent-feb-march-2024.csv")) +#+end_src + +#+RESULTS: +: # + +#+begin_src lisp :session :results file + (vega:defplot man-sum + `(:title "Listing Amounts for Manchester (Feb. and March 2024)" + :width 600 + :height 600 + :data ,*man-sum* + :layer #((:mark (:type :bar) + :encoding (:x (:field :company :title "company" :type :nominal axis ("labelAngle" 0)) + :y (:field :quantity :title "No. of listings" :type :quantitative) + :tooltip (:field :quantity))) + (:mark (:type rule :color "darkorange" :size 3) + :encoding (:y (:field :quantity :type :quantitative :aggregate :average) + :tooltip (:field :quantity :type :quantitative :aggregate :average)))))) + (vega:write-html man-sum "renders/manc-listing-amounts-feb-march-2024.html") +#+end_src + +#+RESULTS: +[[file:renders/manc-listing-amounts-feb-march-2024.html]] + +#+begin_src shell + mv ~/Downloads/visualization.png ./renders/manc-rent-listing-amounts-feb-march-2024.png +#+end_src + +[[file:./renders/manc-rent-listing-amounts-feb-march-2024.png]] + + +* Listing Amounts and Average Rent + +Up to now (2024-03-19 Tue), [[file:./spare-room-manchester.org][Spare Room]] has the most listings and the lowest +average rent. On top of that, the Spare Room listing include the bills in its +rent rates. + +*Need to not draw too many conclusions until I've processed the other websites.*