proposed

approved

editing

proposed

All terms are multiplemultiples of a(1) = 82.

proposed

editing

editing

proposed

Robert Israel, <a href="/A282773/b282773.txt">Table of n, a(n) for n = 1..10000</a>

Wikipedia, <a href="https://en.wikipedia.org/wiki/Von_Staudt%E2%80%93Clausen_theorem">Von Staudt-Clausen theorem</a>

Cf. A002445.

n such that 82 | n but there are no primes p other than 2, 3, 83 such that p-1 | n. - Robert Israel, Mar 07 2017

# Alternative:

filter:= n ->

select(isprime, map(`+`, numtheory:-divisors(n), 1)) = {2, 3, 83}:

select(filter, [seq(i, i=82..10^5, 82)]); # Robert Israel, Mar 07 2017

proposed

editing

editing

proposed

82, 574, 1066, 1394, 3034, 3362, 3854, 4838, 5494, 5822, 6478, 7462, 7954, 8282, 8774, 8938, 10414, 11234, 12218, 12382, 12874, 13694, 15826, 16154, 17302, 18614, 18778, 21074, 21238, 21566, 22058, 22222, 22714, 23206, 23534, 23698, 25174, 25502, 25994

Select[82 Range[360], Denominator@ BernoulliB@ # == 498 &] (* Michael De Vlieger, Mar 07 2017 *)

nonn,more,changed

More terms from Michael De Vlieger, Mar 07 2017

proposed

editing

editing

proposed