alst = Table[BernoulliB[x], {x, 0, 14}]
{1, -(1/2), 1/6, 0, -(1/30), 0, 1/42, 0, -(1/30), 0, 5/66, 0, -(691/2730), 0, 7/6}