2015-01-17 7 views
1

의 통합은 BesselJ[0,kr] I는 제 1 종 변형 베셀 함수이다 형태티카 : 베셀 함수 및 지수 함수 및 삼각 함수

Int[k_]:=Integrate[Exp[-x]xSin[x]BesselJ[0,k*x],{x,0,10}] 

와 일체있다.

지금 내가 있습니다 .. 직접 티카에서 답변을 얻을 수

내가 Int[k]의 곡선을 얻으려면 아마 대략 내가 다음 할 수있는 acceptable..What도

?

+1

마감 된 양식 결과가 기대 되나요? 왜 그 기능에는 반대로 파생 상품이 있다고 생각합니까? – vsoftco

+0

닫힌 결과도 허용됩니다. 그냥 함수에서 결과를 얻어야합니다. 어쨌든 그것이 직접적인 대답인지 아닌지는 확실하지 않습니다. – Cici

+0

'I [k _] = ...'는'Sqrt [-1]'의 시스템 함수이기 때문에 문제가 있습니다. 관습은 내장 함수와의 충돌을 피하기 위해 사용자 정의 함수에 소문자의 첫 문자를 사용하는 것입니다. 즉'int [k _] = ... ' –

답변

2

이 함수에는 antiderivative가 없으므로 가장 좋은 방법은 수치 적으로 통합하는 것입니다. 예 :

Int[k_] := NIntegrate[Exp[-x] x Sin[x] BesselJ[0, k x], {x, 0, 10}] 
Plot[Int[k], {k, -5, 5}] 

enter image description here

추신 : 일부 오타가 있었다 나는이 질문을 편집했습니다. 심볼로 I을 사용할 수 없으며 (복잡한 경우 i) = 대신 :=을 사용해야 할 때 함수를 정의 할 때 사용할 수 없습니다.

+0

예 ... 조심성이 없어서 죄송합니다. 하아 ~~ – Cici

1

심지어 상수를 1로 설정하더라도 Mathematica는 적분에 대한 수식을 찾을 수 없습니다. 나는.

a = b = k = d = 1; 

Integrate[(a r Exp[-r] - b r Sin[k (r - d)] Exp[-r]) BesselJ[0, k r], r] 

정수는 변경되지 않고 반환됩니다.

간단한 작업으로 약간의 진행 상황을 보여 주며 수식을 반환합니다.

Integrate[Sin[k (r - d)] BesselJ[0, k r], r] 

그러나 지수 중 하나에 다시 추가하면 다시 나타납니다.

Integrate[Sin[k (r - d)] Exp[-r] BesselJ[0, k r], r] 
+0

질문이 수정되었습니다. 다시 한번 살펴 볼 수 있을까요? 나는 [k]의 곡선을 얻을 수 있습니까? – Cici