# [seqfan] Re: need help with new sequences

Meeussen Wouter (bkarnd) wouter.meeussen at vandemoortele.com
Tue Jun 16 18:58:57 CEST 2009

```my 2 (two...) cents worth up to 10^6:

A161590
1, 3, 9, 29, 69, 2079, 3999, 6999, 10677, 20169
A161592
0 "read 12334444", 111, 117, 1223, 78, 111177, 11127, 11144445, 11667,
1111113

---------- (* toxic code, do not inhale! read at your own risk  *)
rats[n_Integer]:=If[n===55666666667777, 0,
FromDigits[Sort[IntegerDigits[(n+FromDigits[Reverse[#]])& @
IntegerDigits[n]]]]]

it=Table[ Min[Take[#,-Length[#]+Position[#,Last[#],1,1] [[1,1]] ]]&
@NestWhileList[rats,k,UnsameQ,All],{k,1,999999}];
----------

apart from that,
n=1111111111233 and 11144444445
gives 111111117777
n=1111111111111111111111111111111111111233
gives 111111111177777
n=1111222222222222222227
gives 111111777
n=11444444444444445
gives 1111115577777777     (period 8) and,
n=111144144555
gives 111111111288

with a funny period 11:
{77778888888888, 156666666777777, 233334444444489, 1112277777888888,
1111555566999, 111111111288, 222222339999, 1112222225556,
4444466667777,11112222222333, 33444444444444}

Wouter.

-----Original Message-----
From: seqfan-bounces at list.seqfan.eu
[mailto:seqfan-bounces at list.seqfan.eu] On Behalf Of Tanya Khovanova
Sent: dinsdag 16 juni 2009 3:15
To: Sequence Fanatics Discussion list
Subject: [seqfan] need help with new sequences

Dear SeqFans,

I just submitted some sequences jointly with John Conway:
A161590, A161592, A161593, A161594, A161596, A161597, A161598, A161600.

As we didn't have much time this was done in a hurry. I won't be able to
get back to these sequences for sometime. I will appreciate if someone
will check them and edit if needed. RATS sequences especially might need
editing, plus they need more terms.

I plan to write in my blog about the TITO algorithm: how Conway invented
it and so on.

Tanya

_______________________________________________

Seqfan Mailing list - http://list.seqfan.eu/

===============================
This email is confidential and intended solely for the use of the individual to whom it is addressed.
If you are not the intended recipient, be advised that you have received this email in error and that any use, dissemination, forwarding, printing, or copying of this email is strictly prohibited.
You are explicitly requested to notify the sender of this email that the intended recipient was not reached.

```