login
Numbers k such that A000587(k) is divisible by k.
2

%I #14 Jun 20 2024 02:37:00

%S 1,2,45,350,530,737,1586,5085,38465

%N Numbers k such that A000587(k) is divisible by k.

%C No other terms below 40000.

%C No other terms below 70000. - _Amiram Eldar_, Jun 20 2024

%e 45 is in the sequence because A000587(45) = 45 * 831419830862098870594545609440899.

%t Select[Range[1000], Divisible[Abs[BellB[#, -1]], #] &]

%Y Cf. A000587, A118018, A325630.

%K nonn,hard,more

%O 1,2

%A _Vaclav Kotesovec_, Sep 09 2019