Pocket7878_dev https://blog.hatena.ne.jp/Pocket7878_dev/ Let's write β https://tech-blog.pocket7878.com/ Lisp 文字列の検索アルゴリズムについてしらべていたら、良いチュートリアルを発見したので やってみました。 簡単なWebサーチエンジンの作り方 (defun all-suffix-node (str) (loop for s from 1 to (length str) collect (cons s (subseq str (1- s))))) (defun suffix-array (str) (mapcar #'car (sort (all-suffix-node str) (lambda (a b) (string<= (cdr a) (cdr b)))))) (defun suffix (s… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Ftech-blog.pocket7878.com%2Fentry%2F2013%2F05%2F16%2F104402" title="SuffixArrayを使った簡易検索エンジンやってみた。 - Let&#39;s write β" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2013-05-16 10:44:02 rich https://tech-blog.pocket7878.com/entry/2013/05/16/104402 1.0 100%