fiddlerwoaroof/data-lens
1
0
Fork 0
mirror of https://github.com/fiddlerwoaroof/data-lens.git synced 2025-11-08 10:16:32 +00:00
Code Issues Releases Wiki Activity

Fix example a bit

Browse Source
This commit is contained in:
Ed Langley
2018-08-18 13:06:28 -07:00
parent 289289e708
commit 48ff3c1166
2 changed files with 20 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
README.org
View File

@ -6,16 +6,17 @@ the composition of more primitive operations.
#+BEGIN_SRC lisp
DATA-LENS> (funcall (on (compress-runs :collector 'combine-matching-lists)
(alexandria:compose
(over (juxt (element 0)
'identity))
(sorted 'string<)))
'("January" "February" "March" "April"
"May" "June" "July" "August"
"September" "October" "November" "December"))
#| ==> ((#\A "April" "August")
(over (data-lens:juxt
(data-lens:element 0)
'identity))
(sorted 'char< :key (element 0))))
'("January" "February" "March" "April"
"May" "June" "July" "August"
"September" "October" "November" "December"))
#| ==> ((#\A "April" "August")
(#\D "December")
(#\F "February")
(#\J "January" "July" "June")
(#\J "January" "June" "July")
(#\M "March" "May")
(#\N "November")
(#\O "October")