|
|
|
@ -89,9 +89,10 @@ wrong listings.
|
|
|
|
|
Need to come back to this and finish it off. Left it in a mess because it's the |
|
|
|
|
end of the day (at time of commit) and need to get some sleep. |
|
|
|
|
|
|
|
|
|
#+begin_src lisp :results silent |
|
|
|
|
#+begin_src lisp :results output raw |
|
|
|
|
(let ((filepath #P"working-data/2024-02-24-ideal-flatmate-manc.csv")) |
|
|
|
|
(with-open-file (out-stream |
|
|
|
|
#P"working-data/2024-02-24-ideal-flatmate-manc.csv" |
|
|
|
|
filepath |
|
|
|
|
:direction :output |
|
|
|
|
:if-exists :supersede) |
|
|
|
|
(let ((row-id 0)) |
|
|
|
@ -111,8 +112,12 @@ end of the day (at time of commit) and need to get some sleep.
|
|
|
|
|
cleaned-location |
|
|
|
|
(aref url 0)))) |
|
|
|
|
(incf row-id)))) |
|
|
|
|
(format t "[[file:./working-data/2024-02-24-ideal-flatmate-manc.csv]]")) |
|
|
|
|
#+end_src |
|
|
|
|
|
|
|
|
|
#+RESULTS: |
|
|
|
|
[[file:./working-data/2024-02-24-ideal-flatmate-manc.csv]] |
|
|
|
|
|
|
|
|
|
The amount of listings on Ideal Flatmate is tiny compared to the others. I can |
|
|
|
|
basically show all them here. |
|
|
|
|
|
|
|
|
|