A015831 Numbers k such that phi(k + 11) | sigma(k).

15, 21, 46, 69, 88, 94, 115, 119, 189, 204, 209, 210, 213, 255, 297, 329, 332, 399, 418, 465, 470, 589, 598, 609, 616, 663, 696, 749, 799, 869, 950, 1074, 1081, 1173, 1199, 1365, 1593, 1595, 1615, 1729, 1888, 1917, 2014, 2024, 2185, 2189, 2289, 2376, 2449

Offset

1,1

Links

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

Mathematica

Select[Range[3000], Divisible[DivisorSigma[1, #], EulerPhi[11 + #]] &] (* David Nacin, Mar 01 2012 *)

Prog

(PARI) is(n)=!(sigma(n)%eulerphi(n+11)) \\ Charles R Greathouse IV, Sep 25 2012

Crossrefs

Sequence in context: A247021 A334117 A129752 * A275169 A063176 A083372

Adjacent sequences: A015828 A015829 A015830 * A015832 A015833 A015834

Keyword

nonn

Author

Robert G. Wilson v

Status

approved