1,1

G. C. Greubel, Table of n, a(n) for n = 1..5000

a(n) = A000796(17 + A000796(n))).

id=RealDigits[Pi, 10, 130][[1]]; Table[id[[17+id[[n]]]], {n, 105}]

Cf. A119505, A179104.

Sequence in context: A010653 A153200 A300895 * A045814 A064218 A228780

Adjacent sequences: A179100 A179101 A179102 * A179104 A179105 A179106

nonn,base

Roger L. Bagula and Alexander R. Povolotsky, Jun 29 2010

Minor edits by N. J. A. Sloane, Jul 05 2010

Edited by Associate Eds. of OEIS, Jul 07 2010

approved