login
a(n) = Bell(n) * Fibonacci(n).
1

%I #15 Jun 21 2024 03:50:30

%S 0,1,2,10,45,260,1624,11401,86940,718998,6378625,60392730,606757968,

%T 6441153821,71969044394,843604712450,10343900299089,132335197076988,

%U 1762486467114856,24386695159343317,349913930462291580,5197925007651796446,79818442443640537653

%N a(n) = Bell(n) * Fibonacci(n).

%H G. C. Greubel, <a href="/A140588/b140588.txt">Table of n, a(n) for n = 0..520</a>

%p with(combinat): seq(bell(x)*fibonacci(x), x=0..30);

%t Table[BellB[n, 1]*Fibonacci[n, 1], {n,0,30}] (* _Zerinvary Lajos_, Jul 16 2009 *)

%o (Sage) [bell_number(m) * fibonacci(m) for m in range(31)]

%o (Magma) [Bell(n)*Fibonacci(n): n in [0..40]]; // _G. C. Greubel_, Jun 21 2024

%Y Cf. A000045, A000110.

%K nonn

%O 0,3

%A _Zerinvary Lajos_, Jul 06 2008