OFFSET
1,1
COMMENTS
a(n) is the largest prime < A079779(n).
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = prime(A057855(n)). - Michel Marcus, Aug 30 2019
MAPLE
With exception of first term: seq(prevprime(n*ithprime(n)), n=2..40);
MATHEMATICA
PrevPrim[n_] := Block[{k = n - 1}, While[ !PrimeQ[k], k-- ]; k]; Table[ Abs[ PrevPrim[ n*Prime[n]]], {n, 1, 50}]
Table[Abs[NextPrime[n Prime[n], -1]], {n, 50}] (* Harvey P. Dale, May 25 2012 *)
PROG
(PARI) for(n=1, 47, print1(precprime(n*prime(n)), ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Feb 03 2003
EXTENSIONS
Edited and extended by Robert G. Wilson v, Klaus Brockhaus and Mark Hudson (mrmarkhudson(AT)hotmail.com), Feb 04 2003
STATUS
approved