|
Search: id:A073035
|
|
|
| A073035 |
|
Take A000040, omit commas: 23571113171923..., select 2-digit primes seen when scanning from left. |
|
+0
1
|
|
| 23, 71, 11, 11, 13, 31, 17, 71, 19, 23, 29, 31, 13, 37, 41, 43, 47, 53, 59, 61, 67, 71, 17, 73, 37, 79, 83, 89, 97, 71, 11, 3, 31, 7, 71, 11, 13, 31, 71, 13, 31, 11, 13, 37, 71, 13, 11, 71, 31, 67, 71, 17, 73, 31, 17, 79, 11, 19, 11, 19, 31, 19, 97, 71, 19, 11, 23, 29, 23, 23
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
In the sequence 2357111317192329... (primes without delimiters) two-digit primes are 23, 71, 11, 11, 13, 31, 17,
|
|
MATHEMATICA
|
p200=Flatten[IntegerDigits[Prime[Range[200]]]]; n=2; (* n-digit primes!*) pn=Partition[p200, n, 1]; ln=Length[pn]; tab=Table[Sum[10^(n-k)*pn[[i, k]], {k, n}], {i, ln}]; Select[tab, PrimeQ]
|
|
CROSSREFS
|
Sequence in context: A042038 A116333 A042040 this_sequence A086104 A154619 A142405
Adjacent sequences: A073032 A073033 A073034 this_sequence A073036 A073037 A073038
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
Zak Seidov (zakseidov(AT)yahoo.com), Aug 22 2002
|
|
|
Search completed in 0.002 seconds
|
