2020年1月20日月曜日

学習環境

解析入門(上) (松坂和夫 数学入門シリーズ 4) (松坂 和夫(著)、岩波書店)の第8章(積分の計算)、8.2(定積分の計算)、問題9の解答を求めてみる。


  1. 0<α1

    の場合、 x が0のとき特異点ではないので、

    limx0+sinxxα

    は収束し、 極限をもつ。

    また、

    0<p<q

    のとき、 部分積分法により、

    pqsinxxαdx=-cosxxαqp-pqα-1xα-1cosxx2αdx=-cosppα+cosqqα-α-1pqcosxxα+1dx

    であり、

    cosx1

    であるから

    pqsinxxαdx1pα+1qα+pq1xα+1dx=1pα+1qα-1αx-αpq=1pα+1qα-1α1qα-1pα=1pα+1qα-1α·1qα+1α·1pα1αpα+1qα-1qα+1α1pα=2αpα

    よって 任意の正の実数

    ε>0

    に対し、

    ε<2αpα

    を満たすように p をとれば、

    pqsinxxαdx<ε

    よって、 積分

    0sinxxαdx

    は収束する。

    また、

    1<α<2

    の場合、

    0<α-1<1limx0+xα-1sinxxα=limx0+sinxx=1

    より、 x が0のとき、積分は絶対収束する。

    無限区間のとき、

    0<α1

    のときと同様に積分は収束する。

    よって、

    0<α<2

    ならば、 積分

    0sinxxαdx

    は収束する。

    また、

    1<α<2

    の場合、

    1sinxxαdx11xαdx

    となり、

    11xαdx

    は収束するので、 上記のことと合わせて、

    0sinxxαdx

    は絶対収束である。

    また、

    0<α1

    の場合、

    1sinxxαdx1sinxxdx11xdx

    となり、

    11xdx

    は発散するから、

    0sinxxαdx

    は絶対収束ではない。

    (証明終)

コード

#!/usr/bin/env python3
from sympy import pprint, symbols, Integral, sin, oo, plot, Rational

print('9.')

x, a = symbols('x, a', real=True)
f = sin(x)
g = x ** a
h = f / g
I = Integral(h, (x, 0, oo))
for o in [I, I.doit()]:
    pprint(o)
    print()

for a0 in [Rational(1, 2), 1, Rational(3, 2)]:
    Ia = I.subs({a: a0})
    for o in [Ia, Ia.doit()]:
        pprint(o)
        print()

Iabs = Integral(abs(h), (x, 0, oo))

for o in [Iabs, Iabs.doit()]:
    pprint(o)
    print()

p = plot(f, *[t.subs({a: a0})
              for t in [g, h, abs(h)]
              for a0 in [Rational(1, 2), 1, Rational(3, 2)]],
         (x, 0.1, 10),
         ylim=(-5, 5),
         legend=False,
         show=False)

colors = ['red', 'green', 'blue', 'brown', 'orange',
          'purple', 'pink', 'gray', 'skyblue', 'yellow']

for o, color in zip(p, colors):
    o.line_color = color

for o in zip(p, colors):
    pprint(o)

p.show()
p.save('sample9.png')

入出力結果(Zsh、PowerShell、Terminal、Jupyter(IPython))

% ./sample9.py
9.
∞              
⌠              
⎮  -a          
⎮ x  ⋅sin(x) dx
⌡              
0              

⎧     a   1                               
⎪   - ─ - ─                               
⎪     2   2     ⎛    a⎞                   
⎪2⋅4       ⋅√π⋅Γ⎜1 - ─⎟                   
⎪               ⎝    2⎠                   
⎪──────────────────────  for a > 0 ∧ a < 2
⎪        ⎛a   1⎞                          
⎪       Γ⎜─ + ─⎟                          
⎨        ⎝2   2⎠                          
⎪                                         
⎪   ∞                                     
⎪   ⌠                                     
⎪   ⎮  -a                                 
⎪   ⎮ x  ⋅sin(x) dx          otherwise    
⎪   ⌡                                     
⎪   0                                     
⎩                                         

∞          
⌠          
⎮ sin(x)   
⎮ ────── dx
⎮   √x     
⌡          
0          

√2⋅√π
─────
  2  

∞          
⌠          
⎮ sin(x)   
⎮ ────── dx
⎮   x      
⌡          
0          

π
─
2

∞          
⌠          
⎮ sin(x)   
⎮ ────── dx
⎮   3/2    
⎮  x       
⌡          
0          

√2⋅√π

∞            
⌠            
⎮ │sin(x)│   
⎮ ──────── dx
⎮   │ a│     
⎮   │x │     
⌡            
0            

∞            
⌠            
⎮ │sin(x)│   
⎮ ──────── dx
⎮   │ a│     
⎮   │x │     
⌡            
0            

(cartesian line: sin(x) for x over (0.1, 10.0), red)
(cartesian line: sqrt(x) for x over (0.1, 10.0), green)
(cartesian line: x for x over (0.1, 10.0), blue)
(cartesian line: x**(3/2) for x over (0.1, 10.0), brown)
(cartesian line: sin(x)/sqrt(x) for x over (0.1, 10.0), orange)
(cartesian line: sin(x)/x for x over (0.1, 10.0), purple)
(cartesian line: sin(x)/x**(3/2) for x over (0.1, 10.0), pink)
(cartesian line: Abs(sin(x))/Abs(sqrt(x)) for x over (0.1, 10.0), gray)
(cartesian line: Abs(sin(x))/Abs(x) for x over (0.1, 10.0), skyblue)
(cartesian line: Abs(sin(x))/Abs(x**(3/2)) for x over (0.1, 10.0), yellow)
%

0 コメント:

コメントを投稿