A064928 Inverse of A034175 considered as a permutation of the nonnegative integers (which it is conjectured to be).

0, 1, 11, 2, 7, 8, 3, 12, 40, 13, 4, 9, 24, 25, 10, 5, 14, 41, 19, 42, 15, 6, 35, 26, 31, 32, 27, 36, 47, 16, 43, 20, 102, 21, 44, 17, 48, 37, 28, 33, 58, 57, 34, 29, 38, 49, 18, 45, 22, 103, 79, 104, 23, 46, 75, 50, 39, 30, 63, 116, 59, 60, 115, 64, 55, 70, 51, 74, 109

Offset: 0

Author

Dean Hickerson, Oct 14 2001

Keywords

• nonn
• easy

Links

• Robert G. Wilson v, Table of n, a(n) for n = 0..10000 (terms 0..1700 from Zak Seidov, terms 1701..8691 from Peter Pein)
• Index entries for sequences that are permutations of the natural numbers

Crossrefs

Cf. A034175.

Programs

Mathematica

a[0]=b[0]=0; lst={0}; For[n=1, n<250, n++, For[s=Ceiling[Sqrt[a[n-1]]], MemberQ[lst, s^2-a[n-1]], s++, Null]; b[a[n]=s^2-a[n-1]]=n; AppendTo[lst, a[n]]]; Table[b[n], {n, 0, 100}]