今年はなるべく日本語で書かれた書籍を買わないようにする。ここ最近本を買わないようにしているとは思う物の、ここ数年買ったは良いが積ん読になって、やっぱり読まないから処分というループに入っていることが非常に多い。基本的に資料系のものや参考書はしかたないにしても、整理していきたいところ。

白物家電の寿命サイクルに突入しているので、昨年の冷蔵庫に引き続き、今年は洗濯機を見直す必要がありそう。最近めちゃくちゃ恐ろしい音が出るときがあるので、寿命はぼちぼちであろう。できればシャツ類の洗濯を自宅でしたいので、ダメージが少ないものを選択して、可能であればアイロンかけスキルを手に入れたい。

写真撮影について、昨年はとても写真を撮る気分でなかったことと、春先から秋口までそもそも落ち着かない生活だったこともあり、活動に手が着かなかった。今年はなんとか活動していきたい。というものの、コンスタントに撮影する被写体を見いださねばという大きな問題が目の前にある。花と都市風景・夜景だけでモチベーションを維持できないので、いろいろ思案中。布石は打ったのだが、どうなるか。昨年も実は布石を打ったのだが、うやむやになって撮影する気力自身が無くなった・・・こんなに写真を撮るまでがきついとはなかなか思わなかった。ほんの6年ちょっと前までには考えられなかったな。まあがんばって行きましょう。

今年は気合い入れて勉強しようと思っている。何をと言われれば僕の場合はもうアレしかないし、分かる人には分かるので詳しく書かない。まあいろいろ逃げ道なくなっているので。書籍を買わないようにするという目的もこれの一環であるが・・・いろいろ莫大なモチベーションをもって事にあたらないとダメだなという話ではあるので、ダイエットがなんとかなったんだからなんとかなると信じてひたすらがんばる。毎日3時間～4時間くらいをどう稼ぐかが大きな勝負であると思うが、通勤を巧く使っていく。

ということで、分かるような分からないような目標を立てた。とりあえずゆるゆるやっていこうと思う。みなさま、今年もよろしく。

大学時代からUnix文化に接して暮らしてきたせいか、基本的にGNU Emacsをメインのメールやプログラムを書く環境に用いている。そのためWindowsでもWindows版 GNU Emacsの1つであるMeadowを使ってきた。Meadow自体は日本語の特殊環境を踏まえていることもあって、Windowsの上では非常に使いやすいのだが、GNU Emacs 21.4から派生したMeadow 2.10から長らくメジャーバージョンアップもされず、他の環境で用いているバージョンとの乖離が大きくなってしまって、だんだんと疎遠になってしまった。最近Windowsでもちょっとしたプログラム書きとしてのRubyのスクリプトを書くにも、関数型言語のお勉強としてSchemeの実装の一つGaucheやHaskell Plathomeが使いやすくなってきたので、急にEmacsの需要が出てきたというわけである。

;;;
;; Global Setting
;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
;;; 日本語設定
;;;

;; 文字コード
(set-language-environment "Japanese")
(prefer-coding-system 'utf-8-unix)
(set-default-coding-systems 'utf-8-unix)
(setq file-name-coding-system 'sjis)
(setq locale-coding-system 'utf-8)
;(set-keyboard-coding-system 'japanese-shift-jis)

;; Input Method
(setq default-input-method "W32-IME")
(w32-ime-initialize)

;; バックアップを残さない
(setq make-backup-files nil)
;; ビープ音,画面フラッシュなし
(setq ring-bell-function 'ignore)
;; ファイル末の改行がなければ追加
(setq require-final-newline t)

;;; 表示関係
;; スタートアップ非表示
(setq inhibit-startup-screen t)
;; メニューバー，ツールバーの非表示
;(menu-bar-mode nil)
;; ツールバー非表示
(tool-bar-mode 0)
;; スクロールバーを右側に表示
(set-scroll-bar-mode 'right)
;; ファイルのフルパスをタイトルバーに表示
(setq frame-title-format
      (format "%%f - Emacs@%s" (system-name)))
;; 行番号表示
(global-linum-mode)
;; 列番号表示
(column-number-mode t)
;; 時計表示
;; 日時・時刻のフォーマット指定 (yyyy/mm/dd(day) hh:mm)
(setq display-time-string-forms
      '((format "%s/%s/%s(%s) %s:%s"
		year month day dayname
		24-hours minutes
		)))
(display-time)

;; 最近使ったファイルをメニューに表示
(recentf-mode 1)
(setq recentf-max-menu-items 10)
(setq recentf-max-saved-items 10)

;;; load-path関係

;; load-pathの追加関数
(defun add-to-load-path (&rest paths)
  (let (path)
    (dolist (path paths paths)
      (let ((default-directory (expand-file-name (concat user-emacs-directory path))))
        (add-to-list 'load-path default-directory)
        (if (fboundp 'normal-top-level-add-subdirs-to-load-path)
            (normal-top-level-add-subdirs-to-load-path))))))

;; load-pathに追加するフォルダ
(add-to-load-path "elisp")

;;; 日本語フォント設定
;;; http://u.hoso.net/2011/01/standard-fontset.html
(defun my-setup-fontset ()
  "fontset-standard を使ったフォント設定"
  (interactive)
  ;; fontset-standard
  (dolist (target '(japanese-jisx0208
                    japanese-jisx0208-1978
                    japanese-jisx0212
                    japanese-jisx0213-1
                    japanese-jisx0213-2
                    japanese-jisx0213.2004-1
                    ;;katakana-jisx0201
                    ;;latin-jisx0201
                    ;;mule-unicode-0100-24ff
                    ;;mule-unicode-2500-33ff
                    ;;mule-unicode-e000-ffff
                    ))
    (set-fontset-font "fontset-standard" target "MS Gothic"))
  (dolist (target '(latin-iso8859-1
                    latin-iso8859-2
                    latin-iso8859-3
                    latin-iso8859-4
                    cyrillic-iso8859-5
                    greek-iso8859-7))
    (set-fontset-font "fontset-standard" target "Consolas"))
  (set-fontset-font "fontset-standard" 'ascii "Consolas 10")
  ;; modify fontset-default for fallback
  (set-fontset-font t nil "Arial Unicode MS")
  ;; Use the predefined fontset "fontset-standard"
  (set-face-font 'default "fontset-standard"))
(my-setup-fontset)
(add-to-list 'default-frame-alist '(font . "fontset-standard"))

;;; 括弧と選択領域
;; 括弧の範囲内を強調表示
(setq show-paren-delay 0)
(show-paren-mode t)
(setq show-paren-style 'expression)
;; 括弧の範囲色
(set-face-background 'show-paren-match-face "#A88")
;; 選択領域の色
(set-face-background 'region "#AAA")

;;; デフォルトのフレームサイズ，背景色の変更
(setq default-frame-alist
      (append
       '((set-background-color "LemonChiffon")
	 (set-foreground-color "black")
	 (top . 0)
	 (left . 0)
	 (width . 120)
	 (height . 40))
       default-frame-alist))

;;;; C-hをバックスペース
(global-set-key "\C-h" 'backward-delete-char)

さて本題。自慢にも何にもならないが、僕は割と体力がないというか病気がちにもかかわらず、大学生以来不健康な生活を営んできた。それは毎日3時に寝て7時に起きるとか言う睡眠時間の短さだったり、ジャンクフードの摂取が多めだったり、外食に恐ろしく依存していたり、片付けはするものの掃除はあまりまめじゃなかったり・・・ 思い出すだけでなんと言ったらいいものか。さすがに20年近く一人で生活していると、いろんな事の管理が緩くなって、いろんな事に弊害が出てくるのである。

こうして住環境はかなり改善されたのであるが、次の問題に気がついた。このBlogの過去のエントリからも分かるように、僕はよく花の写真を撮りに行く。花の写真というのは接写がメインの撮影である。花の丈はコスモスやポピーや菜の花や百合のような高いものはあるのだが、ほとんどは膝の高さよりも低いものが多く、地上10cm未満のものも非常に多い。そう言う被写体はしゃがみ込んで撮影するが、ここ20年の不摂生が災いして、近年非常につらく感じることが多くなった。簡単に言えば太ってお腹の肉が邪魔になったのである。(笑) 最近3年はそんなに太った訳ではないが、よく考えるとユニクロのズボンなんかも残りのサイズがほとんど無くなってきているので、非常にまずい事態であると認識したのが、昨年末のことであった。実際のところ学生時代のベスト体重から24kgくらい太っているわけだから間違いはない。これはこれまでの不摂生が悪いに違いないと言うことを悟り、生活習慣の見直しを抜本的に行うこととした。

まず今年の正月にオムロンの体組成計を購入して、体重と体脂肪率とBMI、あとこの体組成計が出力するデータをすべて記録してExcelでトレンド管理をするようにした。僕もエンジニアの端くれなので、なにもかも定量化とそのあとの傾向管理がまず第一である。

オムロン 体重体組成計 Karada Scan701 HBF-701

posted with amazlet at 10.06.07

オムロン (2008-09-01)
売り上げランキング: 169

Amazon.co.jp で詳細を見る

この体組成計を実際に使ってみての感想であるが、体脂肪率の計測値には結構大きな誤差があるように思われる。(おそらく数%。計測原理から考えてまあ妥当な数字ではある。) 体重の計測精度は100g単位出るのでおおむね不満はない。僕は毎朝朝食を取る前に計測するようにしている。ちなみに現在でも帰宅時のほうが体脂肪率が3％程度少ない。起床するとおおむね元に戻る。

あと年始から始めたのはもう一つあり、岡田 斗司夫氏の著書「いつまでもデブと思うなよ 」で有名な「レコーディングダイエット」である。方法論は本を読んだ方が早いだろうから、解説はしない。本に書かれているとおり方法を示してもたぶん意味ないので。僕の場合は3月まではただのレコーディングのみ、4月から若干のカロリー制限を科している。おおむね現在の基礎代謝量と理想体重の基礎代謝量の間あたりを狙った数字にしている。実際のカロリー計算はカロリー表示のあるものしか食べないことにして結構ザルにやっているが、とくにたいした話ではなく、朝を軽め、昼は社食で栄養のバランスを考えてがっつり食べる、夜は魚をメインにした定食としている。いずれもご飯は少なめの茶碗にして全部は食べない。あと間食はお菓子はもちろんジュース類もすべて取らなくなり、お茶か水かヘルシアウォータなどをトータルで1日1.5リットルくらい飲んでいる。こんな感じでお腹はいっぱいになるし、そんなに無理をした食生活にしているわけではないが余裕カロリー制限分を達成して日々暮らしていけているようだ。(まあ栄養の相談した方が良いかもしれないと思うけど。そのうち今の運動強度から見て1800～2000kcalくらいで維持できるようにする必要はあるな。)

いつまでもデブと思うなよ (新潮新書)

posted with amazlet at 10.06.07

岡田 斗司夫
新潮社
売り上げランキング: 1322

Amazon.co.jp で詳細を見る

実際の効果は現状で年初よりも20kg程度の減量が達成できており、体脂肪率も8％程度は減少した。BMIも22ちょっとになったし、体脂肪率的に見ても肥満からは脱しつつある。実際のところ、間食をほぼ取らず、おかずばかり食べて、ご飯がいまいち好きではなかった高校生の頃を思えば、確かにそう言う生活に戻せば太らない。

一応方法論としてはダイエット手法を用いたが、本題は生活習慣の改善であってダイエットではない。目標の体重に到達したらおしまいなのではなく、目標の体重を無意識でコントロールできるような食生活を自然に保つことが目標である。つまり一生続くこれはなかなか面倒な戦いなのである。ちょっと絶食するとか、ハードな運動をするとか、続きもしないことを闇雲にやってもだめなのである。結局のところ太らないようにするには必要以上に食べないに尽きるようだ。ただこれまで半年の様子を見ているとそんなに難しいことではないと思われる。この生活を初めて食べると言うことを本当によく考えるようになった。無意識にぱくぱく食べるのではなく、おいしいものを必要なだけじっくり贅沢に食べる方向に変わったのである。最近ようやく満腹になる前に箸を置けるようになってきたのでもう一歩である。もはや外食のほとんどを残さず食べるのは不可能だし残すことに何の罪悪感も感じることはなくなったが、本来自分の量にあわないものを残さず食べるということが、太る原因なのであろう。正確に言えば、外食では出てくるものの量が多すぎるのである。

あとすごく無理して痩せたわけではないが、それなりに急速に痩せたので、気がついたことを書いておく。

まず体重や体脂肪率、ウェストサイズは連動してリニアには減らない。タイムラグがあって、ある日不連続に下がる。あと体重が減って体脂肪率が減るにも若干のタイムラグがあるし、ウェストサイズなども更に遅れて効果が現れる。夏までに何kg落とすとかいう即効性のあるダイエットではないことは確かである。(でも1週で800gくらい落ちるのが3ヶ月くらい続いた。最近は3週ほど停滞して、ようやくまた体重が落ちだした。)

ユニクロのLサイズとXLサイズの違いは丈のサイズではなく横幅のサイズの差である。むろん首周りのサイズも違うので人によってはXLが必須という場合もあろうが、僕の場合は痩せて首周りも細くなったので、すっかりXLサイズからLサイズになった。これまで僕が得た太ることに関するもっとも基本的な法則は、「服のサイズまで太る」である。服のサイズを無頓着に扱い、いつもゆるい服を買う習慣に陥ると、どんどん太る。ウェストサイズも4インチくらいサイズ変わったし。はけないジーンズがここ半年で結構な量になった。僕はこの太る法則を服屋の陰謀と言っていたが、要は自分の服のサイズはちゃんと覚えるべきなのである。ついでに頭の大きさとか、靴のサイズ(主に横幅)とかが変わる。(ここは逆の課程で気がつかなかった。) 結局自分の食べる量、運動する量、体重などの情報、服のサイズ等々、己を知らねば敵にやられるだけなのであると思った半年であった。

まだこの生活習慣改善は道半ばであるが、さすがに20kgも痩せるといろんな事をやりたくなってきた。よく考えると20kgという数字はやばい大きさである。1.5リットルのペットボトル1ダース以上なのだから。毎日7kmくらい(1万歩ちょい)を歩くのは苦でもなくなったし、最近の週末は外に出かけまくりである。で、あと驚いたことになにかと体を動かしたいのである。ここまで運動もろくにしてこなかったのであるが、若干筋肉を多くして基礎代謝を上げて、食べる量を増やし、もう少し楽にいろんな管理が出来るようにしておくのも悪くはないと思っている。ここまで長文を書いたので、残りは次のエントリーに続く。