|
| |
|
|
A120819
|
|
Indices of primes in A057137.
|
|
11
|
| |
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Digits are in ascending order beginning with 1 and after 9 comes 0.
Indices of primes in A057137.
|
|
|
REFERENCES
|
Clifford A. Pickover, A Passion for Mathematics, Wiley, 2005; see p. 61, 298.
|
|
|
LINKS
|
Table of n, a(n) for n=1..6.
|
|
|
EXAMPLE
|
a(1) = 12345678901234567890...01234567890...012345678901 = A057137(171) is the first prime term in A057137.
|
|
|
MATHEMATICA
|
fQ[n_] := PrimeQ@ FromDigits@ Mod[Range@n, 10]; lst = {}; Do[ If[fQ@n, AppendTo[lst, n]; Print@n], {n, 10000}]; lst
|
|
|
PROG
|
(PARI) N=0; for(n=1, 600, if(ispseudoprime(N=10*N+n%10), print1(n", "))) \\ Charles R Greathouse IV, May 10 2014
|
|
|
CROSSREFS
|
Cf. A006055, A057137, A120828, A120820, A120821, A120822, A120823, A120824, A120825, A120826, A120827.
Sequence in context: A136365 A031900 A349097 * A115078 A183996 A062907
Adjacent sequences: A120816 A120817 A120818 * A120820 A120821 A120822
|
|
|
KEYWORD
|
base,hard,nonn
|
|
|
AUTHOR
|
Robert G. Wilson v, Jul 05 2006
|
|
|
EXTENSIONS
|
18881 from Arjen K. Lenstra, Feb 20 2012
|
|
|
STATUS
|
approved
|
| |
|
|
