题主的变积分问题，可以这样来解决。
1、设定ω的变化范围，如
w=0：0.01：5
2、自定义积分函数，即
fun= @(x)(besselj(1,x)./x).^2.*cos(w*x);
3、使用integral（）积分函数，求解F(ω)值，即
F=integral(fun,0,inf);
4、利用for循环语句，求解对应ω的F(ω)值
5、使用plot（）绘制函数，绘出ω—F(ω)的关系曲线图
6、完善上述代码，运行可以得到如下图形。
7、从图形可以看到，当ω≥2时，F(ω)趋于0。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ号：24596024