login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A095916 Differences between adjacent digits of Pi. 6

%I #18 Aug 28 2020 03:06:15

%S -2,3,-3,4,4,-7,4,-1,-2,2,3,1,-2,2,-6,-1,1,5,-4,2,-4,4,-2,-1,0,5,-5,

%T -1,5,2,-4,-5,2,6,0,-4,-3,8,-2,-6,5,3,-6,6,0,-6,4,-2,-4,-1,5,3,-6,-2,

%U 9,-2,-3,5,-5,0,1,4,-7,1,-3,7,1,-7,5,-2,-4,6,-4,6,-2,-4,-2,8,1,0,-1,-2,-4,6,-8,3,1,4,-6,3,-2,1,-2,-1,0,6,-7,6,1,2

%N Differences between adjacent digits of Pi.

%C a(A049514(n)) = 0. - _Reinhard Zumkeller_, Mar 12 2015

%H Reinhard Zumkeller, <a href="/A095916/b095916.txt">Table of n, a(n) for n = 1..1000</a>

%H <a href="/index/Ph#Pi314">Index entries for sequences related to the number Pi</a>

%t b = RealDigits[N[Pi, 1000]]; b = First[b]; a = {}; Do[k = b[[n + 1]] - b[[n]]; AppendTo[a, k], {n, 1, 999}]; a (* _Artur Jasinski_, Mar 16 2008 *)

%t Differences[RealDigits[Pi,10,120][[1]]] (* _Harvey P. Dale_, Feb 10 2013 *)

%o (Haskell)

%o a095916 n = a095916_list !! (n-1)

%o a095916_list = zipWith (-) (tail a000796_list) a000796_list

%o -- _Reinhard Zumkeller_, Mar 12 2015

%Y Cf. A000796, A138345.

%Y Cf. A049514, A030658, A193496.

%K base,sign

%O 1,1

%A Herman Jamke (hermanjamke(AT)fastmail.fm), Jul 13 2004

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 11:59 EDT 2024. Contains 371254 sequences. (Running on oeis4.)