The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #9 May 07 2023 12:53:41
%S 4,8,9,10,11,13,14,15,16,20,24,28,41,42,43,44,45,46,47,49,50,51,52,53,
%T 54,55,56,57,58,59,60,61,62,63,64,68,72,73,74,75,77,78,79,80,81,82,83,
%U 85,86,87,89,90,91,93,94,95,96,100,104,105,106,107,109,110,111,112,116,120,121,122,123,125,126,127,132,136,137
%N Indices of 0's in A361897.
%H Paolo Xausa, <a href="/A362453/b362453.txt">Table of n, a(n) for n = 1..20000</a> (terms 1..5250 from N. J. A. Sloane)
%t A362453[upto_]:=Module[{d=DivisorSigma[0,Range[upto]]},Table[If[First[d=Abs[Differences[d]]]==0,n,Nothing],{n,2,upto}]];A362453[200] (* _Paolo Xausa_, May 07 2023 *)
%Y Cf. A361897, A362450, A362454.
%K nonn
%O 1,1
%A _N. J. A. Sloane_, May 05 2023