私の式は
$$\int_{a}^{b}\big(exp(x) +1 \big)^{i\cdot u} \cdot \text{cos} \big((x-\alpha) u \big)dx$$
統合用の R コードは次のとおりです。
a<--2; b<-2; u<-0.15; alpha<-0.8
integrand<-function(x)
{
(exp(x)+1)^(1i*u)*cos((x-alpha)*u)
}
integrate(integrand,lower=a,upper = b)
このコードを実行した後、R からエラー メッセージを受け取りました。
Error in integrate(integrand, lower = a, upper = b) :
evaluation of function gave a result of wrong type
私の間違いはどこですか?ありがとう!
どうやら、integrate
複雑な統合はできません。代わりにelliptic
パッケージを使用してくださいmyintegrate
:
a<-2
b<-2
u<-0.15
alpha<-0.8
integrand<-function(x) {
(exp(x)+1)^(1i * u)*cos((x-alpha)*u)
}
myintegrate(integrand,lower=a,upper = b)
この記事はインターネットから収集されたものであり、転載の際にはソースを示してください。
侵害の場合は、連絡してください[email protected]
コメントを追加