login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A134825 Floor of the even-indexed Bernoulli numbers B_{2n} = A000367(n)/A002445(n). 2
1, 0, -1, 0, -1, 0, -1, 1, -8, 54, -530, 6192, -86581, 1425517, -27298232, 601580873, -15116315768, 429614643061, -13711655205089, 488332318973593, -19296579341940069, 841693047573682615, -40338071854059455414, 2115074863808199160560, -120866265222965259346028 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,9

REFERENCES

C. J. Moreno and S. S. Wagstaff, Jr., Sums of Squares of Integers, Chapman & Hall, 2006, p. 107.

LINKS

Table of n, a(n) for n=0..24.

FORMULA

a(n) = floor(B_(2n)), n>=0, with B_{2n} = A000367(n)/A002445(n) = A027641(2n)/A027642(2n).

EXAMPLE

n=4: B_8=-1/30=-0,033... hence a(4)=-1.

MAPLE

with(numtheory);

A134825:=proc(q) local n;

for n from 0 by 2 to q do print(floor(bernoulli(n))); od; end:

A134825(10^10); # Paolo P. Lava, Mar 20 2013

MATHEMATICA

Floor@BernoulliB[2 Range[0, 20]] (* Vladimir Reshetnikov, Nov 12 2015 *)

PROG

(PARI) vector(30, n, n--; floor(bernfrac(2*n))) \\ Altug Alkan, Nov 12 2015

CROSSREFS

Cf. A000367, A002445, A014509, A027641, A027642.

Sequence in context: A142703 A138403 A013499 * A279854 A241581 A052690

Adjacent sequences:  A134822 A134823 A134824 * A134826 A134827 A134828

KEYWORD

sign,easy

AUTHOR

Wolfdieter Lang, Nov 13 2007

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 20 19:49 EDT 2021. Contains 348118 sequences. (Running on oeis4.)