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

0, 1, 9, 11, 12, 40, 2, 24, 58, 25, 7, 13, 31, 32, 4, 8, 10, 57, 42, 34, 5, 3, 17, 27, 20, 102, 36, 48, 45, 14, 29, 15, 87, 6, 38, 41, 22, 37, 47, 21, 63, 30, 44, 16, 28, 103, 19, 49, 35, 112, 69, 71, 26, 18, 85, 79, 33, 43, 64, 125, 116, 59, 181, 55, 50, 105, 104, 106

Offset

0,3

Links

Table of n, a(n) for n=0..67.

Index entries for sequences that are permutations of the natural numbers

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[b[n]], {n, 0, 100}]

Crossrefs

Sequence in context: A216292 A250295 A071217 * A158607 A070699 A065454

Adjacent sequences: A064927 A064928 A064929 * A064931 A064932 A064933

Keyword

nonn,easy

Author

Dean Hickerson, Oct 14, 2001

Status

approved