--------------050607030707040401050506
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit

Daniel Martin wrote:

> Daniel Martin <martin / snowplow.org> writes:
> 
> 
>>Here's my solution to find happy bases - note that I don't find any
>>happy bases (aside from 2 and 4) before I run out of memory, somewhere
>>near base 1700.  It wouldn't surprise me if no other happy bases
>>exist.
> 

I used the attached program to check for happy bases.

$ time ruby hapnr2.rb 10000
2
4

real    1m7.279s
user    1m7.261s
sys     0m0.013s

So, there are no more happy bases up to 10000.

Regards,

Michael

-- 
Michael Ulm
R&D Team
ISIS Information Systems Austria
tel: +43 2236 27551-219, fax: +43 2236 21081
e-mail: michael.ulm / isis-papyrus.com
Visit our Website: www.isis-papyrus.com

---------------------------------------------------------------
This e-mail is only intended for the recipient and not legally
binding. Unauthorised use, publication, reproduction or
disclosure of the content of this e-mail is not permitted.
This email has been checked for known viruses, but ISIS accepts
no responsibility for malicious or inappropriate content.
---------------------------------------------------------------

--------------050607030707040401050506
Content-Type: application/x-ruby;
 nameapnr2.rb"
Content-Transfer-Encoding: base64
Content-Disposition: inline;
 filenameapnr2.rb"

IyBoYXBuci5yYgojCiMgc29tZSBmdW5jdGlvbnMgZXRjLiBjb25jZXJuaW5nIGhhcHB5IG51
bWJlcnMKCgpjbGFzcyBIYXBweU51bQogIGRlZiBpbml0aWFsaXplKGJhc2UpCiAgICBAYmFz
ZSA9IGJhc2UKICAgIEBiYXNlX3NxdWFyZSA9IGJhc2UgKiBiYXNlCiAgZW5kCgogIGRlZiBt
YXBwZXIodmFsKQogICAgcmVzdWx0ID0gMAogICAgd2hpbGUgdmFsID4gMAogICAgICByZXN1
bHQgKz0gKHZhbCAlIEBiYXNlKSAqKiAyCiAgICAgIHZhbCAvPSBAYmFzZQogICAgZW5kCgog
ICAgcmVzdWx0CiAgZW5kCgogICMgY2hlY2sgaWYgdGhlIGJhc2UgaXMgaGFwcHkKICBkZWYg
aGFwcHlfYmFzZT8KICAgICMgb2RkIG51bWJlcnMgYXJlIG5ldmVyIGhhcHB5IGJhc2VzCiAg
ICByZXR1cm4gZmFsc2UgaWYgKEBiYXNlICUgMiA9PSAxKQoKICAgIDIudXB0byhAYmFzZV9z
cXVhcmUgLSAxKSBkbyB8bnJ8CiAgICAgIGhpc3RvcnkgPSB7fQogICAgICBjdXJyZW50X25y
ID0gbnIKICAgICAgd2hpbGUgY3VycmVudF9uciAhPSAxCiAgICAgICAgcmV0dXJuIGZhbHNl
IGlmIGhpc3RvcnlbY3VycmVudF9ucl0KICAgICAgICBoaXN0b3J5W2N1cnJlbnRfbnJdID0g
dHJ1ZQogICAgICAgIGN1cnJlbnRfbnIgPSBtYXBwZXIoY3VycmVudF9ucikKICAgICAgZW5k
CiAgICBlbmQKICAgIHJldHVybiB0cnVlCiAgZW5kCmVuZAoKaWYgJDAgPT0gX19GSUxFX18K
ICAjIHB1dHMgSGFwcHlOdW0ubmV3KEFSR1ZbMF0udG9faSkuY29tcHV0ZV9jeWNsZXMKICAy
LnN0ZXAoQVJHVlswXS50b19pLCAyKSB7fGJhc2V8IHB1dHMoYmFzZSkgaWYgSGFwcHlOdW0u
bmV3KGJhc2UpLmhhcHB5X2Jhc2U/fQplbmQK
--------------050607030707040401050506--