#58640。2048我打的最大分，别人问，你到底最高多少啊。只有最高纪录分数看不到状态，干脆写个程序，告诉别人自己到底打到多少吧，我其实只记得自己是4096+1024，其他的分数忘记了，不过使用这个程序，很容易就分析出来了。

#2048是在合成的时候记录分数，比如4和4合成8，记录8分，类似这个样子。新出现的2或者4是不计分数的。所以可以通过递归，获得块数合成时候的分数。

#coding: UTF-8def total(n)  #假设全部的数都是2，2的n次方得到的分数，比如n=10，2**10=1024得到的纪录分数  return 4 if n == 2  2 * total( n - 1 ) + 2 ** nenddef total_plus(n)  #随机2或4，比例9:1，获得的分数。    i = 0    (2 ** n / 2).times { i += 1 if rand(10) == 0}    if total(n) >= i * 4      total(n) - i * 4    else      0    endend#{2=>4, 3=>16, 4=>48, 5=>128, 6=>320, 7=>768, 8=>1792, 9=>4096, 10=>9216, 11=>20480, 12=>45056, 13=>98304, 14=>212992, 15=>458752, 16=>983040} # 只有2的时候2**n对应的的得分@h = {}(2..16).each {|n| @h[n] = total_plus(n)}  #据传说，不能大于2**16次方puts @h  # 做一个对应表，2的n次方对应的可能得分数def max_n(score) #录入一个分数，小于此分数的最大对应n，比如得到5124分，查表得到最大可能的n是9，也就是说盘面最大是2**9=512。  temp = []  @h.each  do |k, v|          temp << k if v <= score     end  temp.max enddef score_to_n(score, temp = []) #输入记录，反查组成此记录的n值数组  max = max_n(score)  return  temp << @h.key(score) if @h.key(score) == max #score在hash表内的时候，直接返回  return temp if @h[max].zero?   #因为有4存在，所以可能会有0，去除0，要不后面就会报错  div = score.divmod(@h[max])  #求余数  div[0].times {temp << max } #多个的时候，写入temp多个n  score_to_n(div[1], temp)  temp.compact endscore = 58640p score_to_n(score).map {|n| 2 ** n} # 最终的状态集合，可以检查一下是否和自己的状态一致p [score, score_to_n(score).map {|n| @h[n] } .inject(:+)] #录入分数和校验分数的比较，可能不一样噢