|
%I #23 Sep 10 2019 11:29:20
%S 1,2,35,16833,16989,23684
%N Numbers k such that A000110(k) is divisible by k.
%C No other terms below 50000.
%e 35 is in the sequence because A000110(35) = 35 * 8045720086273150473238297902
%t Select[Range[1000], Divisible[BellB[#], #] &]
%Y Cf. A000110, A051130, A066562, A073877, A113883, A280727, A325935.
%Y Cf. A014847, A016089, A023172, A051177, A056848.
%K nonn,hard,more
%O 1,2
%A _Vaclav Kotesovec_, Sep 07 2019
|
