[go: up one dir, main page]

login
A015832
Numbers k such that phi(k + 12) | sigma(k).
1
6, 14, 23, 24, 30, 33, 38, 51, 54, 60, 66, 78, 84, 87, 96, 102, 109, 120, 132, 141, 159, 168, 174, 204, 210, 246, 248, 249, 267, 276, 280, 321, 330, 345, 354, 372, 378, 380, 406, 411, 426, 495, 506, 519, 537, 564, 591, 606, 636, 642, 690, 699, 789, 822, 852
OFFSET
1,1
LINKS
MATHEMATICA
Select[Range[3000], Divisible[DivisorSigma[1, #], EulerPhi[12 + #]] &] (* David Nacin, Mar 03 2012 *)
CROSSREFS
Sequence in context: A079797 A093380 A123228 * A190753 A190740 A084583
KEYWORD
nonn
STATUS
approved