{"provider_url":"https://hatena.blog","title":" Project Euler Problem 4","categories":["Project Euler","Emacs Lisp"],"image_url":null,"height":"190","width":"100%","blog_title":"\u601d\u3044\u3064\u3044\u305f\u3089\u66f8\u304f\u65e5\u8a18 Ex","provider_name":"Hatena Blog","author_name":"ancient-v","author_url":"https://blog.hatena.ne.jp/ancient-v/","description":"\u554f\u984c4: 3\u6841\u306e\u6570\u306e\u7a4d\u3067\u8868\u3055\u308c\u308b\u56de\u6587\u6570\u306e\u3046\u3061\u6700\u5927\u306e\u3082\u306e\u306f\u3044\u304f\u3089\u306b\u306a\u308b\u304b\u3002[=>\u539f\u6587\u548c\u8a33] \u4eca\u56de\u306f\u529b\u6280\u3067\u3082\u3059\u3050\u7b54\u3048\u304c\u51fa\u305d\u3046\u306a\u7c21\u5358\u306a\u554f\u984c\u3067\u3059\u3002 \u56de\u6587\u6570\u30c1\u30a7\u30c3\u30af\u95a2\u6570 (defun is-palindromic-number (x) \"\u56de\u6587\u6570\u30c1\u30a7\u30c3\u30af\" (let* ((str (number-to-string x)) (sub-loop (lambda (left right) (cond ((>= left right) t) ((not (= (aref str left) (aref str right))) nil) (t (funcall sub-loop (1+ left) (1- ri\u2026","url":"https://ancient-v.hatenadiary.org/entry/20091112/1258037815","type":"rich","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fancient-v.hatenadiary.org%2Fentry%2F20091112%2F1258037815\" title=\" Project Euler Problem 4 - \u601d\u3044\u3064\u3044\u305f\u3089\u66f8\u304f\u65e5\u8a18 Ex\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","published":"2009-11-12 23:56:55","blog_url":"https://ancient-v.hatenadiary.org/","version":"1.0"}