Borwein Integrals

Sep 23, 2018
Justin Pearson

Source: https://www.futilitycloset.com/2018/02/02/breakdown-2/

Problem statement

Check out this strange behavior:

index_1.gif

index_2.gif

index_3.gif

index_4.gif

index_5.gif

index_6.gif

index_7.gif

index_8.gif

index_9.gif

index_10.gif

index_11.gif

index_12.gif

index_13.gif

index_14.gif

index_15.gif

index_16.gif

This is quite close to π/2:

index_17.gif

index_18.gif

The next term in the series is a little farther away from π/2:

index_19.gif

index_20.gif

index_21.gif

index_22.gif

It only gets worse from there:

index_23.gif

index_24.gif

index_25.gif

index_26.gif

What’s going on here?

Analysis

Each integral is a product of scaled sinc functions, which corresponds to a convolution of scaled rect functions in the Fourier domain.

index_27.gif

Next we use the fact that the FT of a sinc is a rect. Specifically:

index_28.gif

Example:

index_29.gif

index_30.gif

So our integral becomes

index_31.gif

We now study the series of convolutions π UnitBox[π x]★ 3π UnitBox[3π x]★...

The UnitBoxes:

index_32.gif

index_33.gif

They all have unit area:

index_34.gif

index_35.gif

The boxes’ widths follow a simple pattern as they get smaller:

index_36.gif

index_37.gif

index_38.gif

Convolving these boxes together yields a progressively smoother function.

Here is the succession of convolutions

index_39.gif

index_40.gif

index_41.gif

index_42.gif

Zoom in:

index_43.gif

index_44.gif

At 0, each convolution takes the value π:

index_45.gif

index_46.gif

That’s why the integrals index_47.gif have value π/2.

However, successive convolutions’ widths get smaller:

index_48.gif

index_49.gif

index_50.gif

index_51.gif

index_52.gif

Does this sequence stay positive forever, or does it cross zero?

Brute-force find a pattern:

index_53.gif

index_54.gif

index_55.gif

index_56.gif

index_57.gif

index_58.gif

index_59.gif

index_60.gif

index_61.gif

So it looks like the x/15 term has a “negative” width, indiciating the plateau has been convolved away.

Besides this weird formula with harmonic numbers, there is a simpler way to express the widths of the convolutions. Convolving a box with a smaller box of width c reduces the width of the flat center region by c. So the width of successive box-convolutions can be found by successively subtracting box widths from the width of the original box 1/π:

index_62.gif

index_63.gif

This matches the widths we found with symbolic convolution:

index_64.gif

index_65.gif

This is good because the closed-form expression of the x/15 convolution is too big for Mathematica.

This matches the widths of our symbolic convolutions, as well as our werd formula with harmonic numbers:

index_66.gif

index_67.gif

index_68.gif

index_69.gif

The curve goes negative at x=15, meaning the convolutions have eaten up the entire flat center region at the x/15 convolution, so the value of the FT at 0 is less than π/2. I think it would be difficult to figure out how much less that π/2 it is; it’s probably easiest to just perform the infinite integral.

Created with the Wolfram Language