login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A136517 a(0) = 3; for n>0, break up decimal expansion of Pi into chunks of increasing lengths; leading zeros are not printed. 2
3, 1, 41, 592, 6535, 89793, 238462, 6433832, 79502884, 197169399, 3751058209, 74944592307, 816406286208, 9986280348253, 42117067982148, 86513282306647, 938446095505822, 31725359408128481, 117450284102701938, 5211055596446229489 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,1

REFERENCES

Clifford A. Pickover, A Passion for Mathematics, Wiley, 2005; see p. 64.

LINKS

Nathaniel Johnston, Table of n, a(n) for n = 0..500

MAPLE

with(StringTools): lim:=23: s:=convert(evalf[lim^2](Pi-3), string): printf("3, "): for n from 1 to lim do printf("%d, ", parse(SubString(s, (n-1)*n/2+2..n*(n+1)/2+1))); od: # Nathaniel Johnston, May 08 2011

MATHEMATICA

Join[{3}, FromDigits/@With[{p=RealDigits[Pi, 10, 220][[1]]}, Table[ Take[ p, {(n(n-1))/2+2, (n(n-1))/2+1+n}], {n, 20}]]] (* Harvey P. Dale, Aug 20 2011 *)

CROSSREFS

Cf. A081368, A090897.

Sequence in context: A270132 A050817 A125082 * A104097 A155812 A158958

Adjacent sequences:  A136514 A136515 A136516 * A136518 A136519 A136520

KEYWORD

nonn,base,easy

AUTHOR

N. J. A. Sloane, Apr 21 2008

EXTENSIONS

Extended by Nathaniel Johnston, May 08 2011

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified March 28 07:54 EDT 2017. Contains 284182 sequences.