コラッツの予想について

Question

コラッツの予想で、nが1になるまでの計算の回数を求めるメソッドを
なるべく短く定義してみてください。（言語は問いません。）

Comments

[Stripe]

「nが1になるまでの計算の回数を求めるメソッド」となっていますが、そのコードだと計算回数が出ないと思います。

Answer 1

3つの言語で書いてみました。

def collatz n
  n == 1 ? 0 : 1 + collatz(n.even? ? n / 2 : 3 * n + 1)
end

collatz = (n) ->
  (while n > 1
    n = if n % 2 then n * 3 + 1 else n / 2).length

collatz = (n) ->
  if n is 1 then 0 else 1 + collatz if n % 2 then 3 * n + 1 else n / 2

collatz 1 = 0
collatz n = 1 + collatz (if odd n then 3 * n + 1 else div n 2)

collatz = length . takeWhile (> 1) . iterate (\n -> if odd n then 3 * n + 1 else div n 2)

Answer 2

JavaScriptです。
再帰だと回数計測が難しかったのでループでやってみました。

c=function(n){
  for(i=1; n>1; i++)n=(n%2)? n*3+1 : n/2
  return i
}

Comments

[Stripe]

c(1);としたときの計算回数が1回と出ます。0回となるべきでは？

[hirohiro]

確かにおっしゃるとおりですね。
検証時に1までnを出力して数を数えたので勘違いしていたみたいです。(1の回まで加えた)
iの初期値を1ではなく0に変更で修正できそうに思います。
c=function(n){
for(i=0; n>1; i++)n=(n%2)? n*3+1 : n/2
return i
}