A119505 -id:A119505 - cp's OEIS frontend

A179103 A variation on A119505 that gives a limited digit set {2, 3, 4, 6, 8}.

4, 3, 6, 3, 2, 3, 8, 6, 2, 4, 2, 3, 3, 4, 3, 4, 8, 4, 3, 6, 6, 8, 6, 6, 4, 4, 3, 4, 8, 4, 3, 2, 2, 8, 3, 3, 6, 3, 3, 4, 3, 6, 3, 4, 3, 3, 4, 4, 2, 3, 2, 2, 3, 8, 2, 3, 4, 6, 3, 6, 6, 2, 3, 8, 4, 2, 4, 3, 3, 6, 6, 2, 6, 8, 3, 6, 8, 2, 3, 3, 3, 3, 6, 8, 3, 2, 4, 6, 3, 8, 2, 4, 6, 8, 3, 3, 4, 2, 6, 4, 3, 3, 8, 3, 6

Offset: 1

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

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

Cf. A119505, A179104.

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

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

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

Edited by Associate Eds. of OEIS, Jul 07 2010

A179104 A variation on A119505 that gives a limited digit set {2, 3, 4, 5, 6, 7, 8, 9}.

Original entry on oeis.org

3, 4, 8, 4, 3, 5, 3, 2, 3, 3, 3, 9, 5, 7, 5, 3, 3, 3, 9, 8, 2, 3, 2, 8, 3, 3, 9, 3, 3, 7, 5, 3, 6, 3, 9, 9, 8, 4, 5, 7, 4, 2, 5, 3, 5, 5, 3, 7, 3, 4, 6, 3, 9, 3, 6, 5, 7, 8, 5, 8, 8, 3, 5, 3, 3, 6, 7, 9, 4, 2, 8, 6, 2, 3, 9, 2, 3, 6, 9, 5, 5, 9, 2, 3, 9, 6, 3, 8, 9, 3, 3, 3, 8, 3, 4, 4, 7, 6, 2, 7, 5, 9, 3, 4, 8

Offset: 1

Roger L. Bagula and Alexander R. Povolotsky, Jul 05 2010

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

Cf. A119505, A179103.

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

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

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

Edited by Associate Eds. of OEIS, Jul 07 2010

A156583 The subsequence of even digits in A119505.

Original entry on oeis.org

4, 4, 6, 2, 4, 4, 6, 4, 4, 6, 4, 2, 6, 6, 2, 4, 4, 2, 6, 2, 4, 2, 6, 6, 6, 6, 6, 4, 6, 4, 2, 2, 6, 6, 6, 4, 6, 4, 2, 4, 6, 6, 4, 2, 4, 6, 6, 6, 2, 6, 2, 4, 6, 6, 4, 4, 6, 6, 6, 2, 4, 4, 6, 2, 6, 4, 4, 2, 6, 2, 6, 4, 2, 6, 4, 4, 6, 4, 6, 4, 4, 4, 2, 2, 4, 2, 6, 2, 4, 6, 6, 2, 6, 6, 6, 2, 4, 4, 2, 6, 4, 4, 4, 4, 6

Offset: 1

Paul Curtz, Feb 10 2009

Can be computed from the digits of Pi, A000796, by removing the digits

0,1,2,4,5,6,9, and then replacing 3->4, 7->2 and 8->6.

Harvey P. Dale, Table of n, a(n) for n = 1..2000

RealDigits[Pi,10,500][[1]]/.{0->Nothing,1->Nothing,2->Nothing,3->4,4->Nothing,5->Nothing,6->Nothing,7->2,8->6,9->Nothing} (* Harvey P. Dale, Apr 30 2022 *)

Edited, corrected and extended by R. J. Mathar, Feb 23 2009

A179102 A variation on A119505 that gives a limited digit set {2, 3, 4, 6, 7, 8, 9}.

Original entry on oeis.org

9, 9, 3, 9, 2, 6, 7, 3, 2, 9, 2, 4, 6, 8, 6, 9, 7, 9, 4, 3, 3, 7, 3, 3, 9, 9, 4, 9, 7, 8, 6, 2, 8, 7, 4, 4, 3, 9, 6, 8, 9, 3, 6, 9, 6, 6, 9, 8, 2, 9, 8, 2, 4, 7, 8, 6, 8, 3, 6, 3, 3, 2, 6, 7, 9, 8, 8, 4, 9, 3, 3, 8, 3, 7, 4, 3, 7, 8, 4, 6, 6, 4, 3, 7, 4, 8, 9, 3, 4, 7, 2, 9, 3, 7, 9, 9, 8, 8, 3, 8, 6, 4, 7, 9, 3

Offset: 1

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

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

Cf. A119505, A179103, A179104.

Cf. A000796.

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

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

Edited by Associate Eds. of OEIS, Jul 10 2010

A155912 Let d(i) be the i-th digit of the decimal expansion of Pi = 3.1415926535897932384626433832795..., so that d(0) = 3, d(1) = 1, d(2) = 4, etc. Then a(0) = 3, a(n) = d(d(n)) for n>0.

Original entry on oeis.org

3, 1, 5, 1, 9, 3, 4, 2, 9, 1, 9, 5, 3, 6, 3, 1, 4, 1, 5, 5, 2, 4, 2, 5, 1, 1, 5, 1, 4, 6, 3, 9, 3, 4, 5, 5, 5, 1, 3, 6, 1, 2, 3, 1, 3, 3, 1, 6, 9, 1, 3, 9, 5, 4, 3, 3, 6, 5, 3, 5, 5, 9, 3, 4, 1, 3, 6, 5, 1, 2, 5, 3, 2, 4, 5, 2, 4, 3, 5, 3, 3, 5, 2, 4, 5, 3, 1, 5, 5, 4, 9, 1, 5, 4, 1, 1, 6, 3, 2, 6, 3, 5, 4, 1, 5

Offset: 0

Dan Brown (ddbhockey(AT)hotmail.com), Jan 30 2009

This defines a constant 3.151934291953631... related to Pi in a peculiar way!

Zak Seidov, Table of n, a(n) for n = 0..999

Cf. A135725.

Cf. A119505. - Robert G. Wilson v, Mar 17 2009

id = Rest@ RealDigits[ Pi, 10, 105][[1]]; id[[0]] = 3; id[[ id[[ 0]]]] = 3; Table[id[[ id[[ n]]]], {n, 0, 104}] (* Robert G. Wilson v, Mar 17 2009 *)

Edited and extended by Zak Seidov and N. J. A. Sloane, Feb 10 2009

Sequence corrected by N. J. A. Sloane Aug 31 2009 using terms from the b-file

cp's OEIS Frontend

A179103 A variation on A119505 that gives a limited digit set {2, 3, 4, 6, 8}.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A179104 A variation on A119505 that gives a limited digit set {2, 3, 4, 5, 6, 7, 8, 9}.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A156583 The subsequence of even digits in A119505.

Views

Author

Keywords

Comments

Links

Programs

Mathematica

Extensions

A179102 A variation on A119505 that gives a limited digit set {2, 3, 4, 6, 7, 8, 9}.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A155912 Let d(i) be the i-th digit of the decimal expansion of Pi = 3.1415926535897932384626433832795..., so that d(0) = 3, d(1) = 1, d(2) = 4, etc. Then a(0) = 3, a(n) = d(d(n)) for n>0.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

Extensions