login
A156099
Smallest number m such that prime(n) is a factor of both m and sigma(m).
1
6, 6, 40, 28, 473, 117, 1139, 703, 3151, 5017, 496, 2701, 6683, 11051, 13207, 11183, 20827, 10309, 26867, 20093, 18688, 12403, 27473, 91136, 18721, 101909, 63551, 68587, 71177, 76501, 8128, 68513, 74939, 38503, 221861, 273461, 49141, 159251
OFFSET
1,1
LINKS
EXAMPLE
a(20) = 20093. prime(20) = 71. 20093/71 = 283. sigma(20093)/71 = 288.
MATHEMATICA
snm[p_]:=Module[{m=1}, While[!Divisible[m, p]||!Divisible[ DivisorSigma[ 1, m], p], m++]; m]; snm/@Prime[Range[40]] (* Harvey P. Dale, Dec 17 2022 *)
CROSSREFS
Sequence in context: A244957 A186982 A196075 * A278435 A279333 A278734
KEYWORD
nonn
AUTHOR
Donovan Johnson, Feb 04 2009
STATUS
approved