|
Search: id:A073062
|
|
|
| A073062 |
|
Take A000040, omit commas: 235711131719232931374143,... select first n-digit prime. |
|
+0
2
|
|
| 2, 23, 571, 2357, 11131, 711131, 1923293, 35711131, 711131719, 4753596167, 23571113171, 379838997101, 7535961677173, 29313741434753, 571113171923293, 7414347535961677, 57111317192329313, 167717379838997101
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
In the sequence 235711131719232931... (primes without delimiters) first 1-digit, 3-digit and 6-digit primes are 2,571,711131.
|
|
MATHEMATICA
|
p200=Flatten[IntegerDigits[Prime[Range[200]]]]; pn := Partition[p200, n, 1]; ln=Length[pn]; tab := Table[Sum[10^(n-k)*pn[[i, k]], {k, n}], {i, ln}]; Do[Print[{n, Select[tab, PrimeQ][[1]]}], {n, 20}]
|
|
CROSSREFS
|
Sequence in context: A090731 A090314 A084322 this_sequence A015098 A136039 A098633
Adjacent sequences: A073059 A073060 A073061 this_sequence A073063 A073064 A073065
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
Zak Seidov (zakseidov(AT)yahoo.com), Aug 22 2002
|
|
|
Search completed in 0.002 seconds
|
