{"version":"1.0","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fhayataka2049.hatenablog.jp%2Fentry%2F2017%2F03%2F12%2F065329\" title=\"\u3010common lisp\u3011common lisp\u3067n-gram - \u9759\u304b\u306a\u308b\u540d\u8f9e\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","author_name":"hayataka2049","height":"190","blog_url":"https://hayataka2049.hatenablog.jp/","description":"\u8da3\u5473\u3067Common Lisp\u3092\u59cb\u3081\u307e\u3057\u305f\u3002\u3068\u308a\u3042\u3048\u305a\u7df4\u7fd2\u306bn-gram\u3092\u66f8\u3044\u3066\u307f\u307e\u3057\u305f\u3002 \u66f8\u304d\u65b9\u306f\u8272\u3005\u3042\u308b\u3068\u601d\u3044\u307e\u3059\u304c\u3001\u30eb\u30fc\u30d7\u69cb\u6587\u304c\u307e\u3060\u3044\u307e\u3044\u3061\u308f\u304b\u3089\u306a\u3044\u306e\u3067\u518d\u5e30\u3067\u66f8\u304d\u307e\u3059\u3002 (defun rec-ngram (list n &optional (ret-list '())) (if (eq (length list) (- n 1)) ret-list (rec-ngram (cdr list) n (nconc ret-list (list (subseq list 0 n)))))) \u3044\u3051\u3066\u308b\u66f8\u304d\u65b9\u306a\u306e\u304b\u3069\u3046\u304b\u306f\u826f\u304f\u308f\u304b\u308a\u307e\u305b\u3093\u304c\u3001\u305d\u3046\u8907\u96d1\u306a\u3082\u306e\u3067\u306f\u3042\u308a\u307e\u305b\u3093\u3002\u672b\u5c3e\u518d\u5e30\u3067\u66f8\u3044\u3066\u3044\u307e\u3059\u304c\u3001\u2026","image_url":null,"provider_name":"Hatena Blog","published":"2017-03-12 06:53:29","type":"rich","title":"\u3010common lisp\u3011common lisp\u3067n-gram","blog_title":"\u9759\u304b\u306a\u308b\u540d\u8f9e","provider_url":"https://hatena.blog","width":"100%","author_url":"https://blog.hatena.ne.jp/hayataka2049/","url":"https://hayataka2049.hatenablog.jp/entry/2017/03/12/065329","categories":["lisp","ngram","\u4e3b\u6210\u5206\u5206\u6790"]}