A110883 Sum of consecutive digits in the decimal expansion of Pi.
4, 5, 5, 6, 14, 11, 8, 11, 8, 8, 13, 17, 16, 16, 12, 5, 5, 11, 12, 10, 8, 8, 10, 7, 6, 11, 11, 5, 9, 16, 14, 5, 2, 10, 16, 12, 5, 10, 16, 8, 7, 15, 12, 12, 18, 12, 10, 12, 6, 1, 5, 13, 10, 2, 9, 16, 11, 13, 13, 8, 9, 14, 11, 5, 3, 7, 15, 9, 7, 10, 4, 6, 8, 10, 14, 8, 2, 8, 17, 18, 17, 14, 8
Offset: 1
Examples
a(1)=3+1 = 4, a(2)=1+4 = 5, a(3)=4+1 = 5, a(4)=1+5 = 6, a(5)=5+9 = 14
Links
- Paolo Xausa, Table of n, a(n) for n = 1..10000
- Blaine Deal, Sequence puzzle posting at Clifford Pickover forum. [Broken link]
- Blaine Deal, Home Page.
- Albert Frank and Philippe Jacqueroux, International Contest, 2001. Item 25.
Crossrefs
Cf. A000796.
Programs
-
Mathematica
listlength = 100; Table[IntegerDigits[IntegerPart[10^listlength Pi]][[i]] + IntegerDigits[IntegerPart[10^listlength (Pi - 3.0`100)]][[i]], {i, 1, listlength}] (* Second program: *) Total[Partition[First[RealDigits[Pi, 10, 100]], 2, 1], {2}] (* Paolo Xausa, Aug 22 2025 *)
Formula
Extensions
Typo in formula fixed by Zak Seidov, Jan 02 2014