|
Search: id:A068835
|
|
|
| A068835 |
|
Start of first occurrence of just n consecutive primes with all even digits except the least significant digit. |
|
+0
1
|
|
| 2, 23, 41, 821, 4409, 2063, 224401, 8609, 20066003, 20628046223, 82260284069, 2248462002229
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
If the least significant digit must be odd, then a(1) = 241.
|
|
EXAMPLE
|
a(8) = 8609: the 8 consecutive primes are 8609, 8623, 8627, 8629, 8641, 8647, 8663, 8669.
|
|
MATHEMATICA
|
a = {0, 1, 1, 1}; Do[ If[ Union[ EvenQ[ Drop[ IntegerDigits[ Prime[n]], -1]]] == {True}, a = Append[a, 1], a = Append[a, 0]], {n, 5, 10^5}]; Do[k = 3; b = Table[1, {n}]; b = Insert[b, 0, {{1}, {-1}}]; While[k < 10^5 - n && Take[a, {k - 1, k + n}] != b, k++ ]; If[k < 10^5, Print[ Prime[k]], Print[0]], {n, 1, 8}]
|
|
CROSSREFS
|
Adjacent sequences: A068832 A068833 A068834 this_sequence A068836 A068837 A068838
Sequence in context: A106736 A045392 A107374 this_sequence A002428 A105440 A139831
|
|
KEYWORD
|
more,nonn,base
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Mar 09 2002
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 10 2002
a(9)-a(12) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Sep 03 2008
|
|
|
Search completed in 0.002 seconds
|
