The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A258077 Numbers x such that (-1)sigma(x) | sigma(x), where (-1)sigma(x) is defined in A049060 and sigma(x) is the sum of the divisors of x (A000203). 2

%I

%S 1,2,3,6,14,15,30,35,42,70,78,105,190,210,348,357,418,570,714,812,910,

%T 1045,1254,2090,2436,2730,3135,4060,4522,4674,5278,6270,9990,10659,

%U 12180,12441,13566,14630,15834,16770,20026,21318,21978,23374,24244,24871,24882

%N Numbers x such that (-1)sigma(x) | sigma(x), where (-1)sigma(x) is defined in A049060 and sigma(x) is the sum of the divisors of x (A000203).

%H Amiram Eldar, <a href="/A258077/b258077.txt">Table of n, a(n) for n = 1..5000</a> (terms 1..100 from Paolo P. Lava)

%e (-1)sigma(1) = 1, sigma(1) = 1 and 1 / 1 = 1;

%e (-1)sigma(2) = 1, sigma(2) = 3 and 3 / 1 = 3;

%e (-1)sigma(35) = 24, sigma(35) = 48 and 48 / 24 = 2; etc.

%p with(numtheory): P:=proc(q) local a,b,i,j,n; for n from 1 to q do a:=ifactors(n):

%p b:=1; for i from 1 to nops(a) do b:=b*(-1+sum(a[i]^j,j=1..a[i])): od:

%p if type(sigma(n)/b,integer) then print(n); fi; od; end: P(10^6);

%Y Cf. A000203, A049060, A258079.

%K nonn

%O 1,2

%A _Paolo P. Lava_, May 19 2015

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 24 05:38 EDT 2021. Contains 348217 sequences. (Running on oeis4.)