memo-space

札幌市営地下鉄について考える SQL

2006-03-21
pgsql

札幌の地下鉄東西線新札幌方面からさっぽろ駅又は南北線麻生方面へ通勤している人は共感してくれるのではないかというネタ。

ちょっと遅い時間帯に帰宅時するとき非常に腹が立つのは、大通り駅での乗り継ぎのタイミングが、どの列車のやたらとシビアなのだ。なので、南北線真駒内方面から東西線新札幌方面へ乗り継ぐ人時に大通り駅の中を走っている人をよく見かける。 (また走ると大抵間に合ってしまうところが腹立たしい)。

で、実際どの程度シビアなのかを調べてみた。まあ SQL なんか使わなくてもいいんだけどネタとして。

札幌市営地下鉄のサイトから時刻表をとってくる。PDF なんだけどこれから大通り駅の時刻表をコピペしてテキストにする。平日と休日の時刻表が左右に並んじゃってるけど、休日分は手で削除してこんなデータができる。

6 10 20 30 41 51 58
7 5 12 20 27 34 41 45 49 53 56
...

で、時刻っぽくするために perl で処理。

$ perl -ane '$h = shift @F; print "$h:$_\n" foreach (@F)' sn_s.txt > sn_s.data
$ cat sn_s.data
6:10
6:20
6:30
6:41

ちなみに sn_s は南北線の南方面行き。あとはこれを PostgreSQL にいれる。

ishida=# create table sn_s (t time primary key);
NOTICE:  CREATE TABLE / PRIMARY KEY will create implicit index "sn_s_pkey" for t
able "sn_s"
CREATE TABLE
ishida=# \copy sn_s from 'sn_s.data'
\.
ishida=# SELECT * from sn_s;
    t     
----------
 06:10:00
 06:20:00
...

ew_e (東西線東方面) も同様に処理して、さて、求めるべきは、「南北線南方面行きの各時刻に対して、それより大きい東西線東方面行きの時刻の中で最小のものとその差」だ。例を 2 つ挙げておこう。大抵の人は前者の方が好きなんじゃないかな。

例1)
SELECT sn_s.t
     , (SELECT min(t) - sn_s.t
          FROM ew_e WHERE t > sn_s.t)
       FROM sn_s;

例2)
SELECT sn_s.t
     , min(ew_e.t) - sn_s.t
  FROM sn_s
       JOIN ew_e ON (sn_s.t < ew_e.t)
 GROUP BY 1;

結果、やはり 20 時以降はやたらと 1 分乗り継ぎが多い。調子にのって平均値を出してみる。

例1)
SELECT date_part('hour', t)
     , avg(t_diff)
  FROM (SELECT sn_s.t
             , (SELECT min(t) - sn_s.t
                  FROM ew_e WHERE t > sn_s.t) AS t_diff
          FROM sn_s) AS t_sub
 GROUP BY 1
 ORDER BY 1;

例2)
SELECT date_part('hour', t)
     , avg(t_diff)
  FROM (SELECT sn_s.t
             , min(ew_e.t) - sn_s.t AS t_diff
          FROM sn_s
               JOIN ew_e ON (sn_s.t < ew_e.t)
         GROUP BY 1) AS t_sub
  GROUP BY 1
  ORDER BY 1;

結果

 date_part |       avg
-----------+-----------------
         0 | 00:05:30
         6 | 00:04:40
         7 | 00:03:48
         8 | 00:02:07.058824
         9 | 00:03:15
        10 | 00:04:06
        11 | 00:03:40
        12 | 00:05:36
        13 | 00:01:46.666667
        14 | 00:03:46.666667
        15 | 00:06:00
        16 | 00:02:26.666667
        17 | 00:02:32.727273
        18 | 00:02:16.363636
        19 | 00:02:45
        20 | 00:02:00
        21 | 00:02:45
        22 | 00:02:45
        23 | 00:03:30
(19 rows)

13 時が一番シビアだということが判明。でも 20 時以降は 8 分とか 9 分とかあるにもかかわらずこの平均値だもんなぁ。同じことを東西線宮の沢方面(西方面)についてやってみる。

 date_part |       avg       
-----------+-----------------
         0 | 00:08:30
         6 | 00:05:50
         7 | 00:02:12
         8 | 00:02:00
         9 | 00:03:30
        10 | 00:03:00
        11 | 00:04:20
        12 | 00:02:24
        13 | 00:04:26.666667
        14 | 00:05:13.333333
        15 | 00:02:36
        16 | 00:04:13.333333
        17 | 00:02:54.545455
        18 | 00:03:54.545455
        19 | 00:04:50
        20 | 00:04:34.285714
        21 | 00:04:30
        22 | 00:04:30
        23 | 00:05:20
(19 rows)

やっぱ反対方向の方が余裕あるような気がする。

WriteBacks: 0

Wikipediaで知る北海道弁

2006-03-20
misc

北海道方言(Wikipedia)

大方の人は、自分の話す言葉が、共通語アクセント（東京式アクセント）であると位置づけているが、実際には独特の「北海道式アクセント」とも言えるものが存在している。

なんかイヤな言い方だな。まあ僕が神奈川あたりに住んでいたころは、北海道に住む兄と電話で話しながら「こいつ訛ってんな」と思ったりもしたがw。確かに、「アクセント・イントネーションなど」の部分は、そんな気もするというところもある。

でもさぁー

主に札幌市で、住所の地番を示す「南○条西△丁目」などの「西（にし）」で、「に」が高い独特のアクセントが現れることがある。

札幌市の、中心街・駅名・住所としての「大通（おおどおり）」で、語頭の「お」にアクセントを置くことがある。特に札幌市民がそう発音する。

それってたしかに耳に覚えがあるけど、たぶん地下鉄のアナウンスだけだと思うよ。

ところで Wikipedia にはタッチのエントリもあるのね。堀内沙織は無いのか？

WriteBacks: 0

順調です

2006-03-19
misc

というわけで、順調に回復しています。先日まで見えていなかったことを忘れるくらいよく見えています。

手術の当日は、まず脈や血圧などを測ってから五分おきくらいに目薬をさし、それを数十分続けてからいよいよ手術。その直前にまた血圧を測ったんだけど、「緊張してます？」との看護婦さんの問いに「まあ、ちょっと」と答えたものの、血圧は最初と全く同じ。「全然緊張してないですね」と笑われた。まあ初めての手術じゃないし。

今日は日曜日で病院は休みなんだけど、術後の経過を見るのに病院にいってきました。病院は先生一人だけ。普段はわりと淡々としている先生なんだけど、今日はゆっくり話すことができました。

終始笑顔で、僕の経過が順調なことをとても喜んでいる様子が印象的でした。

WriteBacks: 1

メガネメガネ

2006-03-17
misc

右目が白内障で小狼君状態だということは以前にもちょっと書いた。この頃はまだ「目は全く形を認識できないので、焦点を合わせることができない。」とか書いてるけど、今は「今右目開いてる？」と思うぐらいほとんど見えていないので、焦点なんて気にならないくらいだ。

で、手術をすることになった。

手術の後は、目を保護するために当分メガネをかける必要があるらしい。サングラスでも良いとのことだったが、一日中かけなければいけないと思うと厳しい。別に一日中サングラスをしている人に対してどうこう言うつもりはない。しかし仕事中でも、客先でもサングラス、寝る直前までサングラス、朝起きたらサングラスという生活は僕にとっては厳しい。

しかたがないのでメガネを作ることにした。とはいえ、今までメガネなんてかけたことないし、どう選んで良いものかわからん。ちょっと試してみると、あまりの似合わなさに気が遠くなりそうになった。メガネっつーのはもうちょっと人を賢そうに見せるもんじゃなかったっけ？どう見ても犯罪者です。ありがとうございました。

結局店員に適当に選んでもらう。はぁ、、、当分これをかけて生活するのかぁ、、、

WriteBacks: 2

gonzui -> code ブックマークレット

2006-03-14
programming

CODE blog を書いてない人にはまるで関係の無い話。

CODE blog を書く時に gonzui の中のコードを引用するときは、 tDiary の code 引用プラグインを使っている。

CODE blog 利用のてびき

これはなかなか便利なんだけれど、 3 ケタの数字を暗記できないという非常識な短期記憶力を持つ僕にとっては、この code プラグインのタグを書くのがかなりツラい。「432行目から448行目っと、、、」とか思って画面を tDiary に切り替えた瞬間にもう忘れてしまうわけです。

なんで、必死でブックマークレット作ってみました。使い方は、下のアンカーをブックマークツールバーに DnD して、gonzui のソースをマウスで範囲選択した状態でそのブックマークを押す。すると、なんと code タグが JavaScript の winodw.prompt で出てきますw。あ、FireFox 限定です。

CODEtag ← これをブックマークに登録