add total, min. and max. data to spare-room-manchester.org file.

spare-room-manchester.org

@@ -219,6 +219,9 @@ it manually because to save time.
 #+RESULTS:
 : #<DATA-FRAME:DATA-FRAME (1096 observations of 9 variables)>
 
+The 1096 entries is a little to big to put into a bar chart. I'm going to skip
+this and look at the data in just tables and use the data-frame outputs.
+
 ** Filter Results for Weekly and Monthly Rent (and Bills Inc.)
 
 The data in the CSV file includes both weekly and monthly rent rates. I need to
@@ -271,7 +274,7 @@ any changes made in this file.
 #+end_src
 
 #+RESULTS:
-: #<DATA-FRAME:DATA-FRAME (67 observations of 9 variables)>
+: #<DATA-FRAME:DATA-FRAME (63 observations of 9 variables)>
 
 #+begin_src lisp :session
   (lisp-stat:defdf *sr-manc-mth*
@@ -279,7 +282,9 @@ any changes made in this file.
 #+end_src
 
 #+RESULTS:
-: #<DATA-FRAME:DATA-FRAME (585 observations of 9 variables)>
+: #<DATA-FRAME:DATA-FRAME (584 observations of 9 variables)>
+
+Total number of listings being used,
 
 #+begin_src lisp :results output raw
   (let* ((wk (lisp-stat:mean *sr-manc-wk*:price))
@@ -325,7 +330,36 @@ going to take advantage of the tiny amount of data needed and input it manually.
 
 [[file:renders/2024-02-23-spare-room-average-rent-diffs.png]]
 
-* Summary of Spare Room Data
+* Summary of Spare Room Data (Not Inc. Income Tax)
+
+#+begin_src lisp :results raw
+  (lisp-stat:summarize-column '*sr-manc-mth*:price)
+#+end_src
+
+#+RESULTS:
+584 reals, min=300, q25=547.6666, q50=599.8028, q75=657.125, max=1260
+
+#+begin_src lisp :results raw
+  (lisp-stat:summarize-column '*sr-manc-wk*:price)
+#+end_src
+
+#+RESULTS:
+63 reals, min=110, q25=141.7857, q50=153, q75=162.75, max=167
+
+#+begin_src lisp :results output raw
+  (format t "- Total Listings: ~a~%" (+ 584 63))
+  (format t "- Week Min. Adjusted to Month: ~a~%" (* 110 4))
+  (format t "- Week Max. Adjusted to Month: ~a" (* 167 4))
+#+end_src
+
+#+RESULTS:
+- Total Listings: 647
+- Week Min. Adjusted to Month: 440
+- Week Max. Adjusted to Month: 668
+
+| Total Listing Used | Min. (£) | Max. (£) |
+|--------------------+----------+----------|
+|                647 |      300 | 1260     |
 
 The average rent (including bills) between the weekly and monthly listings
 (23/02/2024),
@@ -350,7 +384,7 @@ probably looking at £13,000/yr to keep me going, at a basic level.
 #+begin_src lisp :results output raw
   (let* ((ann (float (+ 7100 5000)))
          (mth (float (/ ann 12)))
-         ;; Hardcoded rent price because it's quicker and easier to do that here. asdfs
+         ;; Hardcoded rent price because it's quicker and easier to do that here.
          (wk  (float (/ (- mth 589.24) 4)))
          (day (float (/ wk 7))))
     (format t "|Time Span|Value (£)|~%")
@@ -375,6 +409,45 @@ which are lower. Unfortunately, I don't feel comfortable thinking I have a
 buffer zone here. From here on out, I'm going to treat these values as the
 lowest I can go.
 
-I could do with going over the [[file:./uk-min-wage.org][minimum wage stuff]] for the UK, to see how far off
-these numbers are.
+I could do with going over the [[file:./uk-wage-tax.org][minimum wage and tax stuff]] for the UK, to see how
+far off these numbers are.
+
+* Recalulate Figures with Income Tax
 
+Having gone through the number in [[file:./ideal-flatmate-manchester.org][Ideal Flatmate (Manc.)]], I realised I haven't
+taken into account the Income Tax with the figures above. I realise the
+difference won't be that big because the annual salary target, used above,
+barely passes the Personal Allowance band (Income Tax).
+
+#+begin_src lisp :results output raw
+  (let* ((earning-target 12100)
+         (p-allow 12570)
+         (taxable-income (- p-allow earning-target))
+         (tax-to-pay (* taxable-income 0.8))
+         (total (- earning-target tax-to-pay)))
+    (format t "- Annual Target Salary: £~a~%" earning-target)
+    (format t "- Part of Salary which is Taxable: £~a~%" taxable-income)
+    (format t "- Tax to Pay: £~a~%" tax-to-pay)
+    (format t "- Salary After Tax: £~a~%" total))
+#+end_src
+
+#+RESULTS:
+- Annual Target Salary: £12100
+- Part of Salary which is Taxable: £470
+- Tax to Pay: £376.0
+- Salary After Tax: £11724.0
+
+| Time Span             | Value After Tax (£) | Mean Rent (£) |
+|-----------------------+---------------------+---------------|
+| Annually              |               11724 |        589.24 |
+| Monthly (Before Rent) |                 977 |               |
+| Monthly (After Rent)  |              387.76 |               |
+| Weekly (After Rent)   |               96.94 |               |
+| Daily (After Rent)    |           13.848571 |               |
+#+TBLFM: @3$2=@-1/12::@4$2=@-1-@-2$+1::@5$2=@-1/4::@6$2=@-1/7
+
+The recalculation, with Income Tax, changes my spend limit to £13.85/day. It's
+not a massive drop from £14.96, but it's not helping the situation. I should
+point out here, these figures use the bare minimum salary target (I've set for
+myself) of £12,100. Realistically, I'm going have to go with the £13,000 I
+mentioned in section [[Summary of Spare Room Data (Not Inc. Income Tax)]] above.