OFFSET
0,1
COMMENTS
After 2, the next prime Bell number is a(110), which has 131 digits.
LINKS
Robert Israel, Table of n, a(n) for n = 0..500
EXAMPLE
a(4) = 66 because Bell(4) = 15 and 15 + 51 = 66.
a(5) = 77 because Bell(5) = 52 and 52 + 25 = 77.
MAPLE
g:= proc(n) local L, i;
L:= convert(n, base, 10);
n + add(L[-i]*10^(i-1), i=1..nops(L))
end proc:
map(g @ combinat:-bell, [$0..30]); # Robert Israel, Mar 13 2019
MATHEMATICA
BellB[#] + FromDigits[Reverse[IntegerDigits[BellB[#]]]]&/@Range[0, 30]
PROG
(Magma) [Bell(n) + Seqint(Reverse(Intseq(Bell(n)))): n in [0..30]];
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Vincenzo Librandi, Mar 12 2019
STATUS
approved