RosettaCodeData/Task/Bernoulli-numbers/Mathematica/bernoulli-numbers-2.math

3 lines
77 B
Text
Raw Permalink Normal View History

2015-02-20 09:02:09 -05:00
Table[{i, BernoulliB[i]}, {i, 0, 60}];
Select[%, #[[2]] != 0 &] // TableForm