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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A060974 Irregular primes with irregularity > 1. 3
157, 353, 379, 467, 491, 547, 587, 617, 631, 647, 673, 691, 809, 929, 1151, 1217, 1291, 1297, 1307, 1663, 1669, 1733, 1789, 1811, 1847, 1933, 1997, 2003, 2087, 2273, 2309, 2371, 2383, 2423, 2441, 2591, 2671, 2789, 2909, 2939, 2957, 3391, 3407, 3511 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Table of n, a(n) for n=1..44.

MATHEMATICA

Do[ p = Prime[ n ]; c = 0; k = 1; While[ 2*k < p - 3, If[ Mod[ Numerator[ BernoulliB[ 2*k ] ], p ] == 0, c++ ]; k++ ]; If[ c > 1, Print[ p ] ], {n, 3, 750} ]

CROSSREFS

Cf. A000928, A000367, A060975, A073276, A073277 and A073278.

Sequence in context: A140625 A142874 A234364 * A073277 A180233 A096708

Adjacent sequences:  A060971 A060972 A060973 * A060975 A060976 A060977

KEYWORD

nonn

AUTHOR

Robert G. Wilson v, May 09 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 February 19 20:17 EST 2019. Contains 320328 sequences. (Running on oeis4.)