http://twitter.com/tsuda/statuses/354642082

VOCALOID2 HATSUNE MIKU出版社/メーカー: クリプトン・フューチャー・メディア発売日: 2007/08/31メディア: CD-ROM購入: 30人 クリック: 4,650回この商品を含むブログ (480件) を見る

移さないかもしれない、わからない http://rubyist.g.hatena.ne.jp/hatecha/

どうにか速さ5倍に。あと23倍。むりだなー #all-expression2-8.rb $x=[] $a=[] def make fnk,kak l=$a.length x="" mae=[0]*(l+3) usi=[0]*(l+3) (l-1).times{|i| po=0; (kak[i]+1).times{|m| while usi[po]>0 po+=1 end po+=1 } po-=1 mae[po]+=1 pot=po+ma…

請求出した人の住所氏名リストは当事者に送られるということか。 用語分からないなら請求すんなよ、なんていう姿勢なら制度自体自滅する。なにかがおかしい、程度で請求してなにか不都合はあるのか。ほかに手立てがないなら。 入り口は広くして、審査の段階…

http://hashimotol.exblog.jp/6613152/ せいぜい「説明」の間違いだろうに、と思っていたら。 釈明って悪い事したことについて釈明するという使い方する。じゃあ懲戒請求っていうのは悪いことで、弁護士会はその悪いことの手続きをわざわざ定めているという…

あy

あゆです 追い詰められた状況がね。ていうかすんごいルール変わったの？興味はないんだけど。 にちゃんねる経由でついでにみたら、畑山ってすごいんだねえ。 同じジャンル（スポーツ？）とは思えない 解説の竹山？も続けて聴くとテンションの違いがありありと…

あゆではないです cc#dd#eff#gg#aa#bcccrc

テストするとき、1,2,3…と時計に合わせて数えている。たいして時間にこだわるようなものを作らないからだけど。みなさんどうしてんすかね。 さすがに面倒なので最低限のを作った。linuxはコマンドあるんでしたっけ。分布も調べる？ こう、統計は日常で役に立…

L16 T122 @1 v8 o4 F8F#8 RF8R F8C#8 R>FD#8< F8F#8 G#F8R F8C#8 R>FD#8<; L16 T122 @4 Q5 v5 o0 >>c<<ccc >>c<<ccc >>c<<ccc >>c<<ccc >>c<<ccc >>c<<ccc >>c<<ccc >>c<<ccc; L16 T122 @1 v8 o4 F8F#8 RF8R F8C#8 R>G#D#8< F8F#8 G#F8R F8C#8 R>G#D#8<; L16 T122 @4 Q5 v5 o0 >>c<<ccc >>c<<ccc >>c<<ccc >>c<<ccc >>c<</ccc></ccc></ccc></ccc></ccc;></ccc></ccc></ccc></ccc></ccc></ccc></ccc>

T100L8 @0 Q10 o5 <e16e16c16r16>bab<c>b>a16</c></e16e16c16r16>

http://golf.shinh.org/p.rb?All+Expressions あとは速さを100倍に・・・ # all-expression2-5.rb $x=[] def g j,i,c a=("0"*c+j.to_s(3))[-c..-1] if(a[i..i]!=nil);a[i..i]=="0" ? "+":a[i..i]=="1" ? "*":"-";else;"-";end end def coun a,m c=0 a.length…

http://golf.shinh.org/p.rb?Expression 遅いのは再帰のせいか配列か。３つめ10秒以上で登録失敗する expression-0.3.rb def ex a,b,l z=[] l.times{|i| if i==b;z+=[a[i]-a[i+1]] elsif i==b+1 else z+=[a[i]] end } z end $y=[] def exp a,l z=[] (l-1).ti…

http://www.ohmynews.co.jp/news/20071002/15704より 烏賀陽氏側の提出した証拠 「オリコンのランキングを上げたいからという理由で、プロダクションが同一商品の大量購入をしていくことは、よくある」 「オリコンへ報告する売上枚数の中にも、予約分が含ま…

http://www.nikkei.co.jp/kansai/news/news000369.html

上の5570119293588440400682589145538707が2^n+1とかになれば短くなるか とまあ、そう都合よくも行かない。何時間も回してみた。まだおわらねえ。cのほうがいいか。でもｃだと・・・ 今年は素数が流行ると思うんだ。素数占い、素数そば、sosuu-note、、、 「…

http://golf.shinh.org/p.rb?Elias+delta+to+Fibonacci なっちファンとしては見逃せません..? fibonaccicoding-4.rb n=1000 def fib num ans=[] a=1;b=1;num.times{|i| ans +=[a];c=b+a;a=b;b=c} ans end $fibo=fib(n) def fibc d 1000.times{|i| fc=$fibo[i…

おそいーどうするんだ。文字表示もまだおかしい。 http://codegolf.com/brainfuck brainfuck-1.1.rb $mmax=30000 buf=" "*$mmax $mmax.times{|i|buf[i]=0} $pos=0 $ibuf="" $gcount=0 $now=0 $mem=buf $stack=[] $sp=0 $debug="-d" def deb d #print d if $#…

http://golf.shinh.org/p.rb?maze+solving maze.rb $z=gets('').split("\n") $y=$z[0].length $x=$z.length def peek(i,j) if i>$x||i<0||j<0||j>$y ;nil else ;$z[i][j..j] end end def poke(i,j,v) $z[i][j..j]=v end def deadnear(i,j) an =[] an+=[i,j-1…

brainf*ckで makeBfPrint.rb a=gets('') len=a.length-1 print "+"*a[0],"." len.times{|i| sa=a[i+1]-a[i] if sa==0;mark="" elsif sa>0;mark="+"*sa else;mark="-"*(-sa) end print mark,"." } 入力 >makeBfPrint makeBfPrint.rb a=gets('') len=a.length-…

（brainf*ckとは 8つの文字だけでプログラムが書ける言語らしいです。とはいえもともと０と１ですね） brainf*ckでp(foo)で文字列出力をするために。 あとは、繰り返しを "[5" のように書ける。"[100" などでもよい bfp1.rb # brainf*ck +put # # ",3.4[5>+6…

http://golf.shinh.org/p.rb?Square+root fedってなんの関数かと思った 2時間かかった、あまり短くない while(a=gets.chomp)do t=a[0..1];u=t[0..0] if(u=="-") a=a[1..10] if(a[0..0]=="0")then puts '-'+format("%.9f",a) else puts"nan" end else if(u=="…

Times Online にyoutube。ＦＮＮ。 FNNの文字はなくJapanese televisionとだけ。 こういうときはyoutube任せなのかという権利的なことは置いておくとして、日本はどうするんでしょう。削除しろというかな。先延ばししてもうやむやなまま使われる。それでも多…

http://b.hatena.ne.jp/entry/http://jp.youtube.com/watch?v=-La_JqPMqaU

http://www.asahi.com/national/update/0921/TKY200709210236.html 最初からそういう構成でメンバー選んでるのに、「大勢となった」などと。ウィット？ それはそうと、ご報告そのまま記事にするだけというのもどうなのか。朝日の意見は？

lineuniq.rb i=[] while li = gets i.push(li.chomp) end puts i.uniq http://golf.shinh.org/p.rb?delete+duplicate+lines Ruby_ Rank User Size Time Date Statistics 1 usa 12 0.1568 07/03/07 23:34:51 0B / 4B / 8B 2 eban 12 0.1288 07/03/07 23:41:34…

Haskellで。 words.hs main = do cs 似たものをRubyで。 words.rb p ARGV.shift.split(/\s+/).length あるいは def words(bun) bun.split(/\s+/).length end p words(ARGV.shift) 似たものをPythonで。 words.py import sys def word(bun): return bun.split…

Meadow,[Alt-x lisp-interaction-mode], (+ 1 2 3 4 5 6 7)[Ctrl+j] 28 (+ 1 2 (* 3 4.4) 5 6 ) 27.200000000000003

gethtml-.pyで保存 # gethtml- http://... => normal # gethtml- - => run with file (='list.txt', url list) # save.name = 'http_--sample.net-_200709120808.htm' etc. import sys import urllib2 import time from datetime import date import string …