声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1826|回复: 2

[编程技巧] 一个变参数的积分程序(参数放在矩阵里)

[复制链接]
发表于 2009-2-26 20:10 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
函数非常简单,语法稍微有点高级而已,仅作参考,运行后可以看到图片

function y =wjl
a = -100:100;
coef = meshgrid(a,a);
[ii,jj]= size(coef);
sol = zeros(ii,jj);
for (i =1:ii)
for (j = 1:jj)
    sol(i,j)=quad(@fun,0,10,1e-7,[],coef(i,j))  ;
end
end
y = sol;
surf(sol)
shading interp

function [y] =fun(x,n)
y = besselj(n,x);

wjlmail1@163.com
alljoyland

评分

2

查看全部评分

本帖被以下淘专辑推荐:

回复
分享到:

使用道具 举报

发表于 2009-2-26 22:26 | 显示全部楼层

回复 楼主 alljoyland 的帖子

请问是原创内容吗?
 楼主| 发表于 2009-3-19 13:39 | 显示全部楼层
我没有查过呢,不过确实是自己的东西呢,和同学讨论问题而特意编的,就算有,应该也是质量比较高的代码了,据我在论坛里所见,^_^

要点有二,
1.变参数的方法
2.如何调用工具箱函数,自定义辅助函数的编写
3.积分方法的应用
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-12-26 02:23 , Processed in 0.135935 second(s), 23 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表