login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A065384 Largest prime <= n * (n + 1) / 2. 2
3, 5, 7, 13, 19, 23, 31, 43, 53, 61, 73, 89, 103, 113, 131, 151, 167, 181, 199, 229, 251, 271, 293, 317, 349, 373, 401, 433, 463, 491, 523, 557, 593, 619, 661, 701, 739, 773, 811, 859, 887, 941, 983, 1033, 1069, 1123, 1171, 1223, 1259, 1321, 1373, 1429, 1483 (list; graph; refs; listen; history; text; internal format)
OFFSET

2,1

LINKS

Harry J. Smith, Table of n, a(n) for n = 2..1000

MATHEMATICA

PrimePrev[n_]:=Module[{k=n}, While[ !PrimeQ[k], k-- ]; k]; f[n_]:=n*(n+1)/2; lst={}; Do[AppendTo[lst, PrimePrev[f[n]]], {n, 6!}]; lst (* Vladimir Joseph Stephan Orlovsky, Feb 26 2010 *)

PROG

(PARI) { for (n=2, 1000, write("b065384.txt", n, " ", precprime(n*(n + 1)/2)) ) } [Harry J. Smith, Oct 17 2009]

CROSSREFS

Cf. A065382, A053001, A064383, A000217.

Sequence in context: A077171 A171602 A155189 * A126108 A100859 A111703

Adjacent sequences:  A065381 A065382 A065383 * A065385 A065386 A065387

KEYWORD

nonn

AUTHOR

Reinhard Zumkeller, Nov 05 2001

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 21 01:18 EDT 2019. Contains 323429 sequences. (Running on oeis4.)