18/10/02 00:44:47.60 DMIGI67G.net
当然ながらHaskellの結果と同じく
> which.max(y)
[1] 6171
> y[which.max(y)]
[1] 262
１０００００までなら
> which.max(y)
[1] 77031
> y[which.max(y)]
[1] 351
Haskellより速く算出されたけど、多分不慣れなHaskellのコードが拙稚なためだろうな。
結果は同じく
Prelude> [(a,b)|(a,b)<-y,b==maxLength]
[(77031,351)]
おい、ド底辺これも検証しておけよ。
部屋割りカウントはお前には難問すぎたらしいしな。