"항등식의 확인"의 두 판 사이의 차이

수학노트
둘러보기로 가기 검색하러 가기
(피타고라스님이 이 페이지의 위치를 <a href="/pages/7763844">유용한 코드 모음</a>페이지로 이동하였습니다.)
1번째 줄: 1번째 줄:
 +
# FullSimplify[ArcTan[x] - ArcSin[Sqrt[x^2/(1 + x^2)]]]<br> Table[% /. {x -> Random[], y -> Random[]}, {20}] // Chop
  
 +
 
 +
 +
# f[x_, n_] := Hypergeometric2F1[(1 - n)/2, (1 + n)/2, (x + 1)/2, 1/2]<br> g[x_, n_] := (Sqrt[Pi] 2^((1 - x)/2) Gamma[(x + 1)/2])/(<br>  Gamma[1/4 (x - n + 2)] Gamma[1/4 (x + n + 2)])<br> Table[{f[x, n], g[x, n]} /. {n -> RandomReal[{-10, 10}],<br>     x -> RandomReal[{0.1, 10}]}, {20}] // TableForm

2011년 6월 30일 (목) 07:30 판

  1. FullSimplify[ArcTan[x] - ArcSin[Sqrt[x^2/(1 + x^2)]]]
    Table[% /. {x -> Random[], y -> Random[]}, {20}] // Chop

 

  1. f[x_, n_] := Hypergeometric2F1[(1 - n)/2, (1 + n)/2, (x + 1)/2, 1/2]
    g[x_, n_] := (Sqrt[Pi] 2^((1 - x)/2) Gamma[(x + 1)/2])/(
     Gamma[1/4 (x - n + 2)] Gamma[1/4 (x + n + 2)])
    Table[{f[x, n], g[x, n]} /. {n -> RandomReal[{-10, 10}],
        x -> RandomReal[{0.1, 10}]}, {20}] // TableForm
원본 주소 "https://wiki.mathnt.net/index.php?title=항등식의_확인&oldid=22178"