monolog

半分以上が @mactkg によって成り立っている田町アドベントカレンダーの14日目です。昨日(13日目)はかんみさん(@kanm_in)のあゝ我が青春の田町よ或いは田町アドベントカレンダー13日目でした。校内無線LANの実情など、なかなか知る事のできない話はとても興味深かったです。

さて自分ですが、プログラミング関連の技術書はなかなか高いということもあり、最近いくつか図書館を巡っています。そこで、田町駅から近く、今後お世話になるであろう港区立三田図書館を紹介します。

三田図書館

田町駅から三田口(西口)方面のデッキを進むと徒歩3分丁度でした。素晴らしい。

自分は港区民ではないですが、もちろん港区内に通学, 通勤していればカードが作れます。身分の証明出来るものさえあれば、用紙1枚を書くだけでものの5分程度でカードが作れてしまいました。

港区図書館カード

カードのラッコ？がちょっと可愛い

中を色々周っていて驚いたのが、週刊アスキーとかの普通の週刊誌が結構あったということ。雑誌の購読数がとても多く、190誌ほどの雑誌がありました。すごい！

三田図書館自体にはあまり専門書がありませんでしたが、港区内で検索してみると色々とお目当ての本が見つかったので、予約などで活用してみてはどうでしょう。

そういえば、田町アドベントカレンダー10日目:三田製麺所を見て美味しそうだなーと思い、自分もつけ麺を食べに行って来ました。平日の昼間に行きましたが、1分も待たずに入れました。中は3階まであるようで、かなり賑わっているようです。

三田製麺所のつけ麺大盛り(400g) 700円

例に漏れず端が切れました。自分も大盛りを食べたのですが、400gはかなり量があると感じました。中(300g)や並(200g)でも全然足りるんじゃないでしょうかっ

内容が薄くなってしまいましたが、田町アドベントカレンダー14日目は @kyonfueeがお送りしました。

~~明日は多分 @mactkg 先輩です。~~@altcolonyさんの田町アドベントカレンダー15日目:東京チカラめし in 田町でした！残り10日強、頑張ってください！ではではっ

半分以上が @mactkg によって成り立っている田町アドベントカレンダーの14日目です。昨日(13日目)[…]

Raspberry Piを買ったり

2012-12-11 23:08

雑記 Raspberry Pi

最近、巷で話題のRaspberry Piというものを買いました。簡単にいえば約3000円のクレジットカードサイズのPCだそうです。

日本からだと下のリンクから買えるそうです。

http://jp.rs-online.com/web/p/products/7568308/? 今回は @mactkg 先輩が送料無料にするべく購入者を集めていたので便乗させて頂きました。

CPUがARMアーキテクチャなのでどんなOSでも動くわけではないですが、公式ではDebianとArchが公開されてました。他にもFreeBSDや、Androidも動くらしい！とりあえず幾つかのサイトを参考にして(友人のステマが激しい)Arch Linuxを導入してみました。 Raspberry Pi | Arch Linux ARM ArchLinux Install Guide - eLinux.org

ケーブルを接続してみた。画面出力はHDMIとコンポジットがありますが、HDMIが使えるモニタがなかったのでコンポジットに。コンポジットが使えるモニタもないのですが、何故かGV-USBがあったのでそれでPCに取り込むことに。SSHでもいいみたい。

電源はMicroUSB端子です。700mAらしいので普通のPCだと足りないかも……？ACアダプタを買った方がいいかもしれません。僕はMacBook AirのUSB端子で試しましたが、確かMBAは1A出せたはずなので普通に使えました。電源ケーブルを差し込むと勝手に電源が入ります。

Arch Linuxでは初期状態でID:root, PASS:rootらしいのでログインして、キーボード配列を日本語配列に。


$ loadkeys jp106

次回起動時に自動的に読み込まれるよう/etc/rc.confにこんな感じで(なかったら作成する KEYMAP="jp106" あとはパーティションの設定をして、普通に使うのみ？(本当はスワップとか設定するべきところなんだろうけども…… Arc Linux で SD Card の余り領域を使えるようにする - Debian GNU/Linux 3.1 on PowerMac G4

とりあえずここまでです。Rubyが普通に動いたので何か出来たら面白いなぁ……と

最近、巷で話題のRaspberry Piというものを買いました。簡単にいえば約3000円のクレジットカードサ[…]

DigitalArts プログラミングコンテスト2012に参加しました!

2012-11-24 21:47

Programming プログラミングコンテスト

タイトルの通りです。 DigitalArts Programming Contest 2012 なんとかA, B問題を解くことが出来ました。流れはこんな感じ。

http://twitter.com/kyonfuee/status/272311520388591616

長いでんがな…… C問題は解けなかったです。時間足らず。

今回は初のRubyで挑戦してみました。getsとsplitとchompでどうにかなりそう？とか思いつつ、ARCで他人のRuby解答を見よう見まねでやってました。

提出コード

A - C-Filter見た瞬間に正規表現で解けそうだと思ったのでそのまんま。 /aaa/だと"aaaa"にマッチしてしまうので、/^aaa$/にするようにして解決

#!/usr/bin/ruby -Ku
input = gets.split

ng = []
num = gets.to_i
num.times { ng < < gets.chomp }

ng.map!{|v| v = Regexp.new("^" + v.gsub("*", ".") + "$")}
ng.each{|n| input.map!{|i| i =~ n ? i = "*" * i.length : i}}

input.length.times.each {|n| print input[n]; print " " if n != input.length}
puts

298Bytes(提出時から若干変更あり)

B - Password 最初は簡潔なコードにして書いていたつもりが、前述の通りひたすらにA問題に提出してWAを返されていたので焦りながら修正していたらこんなありさまに… でも最後のこのコードしか通らなかったり。本当に良く分からないミラクル。 Rubyではchar ⇒ intは "a".ord, int => charは 96.chr みたいにやるらしい。へえというのを利用して、後は普通のC言語でやるような感じで解いた。

後半のif out == input 以降が若干キモ？のようです。入力が"b"の時に"aa"を返したり、"zz"のときに"yza"を返すようにしてます。

#!/usr/bin/ruby -Ku

hash = 0
input = gets.chomp
input.each_char {|s| hash += s.ord - 96}

if hash == 520 || hash == 1 #a, zzzzzzzzzzzzzzzzzzzz
  puts "NO"
  exit
end

out = ""
out += "z" * (hash / 26)
out += ((hash % 26) + 96).chr unless (hash % 26) == 0

if out == input
  if hash < 26
    out = "a"
    out += (hash - 1 + 96).chr
  else
    out = "y"
    hash -= 25
    out += "z" * (hash / 26)
    out += ((hash % 26) + 96).chr unless (hash % 26) == 0
  end
end

puts out

484Bytes

総評

もう少し落ち着いたほうがいいと思う(4度の提出ミスに対して後はC言語みたいなコンパイラ言語が書けなくなってるくさいので、またそっちも書かないといけないような…… そういえばJOI予選も控えてますし…(PCKはあと1問が5分という所で予選落ち)

そして結構謎なのが、表彰式(1問以上解いたら参加出来る)の開始が12/3(月)の16時からということ。平日の16時とか参加出来る人が限られそうです……

かくいう僕も地理的には近いけれども時間的に無理ゲなので遅刻の旨を伝えた上で良さげなら参加します。

(どうでも)いいこと

12/22 プログラミング生放送勉強会第19回＠品川参加受付中！ #pronama « プログラミング生放送参加するよ！第12回日本情報オリンピック予選参加しますよ！

以上

タイトルの通りです。 DigitalArts Programming Contest 2012 なんとかA, […]

雑記(Superconとかタイとか)

2012-08-27 22:25

雑記 Supercon タイプログラミングコンテスト近況報告

タイに行ってきたり、Supercon本選で心が折れたりと充実した日々を送っております。

本当に少しだけですがメモ程度に。

タイ国際交流

タイは凄かったですね。今までの自分の価値観がすっ飛んだような気分です。流石ほほ笑みの国タイ。(帰国してから知った) 色々な人に助けられて、色々な場所で色々な事が学べたなあ……と。色々書けたら良いのだけど、色々研究施設の見学などもさせて頂いたのでどうなのだろう……？

1週間がとても短く感じたとともに、もっと長く居たいと思いましたね。交換なのでまたすぐに会えるのが楽しみです。

Supercon2012

酷かった……ふえぇ…… タイとは打って変わってなかなかに厳しい毎日でした。大会前から嫌な予感はしていましたが、やはりCUDAプログラムは事前に実践して学んでおくべきでした。 (1位チームはGPU使ってませんでした。何かおかしい) アルゴリズムについては、ほとんど無勉で挑んだのが非常に惜しい。

あまり複数人のチームというところを生かせなかったのと、全体的な事前の練習不足が惜しいところです。せっかく本選に出れたのだから、もう少し頑張れたらなあと……

そういえば上位4チームが使ってた最小費用流アルゴリズム、そういえば大会初日の夜に、プログラミングコンテストチャレンジブックをパラパラとめくっていて目に入ってた気がします。そこで気が付くべきだった…！

まあ直近にパソコン甲子園の予選も控えてますし頑張りたいです。

まあざっとまとめるとこんな感じになります。もう少し書けたらいいなあ…

タイに行ってきたり、Supercon本選で心が折れたりと充実した日々を送っております。本当に少しだけですがメ[…]

Kuinでエラトステネスのふるい

2012-08-27 01:54

Programming Kuin

Kuin0.02が公開されたのでエラトステネスのふるいを使って素数を計算してみた。

Kuin0.02でコンパイル, 動作確認してます。

まだKuin用のシンタックスハイライトがない………

constに関するコンパイルエラー、Kuin0.021で修正されました。くいなちゃんに感謝です。 (2012/8/27 22:55)

{
  エラトステネスのふるい

  Author: きょんたん (@kyonline)
}

func Main()
  const N : int :: 10000000

  var isPrime : []bool :: @new [N]bool
  var Prime : []int :: @new [N]int
  var numPrime : int :: 0

  for i(0, N - 1)
    do isPrime[i] :: true
  end for

  do Prime[0] :: 2
  do numPrime :+ 1

  for i(3, N - 1, 2)
    if (!isPrime[(i - 1) / 2 - 1])
      continue i
    end if

    do isPrime[(i - 1) / 2 - 1] :: false
    do Prime[numPrime] :: i
    do numPrime :+ 1

    do Kuin@Dbg(i.ToStr())

    var j : int :: (i - 1) / 2 - 1 + i
    while (j < N)
      do isPrime[j] :: false
      do j :+ i
    end while

  end for

  do Kuin@Stop()
end func

Kuin0.02が公開されたのでエラトステネスのふるいを使って素数を計算してみた。 Kuin0.02でコンパイ[…]