d:id:syou6162:20080728で > hoge <- "hogehoge" > (function(){cat(hoge,fill=T)})() hogehoge が動くのが気持ち悪いと書いてある。lambdaも同じだからなぁ、私はこれ気にならないというか、慣れると便利というか、lambdaかわいいよlambdaというか（ぉ私も…

id:syou6162主催のTsukuba.Rに参加してきました。詳細なレポートはid:tor_ozakiさんがなさっているのでそちらを参照するといいと思います。R覚えるとデータ解析楽しそうだし、統計の勉強自体も面白くできそうな感じがぷんぷんして非常によかった。豊富なサン…

(define (nabeatsu) (let ((continue 1) (return #f)) (letrec ((fb (lambda (n) (let ((divisible-by-3? (lambda () (zero? (modulo n 3)))) (has-3? (lambda () (let loop ((init n) (flag #f)) (let ((q (quotient init 10)) (r (modulo init 10))) (if (…

(define (make-circle radius) (let rows ((r 0) (row '())) (if (= r (+ (* 2 radius) 1)) (reverse row) (rows (+ r 1) (cons (let columns ((c 0) (col '())) (if (= c (+ (* 2 radius) 1)) (reverse col) (columns (+ c 1) (cons (if (> (magnitude (mak…

;; クラス定義マクロ (define-syntax class-gen (syntax-rules () ((_ classname ((iv var) ...)) (define (classname) (let* ((iv var) ...) (let ((table `((iv . ,v) ...))) (lambda (m) (cdr (assq m table))))))))) ;; 例：カウンタクラスの作成 (class…

確か最近のCarbon Emacsはダウンロードしてくるとyatexが最初から入っていたと思うけど、そのyatexが実はutf-8対応だったことがC-h v YaTeX-kanji-codeしてみるとわかるのであった。同様にlatex-message-kanji-codeもutf-8対応しているので、いずれもsetqを…

(apply map list '((1 2 3) (4 5 6))) ;=> ((1 4) (2 5) (3 6)) これをみて、行列の転置みたいなことができるのにまず目から鱗が落ちた。 (apply + 1 2 '(3 4 5)) ;=> 15 これはapplyの一般的な使い方だけども、普通に関数をlambdaで定義している時の「常識…

.emacsで、かねてから少し気になっていた文字色などの設定をcolor-theme.elを用いてやってみた。 color-theme.elの概要 (require 'color-theme)する。 「color-theme-なんとか」という名前の関数を定義してその中にスタイルの定義を書く。 テーマを適用する…