

A033874


Difference between the largest prime < 10^n (A003618) and 10^n.


11



3, 3, 3, 27, 9, 17, 9, 11, 63, 33, 23, 11, 29, 27, 11, 63, 3, 11, 39, 11, 101, 27, 23, 257, 123, 141, 99, 209, 27, 11, 27, 21, 9, 411, 23, 159, 81, 59, 57, 17, 119, 83, 81, 53, 9, 33, 41, 33, 57, 57, 323, 231, 177, 291, 111, 593, 93, 149, 141, 161, 39, 83, 123, 51, 269
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


REFERENCES

Knuth, Art of Computer Programming, volume 2, pages 13 and 390.
Journal of Recreational Mathematics, volume 14, number 4, page 285.
Journal of Recreational Mathematics, volume 20 ,number 3, page 209210.
O'Hara, J. Rec. Math., 22 (1990), Table on page 278.


LINKS

T. D. Noe, Table of n, a(n) for n = 1..1000 (yielding probable primes)
V. Danilov, Table for large n
Eric Weisstein's World of Mathematics, Previous Prime
R. G. Wilson, v., Extract from letter to N. J. A. Sloane, May 20 1994, with annotated scanned copy of page 278 of O'Hara article.


EXAMPLE

a(4) = 27 because 10^4  9973 = 27. The 21st term is 101 since 10^21  101 = 999999999999999999899 is prime.


MAPLE

seq(10^nprevprime(10^n), n=1..65); # Emeric Deutsch, Apr 20 2006


MATHEMATICA

PrevPrime[ n_Integer ] := Module[ {k}, k = n  1; While[ ! PrimeQ[ k ], k ]; k ]; Table[ 10^n  PrevPrime[ 10^n ], {n, 1, 75} ] (* Robert G. Wilson v, Sep 09 2000 *)
Table[10^i  NextPrime[10^i, 1], {i, 0, 70}] (* Harvey P. Dale, Jan 13 2011 *)


PROG

(PARI) a(n)=10^nprecprime(10^n) \\ Charles R Greathouse IV, Aug 03 2014
(MAGMA) [10^nPreviousPrime(10^n): n in [1..65]]; // Vincenzo Librandi, Sep 13 2016


CROSSREFS

Cf. A003618, A033873.
Sequence in context: A289118 A131445 A230176 * A122092 A230495 A025549
Adjacent sequences: A033871 A033872 A033873 * A033875 A033876 A033877


KEYWORD

nonn,nice


AUTHOR

Vasiliy Danilov (danilovv(AT)usa.net)


EXTENSIONS

More terms from Patrick De Geest


STATUS

approved



