VBAを触り始めて6年目なわけだが、未だにSetの使い方をよく知らなかったので（つまるところオブジェクトというものをちゃんと理解していなかったわけだが）少なくともとSetの使い方をRangeを用いて調べてみた。 今までは何となくRangeオブジェクトを使うとき…

さて、「VisalBasicで一対比較アンケートを作ってみた。（紹介編）」の解説編です。とは言いましても、このプログラムの肝は 外部のtxtファイルをもとに評価項目数を自動で計算し、 その提示順番をランダムに並び替えて提示する。 の2つだと思いますから、そ…

後輩の依頼があったということもあり、今後も自分が使う機会は大いにあるしということもありで、VisualBasicで一対比較アンケートを作ってみました。項目を変えるたびにプログラムを書き換えるのは面倒ですから、外部のtxtファイルを書きかるだけで十分な仕…

などというタイトルを書いてしまったが、要ははてなダイアリーの詳細デザイン設定でCSSを書きますという、ただそれだけです。自分がCSSド素人だったので、同じCSSド素人の人がサクッと設定できるように、コードを書いておきます。これだけです： img[class="…

plot()で点の個数が20000弱の散布図を描いて出力しようとしたらとんでもなく時間がかかる。というか相当しばらく放置していないと出力が終わらない。どれくらいかかるのかと思ってネットで調べてみても誰も調べてなさそうなので、僕が調べることにした。 ま…

plot()をはじめとするグラフ描画では2つ以上のグラフを重ねて描く方法としてholdという機能がある。 x=linspace(0,2*pi,100); y1=sin(x); y2=cos(x); plot(x,y1); plot(x,y2); と書くと、最初に描いたsinのグラフは後から描いたcosのグラフに上書きされてし…

Octaveにはfind()という関数がある。find()の基本的な構造は IDX=find(X) であるが、ここでXもIDXも一般的にはベクトルと思ってくれてよい*1。この関数の役割はこうだ： find()関数はXの中から0でない要素の位置をIDXで返す。 例えばX=[1,0,2,0,3,4,0,5]とす…

Octave上で複数のグラフを1つの図の中に入れるには、subplot()を以下のように使えばよい。 x=[0:0.01:2*pi]; y1=[x(:),sin(x(:))]; y2=[x(:),cos(x(:))]; subplot(2,1,1); plot(y1(:,1),y1(:,2)); subplot(2,1,2); plot(y2(:,1),y2(:,2)); この下のグラフを…