2024-01-01から1年間の記事一覧

宝くじ

宝くじの公式サイトによると、日本の宝くじは46.7パーセントが当選金として支払われるようになっているそうです。つまり、残り53.3パーセントは別のことに使われるため、購入者のもとには戻ってこないということです(印刷・販売手数料が15.3%、公共事業36.7…

本日の給油(スーパーカブ110プロ/JA07)

給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2023-04-01 14095.9 2.99 156.86 40.80 3.84 2023-07-13 14218.0 2.73 163.00 44.73 3.64 2023-09-25 14380.5 3.60 176.94 45.14 3.92 2023-11-25 14529.5 2.93 162.12 50.85…

音を再生しながら録音する (Lisp Advent Calendar 2024)

はじめに Lisp Advent Calendar 2024の1日目です。昨年同様、初日が空いていたので書いてみました。 さて、今年のはじめごろまでCommon Lispで音を扱うことをいくつか試していたのですが、2月ごろからポール・グレアム『On Lisp』の勉強会に参加して充実した…

ギターのオクターブチューニング

一般的なギターでは、開放弦の撥弦音と12フレットを押さえたときの撥弦音はちょうど1オクターブ違う音になります。ここで、もし1オクターブからずれているときには、「オクターブチューニング」という作業が必要になります。ほとんどのエレキギターのブリッ…

本日の給油(CRF1100Lアフリカツイン/2BL-SD10)

7777 km 給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2023-09-02 5296 19.46 178 16.14 11.03 2023-10-01 5700 18.89 180 21.39 8.42 2024-01-28 6003 18.62 165 16.27 10.14 2024-03-22 6292 14.10 165 20.50 8.05 2024…

SBCLに確保されるメモリ空間

以前のエントリでSBCLの作業メモリ空間を広げるオプションを使いました(線形代数計算ライブラリLLAをWindowsで動かす - 丸井綜研)。具体的には、SBCLの起動時に以下のようにオプション指定してあげると、4096 MBのメモリが確保されます。 #SBCLをじかに使…

本日の給油(CRF1100Lアフリカツイン/2BL-SD10)

給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2023-06-17 4982 16.41 159 25.53 6.23 2023-09-02 5296 19.46 178 16.14 11.03 2023-10-01 5700 18.89 180 21.39 8.42 2024-01-28 6003 18.62 165 16.27 10.14 2024-03-22 6…

PureDataでマルチチャンネル信号を使う

Maxにはちょっと前から(Max 8から?)マルチチャンネルの信号を1本のケーブルで接続できる[mc.???~]というオブジェクトが用意されています。それまでは8チャンネルの信号を接続しようとすると8本のケーブルをつなぐ作業が発生していましたし、パッチの見た…

厄年?

ここ一ヶ月でいろいろなものが故障したり修理が必要になったりしました。まるで厄年みたい。 Watch SE 1(2021年1月購入)は充電が4時間くらいしかもたなくなってしまいました。これまで省電力モードにしてなんとかしのいでいましたが、そろそろ限界です。バ…

本日の給油(スーパーカブ110プロ/JA07)

給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2023-03-02 13973.9 2.60 156.92 48.38 3.24 2023-04-01 14095.9 2.99 156.86 40.80 3.84 2023-07-13 14218.0 2.73 163.00 44.73 3.64 2023-09-25 14380.5 3.60 176.94 45.14…

Windows 11でRoswellとAliveを使う

Common Lispの統合開発環境としてはEmacs上で動くSLIMEがとても具合が良いのですが、Visual Studio Codeを使いたくなるときもあります(Emacsのハードルが高いと思う人には「VSCodeからも使えるよ」と言えるほうがLISPをおすすめしやすい)。そして、VSCode…

平均余命

厚生労働省が生命表を公開してくれています。この中にある「平均余命」は、「今〇〇歳の人が(死亡状況が変化しないと仮定したときに)平均してあと何年生きるか」を表しています。〇〇歳のところを新生児(ゼロ歳)にしたものが、いわゆる「平均寿命」です…

本日の給油(CRF1100Lアフリカツイン/2BL-SD10)

給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2023-04-30 4563 18.22 160 21.84 7.32 2023-06-17 4982 16.41 159 25.53 6.23 2023-09-02 5296 19.46 178 16.14 11.03 2023-10-01 5700 18.89 180 21.39 8.42 2024-01-28 60…

暑いので気象庁のデータで遊んだ

8月になりました。暑い日が続いておりますが、みなさまいかがお過ごしでしょうか。自分が子供のころはこんなに暑くなかった気がする……と思ったので調べてみようと思い立ちました。 気温データは、気象庁のサイトに行くと、各種データ・資料 > 過去の気象デー…

本日の給油(CRF1100Lアフリカツイン/2BL-SD10) & タイヤ交換

給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2023-04-20 4165 10.37 157 17.16 9.15 2023-04-30 4563 18.22 160 21.84 7.32 2023-06-17 4982 16.41 159 25.53 6.23 2023-09-02 5296 19.46 178 16.14 11.03 2023-10-01 57…

軽バン

実際に所有したいわけではないけど、以前からキャンピングカーには興味があるので、こんなショーにも行ったりすることがある。とくに軽キャンパーは、狭小空間でどのように快適に過ごせるようにするのかという工夫が面白いなぁと思っている。 jrva-event.com…

線形代数計算ライブラリLLAをWindowsで動かす

Common Lisp用の線形代数計算ライブラリとしてLLA (Lisp Linear Algebra)というものがあります。 github.com これはBLASやLAPACKをCommon Lispから利用できるようにするラッパーです。高速な行列計算とかが手軽にできるようになります。MacやLinuxでは問題な…

メモ化でフィボナッチ数列計算を高速に

メモ化(メモワイズ)というのは、計算結果をキャッシュしておいて次の計算の時に再利用するという仕組みです。Julia用のメモ化のためのパッケージ (Memoise.jl) が開発されていますが、簡単な実装でフィボナッチ数列の計算がどのくらい速くなるのか試してみ…

本日の給油(スーパーカブ110プロ/JA07)

15000 km 給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2023-02-06 13848.1 3.26 157.06 45.61 3.44 2023-03-02 13973.9 2.60 156.92 48.38 3.24 2023-04-01 14095.9 2.99 156.86 40.80 3.84 2023-07-13 14218.0 2.73 163…

騒音曝露レベルと許容曝露時間の関係

Apple Watchをつけていると、ときどき「90 dBを超えています」というような警告が表示されることがあります。これはWHO(世界保健機関)が以下で推奨している騒音(そうおん)曝露(ばくろ)レベルを超えそうになるときに警告してくれる機能で、音に関係する仕事…

本日の給油(CRF1100Lアフリカツイン/2BL-SD10)

6666 km 給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2023-02-04 3987 16.75 157 15.52 10.12 2023-04-20 4165 10.37 157 17.16 9.15 2023-04-30 4563 18.22 160 21.84 7.32 2023-06-17 4982 16.41 159 25.53 6.23 2023-…

本日の給油(スーパーカブ110プロ/JA07)

www.youtube.com 給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2022-11-05 13699.4 3.21 157.01 47.57 3.30 2023-02-06 13848.1 3.26 157.06 45.61 3.44 2023-03-02 13973.9 2.60 156.92 48.38 3.24 2023-04-01 14095.9 2…

行列の乗算 (Common Lisp)

行列の転置や逆行列の計算については記事を書いたものの、単純な行列の積については記録していませんでしたので、以下にメモしておきます。洗練された高速なアルゴリズムではなく、単純な𝑂(𝑛³)の実装です。 (defun matrix-multiply (A B) "Multiply two matr…

30ヶ月点検・本日の給油(CRF1100Lアフリカツイン/2BL-SD10)

www.youtube.com 給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2022-11-03 3727 17.20 158 18.95 8.34 2023-02-04 3987 16.75 157 15.52 10.12 2023-04-20 4165 10.37 157 17.16 9.15 2023-04-30 4563 18.22 160 21.84 7.…

本日の給油(CRF1100Lアフリカツイン/2BL-SD10)

給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2022-08-27 3401 16.63 157 16.42 9.56 2022-11-03 3727 17.20 158 18.95 8.34 2023-02-04 3987 16.75 157 15.52 10.12 2023-04-20 4165 10.37 157 17.16 9.15 2023-04-30 45…

ランク付けにおける重複なし確認のやりかた

複数個の対象についてランク付けをしてもらいたいことがあります。例えば、6種類のソーダ水をおいしさ順に並べてもらい、ソーダ水どうしのおいしさの差を見るなどが考えられます。今回は、そのデータをとるときに「順位の重複を許さないように判定する方法」…

本日の給油(スーパーカブ110プロ/JA07)

給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2022-08-31 13546.7 2.92 156.16 48.53 3.22 2022-11-05 13699.4 3.21 157.01 47.57 3.30 2023-02-06 13848.1 3.26 157.06 45.61 3.44 2023-03-02 13973.9 2.60 156.92 48.38…

信号の包絡線を計算する (Common Lisp)

信号の包絡線 (signal envelope) は「信号の頂点にシーツをかぶせたときのような概形」を持つ波形です。 MatlabやRで書いた信号包絡線の計算プログラムをCommon Lispに移植しました。信号包絡線の計算方法は振幅の絶対値に対して、(1)低域フィルタをかける、…

Aseprite買った

以前から欲しいと思っていたAsepriteというドット絵作成ツールが半額になっていたので、思わず購入してしまった。半額セールはたぶん2月13日まで。 www.aseprite.org で、初めて描いてみたのが以下の絵。16×16ピクセルのBrüel & Kjær Type 4128-Cさんを想像…

本日の給油(スーパーカブ110プロ/JA07)

給油日 オドメーター (km) 給油量 (L) 単価 (円/L) 燃費 (km/L) 距離単価 (円/km) 2022-07-27 13405.0 2.21 157.92 57.29 2.76 2022-08-31 13546.7 2.92 156.16 48.53 3.22 2022-11-05 13699.4 3.21 157.01 47.57 3.30 2023-02-06 13848.1 3.26 157.06 45.61…