%I #7 Jul 15 2021 15:20:51
%S 4,9,16,24,25,30,36,40,42,49,54,56,64,66,70,78,81,88,100,102,104,105,
%T 110,114,121,128,130,135,136,138,144,152,154,165,169,170,174,182,184,
%U 186,189,190,192,195,196,222,225,230,231,232,238,240,246,248,250,255
%N Natural numbers n such that d(d(n)+1) > 2
%C Complement to A166546.
%H Harvey P. Dale, <a href="/A176238/b176238.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[300],DivisorSigma[0,DivisorSigma[0,#]+1]>2&] (* _Harvey P. Dale_, Jul 15 2021 *)
%Y Cf. A000005, A166546.
%K nonn
%O 1,1
%A _Giovanni Teofilatto_, Apr 12 2010
%E Extended by _Giovanni Teofilatto_, Apr 14 2010
%E Corrected (192 and 240 inserted) by _R. J. Mathar_, Apr 22 2010