letter

『ゲーデル、エッシャー、バッハ―あるいは不思議の環』に出てきた Q数 というのを SERIES で生成してみた。Q数というのは n>2のときQ(n)=Q(n-Q(n-1))+Q(n-Q(n-2)),Q(1)=Q(2)=1 で、規則的に生成しているけど順番に増加せず増えたり減...

Common Music をいじってみた。Common Music とは "an object-oriented music composition environment". 他には OpenMusic というのもある。Common Lisp は Mus...

もう無理だよ。

ほんとに仕事やめたくなった。

( in-package :maxima ) #| $plot2d に trace(C-c C-t) をかけておき、 plot2d(x^2, [x, -5, 5]); を実行すると こんな引数で呼ばれるのが分かる。 0: ($PLOT2D ((MEXPT SIMP) $X ...

~/.sbclrc に次を追加した。 ( defun maxima () "Maxima を起動する。" ( let ((*default-pathname-defaults* (translate-logical-pathna...

いわたさんよりコメント をいただいたので、やってみた。 参考サイト http://dencha.ojaru.jp/programs_07/pg_graphic_09a1.html ありがとうございます。 ( defparameter *r* 39 "半径"...