ppi

ppi <- function(h, v, inch) sqrt(h^2+v^2)/inch > ppi(960,640,3.5) [1] 329.6504 > ppi(1280,720,4.3) [1] 341.536 追記 どういう式なんだろう?って思ってたけど、なるほど、三平方の定理!

Growlで通知するTeratermマクロ作れよ、色々と捗るぞ

例えば超時間のかかるコマンドを実行してて、終わったら通知して欲しい、みたいな。 wait '$' '#' gethostname host sprintf2 cmd '<path to growlnotify> /i:"<path to icon>" "command finished on %s"' host exec cmd表示画面はもっと凝ったことができそうだけど、とりあえず通知してくれさえ</path></path>…

昨日のコード

某グラの某データ - XXXannexあまり表立って公開するのもよろしくない気がしなくもない。 use strict; use warnings; use URI; use Web::Scraper; use List::MoreUtils qw/uniq/; use utf8; binmode STDOUT, ':utf8'; my @table_kw = qw(a ka sa ta na ha ma…

某グラの某データ

最近、声優統計の皆様が色々とすごい解析をされててすごいです。自分も何かせねば・・・ということで、とりあえずデータのクロールでもしておくか、と思ってやってみました。http://seigura.com/senior/directory/tabid/69/Default.aspx声優統計における最初…

Growl for windows はAlt-x と Alt-Shift-x をホットキーに割り当てるのでemacs(xyzzy)ユーザーは注意しましょう

emacsユーザーが大好きなAlt-xキー。私はxyzzyですが、突然Alt-x(M-x)の反応が無くなって焦りました。どうやら原因はGrowl for windowsが自動的にAlt-x と Alt-Shift-xをグローバルなホットキーに割り当ててしまうせいのようです。超余計なお世話。対策とし…

変数を正規表現の中で使いたいけど変数自体に正規表現が入ってる話

こういう話。 use strict; use warnings; use utf8; binmode STDOUT, ':utf8'; my $name = 'アマガミSS+ plus'; my $title = '[アニメ][0642] アマガミSS+ plus 第01話「絢辻詞編 前編 ユウワク」'; print $title =~ /$name.+(\d+)/ ? 'matched' : 'unmatche…

声優言及数における「ブレイク」考察

R

今日は仕事が暇だったのでWebラジオをチェックしたりしてて、それでも暇だったので声優言及数調査の「ブレイク」をどうするかについて考えていました。単純な増加数では元々言及数の多い人の変動が大きく出てしまってブレイクにならないし、かといって増加率…

Encode.pmでエンコードできなかった文字の扱い

例えばこういうの*1。 use strict; use warnings; use Encode; my $utf8str = "あいらとふれあ、コラボっちゃお(ハート)"; Encode::_utf8_off($utf8str); my $sjisstr = encode('cp932', decode('utf8', $utf8str)); print $sjisstr; $ perl a.pl あいらとふ…

どう書く?org : 文字列のセンタリング

original page : http://ja.doukaku.org/87/ 文字列を指定のカラム幅にセンタリング配置する関数を示してください。文字列の長さが指定した幅より長い場合には文字列の両端をできるだけ均等に切り落して指定幅に収めてください。1文字は1カラムに収まるもの…

どう書く?org : 文字列の均等分割

original page : http://ja.doukaku.org/88/ 一行の文字列を指定した数の行にできるだけ文字数が均等になるように分割してください. ただし,除算や剰余算を使わないで書いてみてください. sample = "ゆめよりもはかなき世のなかをなげきわびつゝあかしく…

どう書く?org : 自然数の分割

original page : http://ja.doukaku.org/89/ 自然数nとm(n>=m>0)が与えられたとき,nをm個の非負の整数の和で表すやり方を全て出力してください. その際,和の組(x_1, ..., x_m)は大きい順に出力してください. ここでm = 3の時の「(a, b, c)が(A, B, C)よ…

どう書く?org : URL特殊文字のエスケープ

original page : http://ja.doukaku.org/92/ URL用に特殊な文字をエスケープする。 #4168 original page : http://ja.doukaku.org/comment/4168/ CGIwithRというライブラリーにアンエスケープの関数はあったのですが、 エスケープする関数はないようです。 >…

どう書く?org : 自然数の分割(別表現)

original page : http://ja.doukaku.org/96/ 正整数の分割といったとき,同じ組み合わせのもの同じ分割とみなし, 0 を除いて降順に並べたものを指すことも多いのではないかと思います. たとえば, partitions 1 ⇒ 1 partitions 2 ⇒ [[2],[1,1]] partitions…

どう書く?org : 2進数の記述

original page : http://ja.doukaku.org/98/ コンピューターの原理は2進数だというのに、多くのプログラミング言語で8進数や16進数しか記述できないのは少し変だとは思いませんか? そこで、ソース中に2進数を定数として書く方法、またはその代替手段を考え…

どう書く?org : 最大公約数(除算禁止)

original page : http://ja.doukaku.org/106/ あなたが使っている言語で除算と剰余が使えなくなりました。 以下の条件のもと最大公約数を求めるプログラムを書いてください。 条件 * 除算および剰余の使用禁止 * 加算や乗算から除算・剰余を単純に定義するこ…

どう書く?org : 文字コードの変換

original page : http://ja.doukaku.org/107/ 1.shift-jisで書かれた文字列をeuc-jpの文字列に変換して返す関数を作ってください。 2.shift-jisで書かれたファイルをeuc-jpに変換してファイル出力するしてください。ただし1で作成した関数を利用せずに。 何…

どう書く?org : HTTPでGET その2

original page : http://ja.doukaku.org/113/ HTTPでGET その2 前回のお題 http://ja.doukaku.org/18/ HTTPで指定されたURLをGETするコードを書いてください。 URLは「http://ja.doukaku.org/feeds/comments/」とします。 ただし ・Proxyサーバを経由してGE…

どう書く?org : コマンドライン引数の取得

original page : http://ja.doukaku.org/118/ 以下にけだし同感なので。 inferno :: どう書く?orgは多言語クックブックになれるか > 一般投稿が可になった時に、ちょっと感じてたんですがやっぱり最近ある傾向が顕著で。というのは数学パズル系とか、(数学…

どう書く?org : 除算・余剰を使わずに閏年

original page : http://ja.doukaku.org/124/ ある西暦が閏年か否かを判定するプログラムを書いてください。 ただし、除算・余剰を求める演算子、組み込み関数、ライブラリ関数等を使用してはいけません。 また、閏年は以下のように定義されています。 1. 西…

どう書く?org : ライフゲーム

original page : http://ja.doukaku.org/126/ セルオートマトンに関するお題です. 2次元タイプの'ライフゲーム'を実装して下さい. 初期値としては10行10列程度の格子上の平面に0.3程度の人口(?)密度を考え, 末端はループするようにして下さい. (例: 座標[-1,…

どう書く?org : 総当たり戦の日程作成

original page : http://ja.doukaku.org/149/ 任意の偶数Nのチームの総当たり戦を最短日数(N-1日)で行う場合の日程表を1つ作成してください。 解はひとつではない場合もあります。 もし、余力があれば、全ての可能性も求めてください。 これは、スポーツ…

どう書く?org : 自分自身のファイル名を知る方法

original page : http://ja.doukaku.org/151/ 自分自身のファイル名を知る方法を示してください。 ビルド後のファイルが、hogehoge.exeであれば、 ”hogehoge.exe”が表示されるようなプログラムを書いてください。 スクリプト言語でも同様です。 ファイル名が…

どう書く?org : データの整列

original page : http://ja.doukaku.org/163/ (x, y) の座標情報を以下の2種類の方法で整列する機能を実現してください。 * (x, y) の辞書順(まず x で昇順に整列して、x が同じデータに対して y で昇順に整列する) * (0, 0) からの距離の昇順 データの表現…

どう書く?org : 変数の初期値

original page : http://ja.doukaku.org/167/ WEB+DB 43のRecent Perl Worldを読んで知りました。 変数を初期化するに当たってPerlでは my $var ||= 'foo'; とかきます。この不備を補うためPerlの5.10には Defined-or演算子が実装されたそうです。 $zero //=…

どう書く?org : α置換

original page : http://ja.doukaku.org/171/ 標準入力から与えられたソースコードの変数名 を置換するプログラムを作ってください。 最近はリファクタリングツールなどの普及でこ のような需要は少ないかと思われますが、viな ど貧弱なエディタを使っている…

どう書く?org : METHINKS IT IS A WEASEL

original page : http://ja.doukaku.org/177/ ランダムな文字からMETHINKS IT IS A WEASELを作るプログラムを作れ。 簡単に流れを書いてみます。 1:ランダムな20文字を持つ文字列をもった300個作ります。 2:その文字列が"METHINKSITISAWEASEL"に近…

どう書く?org : 出力の一時停止と再開

original page : http://ja.doukaku.org/179/ 起動すると、標準出力に1秒毎に'a'の1文字を出力し続けるプログラムで、 以下の条件を満たすものを「どう書く?」 * 'q'キーが押されるとプログラムは終了する * 出力中に'p'キーが押されると一時停止する * 一…

どう書く?org : コード中の文字の頻度分析

original page : http://ja.doukaku.org/181/ プログラムコード中の文字の頻度は言語によって相当にばらつきがあると思います。ある言語はピリオドが頻出するとか、別の言語はカッコの頻出頻度が高い、とか。そこで、 * 文字の頻度解析をするプログラムを作…

どう書く?org : ミリ秒まで含んだ時刻文字列

original page : http://ja.doukaku.org/184/ YYYY年mm月dd日HH時MM分SS.xxx秒なら、「YYYYmmddHHMMSS.xxx」のようにミリ秒まで含んだ文字列を返すプログラムを書いてください。 #6522 original page : http://ja.doukaku.org/comment/6522/ > options(digit…

どう書く?org : コメントの削除

original page : http://ja.doukaku.org/185/ ソースコードからコメント部分を削除するプログラム decomment を書いてください. すくなくとも,decomment を記述したのと同じ言語で書かれているソースコードが 扱えるようにしてください. #6553 original p…