login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A122037 Largest prime factor of number equal to the arithmetic mean of four successive primes. 1
3, 3, 5, 3, 11, 5, 19, 7, 23, 11, 5, 17, 3, 29, 17, 7, 3, 19, 5, 127, 139, 3, 149, 31, 11, 7, 181, 31, 13, 5, 43, 19, 29, 241, 19, 23, 13, 53, 5, 139, 97, 17, 13, 53, 37, 31, 11, 17, 11, 127, 43, 19, 7, 71, 431, 7, 149, 11, 79, 37, 163, 11, 127, 257, 41, 271, 23, 43, 113, 19, 3 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
FORMULA
a(n) = A006530(A102655(n)).
MATHEMATICA
FactorInteger[ # ][[ -1, 1]] & /@ Select[Table[Sum[Prime[k], {k, n, n + 3}]/4, {n, 120}], IntegerQ] (* Ray Chandler, Sep 25 2006 *)
FactorInteger[#][[-1, 1]]&/@Select[Mean/@Partition[Prime[Range[ 200]], 4, 1], IntegerQ] (* Harvey P. Dale, May 21 2014 *)
CROSSREFS
Sequence in context: A071053 A298398 A094439 * A363796 A201454 A008316
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Sep 14 2006
EXTENSIONS
Extended by Ray Chandler, Sep 25 2006
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 19 01:22 EDT 2024. Contains 370952 sequences. (Running on oeis4.)