%I #18 Oct 03 2016 10:48:34
%S 0,1,2,3,4,5,6,8,10,13,15,16,21,25,26,30,34,40,42,45,52,55,65,68,75,
%T 89,104,105,110,120,144,156,170,178,195,203,233,260,275,288,315,377,
%U 406,416,445,466,510,609,610,676,720,754,825,877,987,1015,1092,1165
%N Numbers of the form Bell(i)*Fibonacci(j).
%t lim=10^6; Union@ Reap[ Sow[0]; For[i = 2, (f = Fibonacci[i]) < lim, i++, For[ j=1, (p = BellB[j] f) < lim, j++, Sow@ p]]][[2, 1]] (* _Giovanni Resta_, Oct 03 2016 *)
%Y Cf. A000110, A049997, A272909, A276281.
%K nonn
%O 1,3
%A _Vincenzo Librandi_, Sep 20 2016