|
|
A015806
|
|
Numbers k not congruent to 0 (mod 3) such that phi(k) + 4 | sigma(k).
|
|
0
|
|
|
175, 220, 350, 752, 3772, 4720, 5092, 15296, 80320, 269872, 632752, 807650, 1126672, 1304320, 4176896, 4386476, 20945920, 37030556, 1073463296, 17178755072, 34796530432, 85897707520, 274873450496
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[100000],
Divisible[DivisorSigma[1, #], EulerPhi[#] + 4] && !
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|