2007-03-01から1ヶ月間の記事一覧
これは相当前から考えていたこと。ただ、「締め」といっても更新はこのまま続けて(忙しくても頑張る)、このアカウントで日記をスタートさせてから今日までの約2年を、はてなダイアリーブックで書籍化するだけ。実は自分がはてなで書きつづけているのも、…
リファラとか、どのユーザが誰のRSSを登録したとか、気の弱い人は見ちゃいけないと思う。ましてや「YAPC行く予定です」とか書こうとしてた矢先に見てしまったのは、自らプレッシャーをかけてるとしか思えない。 ということでこの日記は、技術系と見せかけて…
初めてWiiに触れてみた。使ってる途中でリモコンの電池が切れてしょんぼりだった。
「田中さん」と聞こえてきても絶対に振り向かないこと。
2、3個あるにはあるけど、どれもマジ系だからなぁ…。 なんかこう、アホっぽく見えるような、軽いネタを探さなくては。 それとも、入社して一週間も経ってないから、あえてマジ系に振ってみるのもアリか。 (追記 3/30) 来週の月曜だった。ってことは週頭…
今日少し考え直してみたら、結局自分で自分の時間を作れないようなスケジューリングにしてるからじゃん、と気づく。 ただ、おかげで予定より早くプロトタイプが披露できそう(モチ社内向け)。だから、明日こそ少し自分の時間にも投資してみる。 不祥私24年…
マックは週一回まで。
何もしてない・できない自分に物凄く苛立つ。とにかく、なんでもいいから一歩前に出る。
やっぱ自分の性に合わないな…。
就業に関する書類にサインしたので、正式に決定。今日から社員です。 →面白法人カヤック にしても、まさか本気で「ぶっこまれる」とは思わなかった…。正に「身から出た錆」「嘘から出た真」「瓢箪から駒」。 そういやこの会社って、情報公開についてどれくら…
(defun divide-two (&optional (list) (f-list nil)) (if (< (length f-list) (length list)) (divide-two (cdr list) (append f-list (list (car list)))) (cons f-list list))) (defun do-simple-insert (list num) (if (not list) (setf list (list num))…
吉祥寺にて飲み会。 ついでに俺もぼそりと明日以降のことを伝えてみたら、アウトプット先が良かったのか悪かったのか、瞬時にメンバー全員に伝わり、ついでに祝ってもらえた。とにかく、感謝。 終わって以降しばらくは、何だか悪い冗談(Black Comedy)を見…
(defun set-array (&optional (list) (num) (array (make-array '(10) :initial-element nil))) (if (not list) array (let ((key (truncate (mod (/ (car list) (expt 10 num)) 10)))) (setf (svref array key) (append (svref array key) (list (car list)…
(defun max-elements (&optional (list) (elm 0)) (if (not list) elm (max-elements (cdr list) (if (> elm (car list)) elm (car list))))) (defun vector-to-list (&optional (array) (num 0)) (if (< num (length array)) (let ((anum (svref array num)…
K氏への私信みたいになるが。 自分の中では少なくとも、ラテンやジャズのようなジャンル的に割と古い音楽は、いくらアタックが必要といってもピックで得られるアタックとはモノが違うと考えている。だから、「その手の音楽に、ピックで得られるアタック、ひ…
(setq h 3) (defun make-new-list (&optional (list) (num) (n 0) (t-list nil)) (cond ((not (cdr list)) (if (= num n) (append t-list (list (car list))) t-list)) ((= num n) (make-new-list (cdr list) (+ num h) (1+ n) (append t-list (list (car li…
祖母に感謝。ゲーデル、エッシャー、バッハ―あるいは不思議の環 20周年記念版posted with amazlet on 07.03.23ダグラス・R. ホフスタッター Douglas R. Hofstadter 野崎 昭弘 柳瀬 尚紀 はやし はじめ 白揚社 (2005/10)売り上げランキング: 13234おすすめ度…
意外とあっけなかった気がする。
(defun do-simple-select (&optional (list) (num nil)) (let ((tmp (car list))) (cond ((not num) (do-simple-select (cdr list) tmp)) ((not tmp) (cons nil num)) ((not (cdr list)) (if (> num tmp) (cons (list num) tmp) (cons (list tmp) num))) (t …
in Perl my ($a, $b) = (1, 2); みたいなことをLispでもできないのかな。 (setf '(a b) '(1 2)) なんてできちゃいそうな気もするけど(初心者というかバカ丸出し)
(defun do-simple-insert (list num) (if (not list) (setf list (list num)) (if (< (car list) num) (setf (cdr list) (do-simple-insert (cdr list) num)) (setf list (cons num list)))) list) (defun simple-insert-sort (list) (let ((ret-list)) (dol…
(defun do-bubble (list) (if (cdr list) (let ((t1 (car list)) (t2 (car (cdr list)))) (if (> t1 t2) (setf (car list) t2 (car (cdr list)) t1)) (setf (cdr list) (do-bubble (cdr list))))) list) (defun bubble-sort (list) (let ((ret-list)) (dotim…
話していて、ああ、ここがその差か、とやっとわかってきたように思った。
久々に禁煙の苦痛を味わいたかったので(土屋賢二風)、三日程前から絶つことに。で、イライラ防止でガムを買ったつもりが、大体この手のものは手元にあればすぐ口に入れてしまうタイプなので(まさにガキ)、あっという間に無くなってしまった。 そんなわけ…
規模が半分以下に。が、あまり気は抜けない。
フリージャズが演奏できるようになりたい。 ここで無責任に「簡単じゃん」と言ってしまえるキッズには「是非とも3年ROMれ」とか思うが。 最近思うが、フリーで一番大変なのはベースだと思う。いかにスピード感をキープしつつ、かつコード感を見せないかとい…
それほど早起きはしてないつもりなのにな。夜更しも以前ほどしてないし。 多分、睡眠が深くなれば大丈夫だと思う。
ワイン飲みたいな。 さて、残りの大きな山は…、あと1個か?
うーん、やっぱり手厳しいことが書いてある。が、今まで手厳しいことすら言ってもらえる環境になかったし、こうした人からこんなに懇切丁寧に言ってもらえる機会はないので、大切にしなくては。
こころposted with amazlet on 07.03.17夏目 漱石 新潮社 (1952/02)売り上げランキング: 3178おすすめ度の平均: 時代は変わっても、そうは人間変わらない この100年で、人間は少しでも進歩したのだろうか 生きている間に絶対一度は読んだほうがいいAmazon.co…