login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A252079 Fixed points of permutations A252022 and A252023. 4
1, 2, 3, 4, 5, 36, 72, 125, 136, 900, 4454, 8021, 27223, 33905, 73222, 127536, 146353, 180177, 234668, 273241 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

Table of n, a(n) for n=1..20.

PROG

(Haskell)

a252079 n = a252079_list !! (n-1)

a252079_list = [x | x <- [1..], a252022 x == x]

(Python)

A252079_list, l, s, b = [1], [1], 2, set()

for n in range(2, 10**5):

....i = s

....while True:

........if i not in b:

............li = [int(d) for d in str(i)[::-1]]

............for x, y in zip(li, l):

................if x+y > 9:

....................break

............else:

................l = li

................b.add(i)

................if i == n:

....................A252079_list.append(i)

................while s in b:

....................b.remove(s)

....................s += 1

................break

........i += 1 # Chai Wah Wu, Dec 14 2014

CROSSREFS

Cf. A252022, A252023, A252078.

Sequence in context: A043310 A171578 A044907 * A324276 A324277 A261247

Adjacent sequences:  A252076 A252077 A252078 * A252080 A252081 A252082

KEYWORD

nonn,more

AUTHOR

Reinhard Zumkeller, Dec 13 2014

EXTENSIONS

a(16)-a(20) from Chai Wah Wu, Dec 14 2014

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 20 20:50 EST 2021. Contains 340332 sequences. (Running on oeis4.)