|
Search: id:A108663
|
|
|
| A108663 |
|
In the decimal expansion of Pi, lengths of sublists with alternative parity. |
|
+0
2
|
|
| 2, 1, 3, 2, 3, 1, 4, 1, 1, 6, 2, 1, 1, 1, 3, 5, 4, 1, 8, 1, 1, 3, 2, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 10, 2, 5, 1, 3, 2, 2, 3, 2, 2, 2, 1, 5, 3, 3, 1, 4, 1, 1, 2, 5, 3, 1, 1, 3, 3, 1, 4, 3, 1, 4, 4, 1, 1, 4, 1, 2, 1, 1, 3, 1, 1, 1, 2, 1, 4, 6, 1, 2, 2, 1, 2, 1, 1, 1, 2, 6, 1, 1, 3, 2, 4, 3, 1, 3, 2, 4, 3, 2, 1, 1, 2
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Take the decimal expansion of Pi: s={3,1,4,1,5,9,2,6,5,3,5,8,9,7,9,3,2,3,8,4,6,2,6,4,3,3,8,3,2,7,9,5,0,2,8,8,4,1,9}. Split s into sublists each with digits of the same parity:{{3,1},{4},{1,5,9},{2,6},{5,3,5},{8},{9,7,9,3},{2},{3},{8,4,6,2,6,4},{3,3},{8},{3}}. The sequence gives the lengths of the sublists: 2,1,3,2,3,1,4,1,1,6,2,1,1,1,3,5,4,1,8.
|
|
MATHEMATICA
|
A108663=Length/@Split[RealDigits[N[Pi, 300]][[1]], Mod[ #1-#2, 2]==0&]
|
|
CROSSREFS
|
Sequence in context: A066376 A151682 A159918 this_sequence A057940 A097285 A057432
Adjacent sequences: A108660 A108661 A108662 this_sequence A108664 A108665 A108666
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Zak Seidov (zakseidov(AT)yahoo.com), Jun 17 2005
|
|
|
Search completed in 0.002 seconds
|
