create uk-min-wage.org file.

uk-min-wage.org

@@ -0,0 +1,46 @@
+#+options: ':nil *:t -:t ::t <:t H:3 \n:nil ^:t arch:headline author:t
+#+options: broken-links:nil c:nil creator:nil d:(not "LOGBOOK") date:t e:t
+#+options: email:nil expand-links:t f:t inline:t num:t p:nil pri:nil prop:nil
+#+options: stat:t tags:t tasks:t tex:t timestamp:t title:t toc:t todo:t |:t
+#+title: UK Min. Wage
+#+date: \today
+#+author: Craig Oates
+#+email: craig@craigoates.net
+#+language: en
+#+select_tags: export
+#+exclude_tags: noexport
+#+creator: Emacs 29.1.90 (Org mode 9.7-pre)
+#+cite_export:
+
+* Overview of UK Minimum Wage
+
+- [[https://www.gov.uk/national-minimum-wage-rates][UK National Minimum Wage Rates]]
+
+Because I am over 23 years of age, at the time of writing, I'm only going to be
+dealing with the 'Over 23' rates.
+  
+#+begin_src lisp :results output raw
+  (let* ((min-wage 10.42) ; April 2023
+         (day-wage (* min-wage 8))
+         (wk-wage  (* day-wage 5))
+         (mth-wage (* wk-wage 4))
+         (ann-wage (* mth-wage 12)))
+    (format t "|Time Span|Wage (£)|~%")
+    (format t "|-|-|~%")
+    (format t "|Day  (8 Hrs)|~a|~%" day-wage)
+    (format t "|Week (5 Day, 40 Hrs)|~a|~%" wk-wage)
+    (format t "|Month|~a|~%" mth-wage)
+    (format t "|Year|~a|~%" ann-wage))
+#+end_src
+
+#+RESULTS:
+| Time Span            |  Wage (£) |
+|----------------------+-----------|
+| Day  (8 Hrs)         |     83.36 |
+| Week (5 Day, 40 Hrs) |     416.8 |
+| Month                |    1667.2 |
+| Year                 | 20006.398 |
+
+*Note:* These figures don't take into account holiday/sick pay. These figures are
+ just to give me a ballpark figure of what the UK government considers the bare
+ minimum one should expect to earn in the UK for 2023/2024.