求助：matlab语言转成fortran语言。程序如下。_百度知道
求助：matlab语言转成fortran语言。程序如下。
for n1=1:5
for n2=1:5
Pn1(n1)=(1-x^2)^(1/2)/(2^n1*factorial(n1))*diff((x^2-1)^n1,x,n1+1);
Pn2(n2)=(1-x^2)^(1/2)/(2^n2*factorial(n2))*diff((x^2-1)^n2,x,n2+1);
y(n1,n2)=int(Pn1(n1)*Pn2(n2),x,-1,1);
我有更好的答案
介个俺也不清楚，你去论坛上问问吧，
为您推荐：
其他类似问题
您可能关注的内容
fortran语言的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。求大佬帮忙把这个程序转变成其他程序。matlab.fortran.pathon都行，感激不尽【c语言吧】_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：582,883贴子：
求大佬帮忙把这个程序转变成其他程序。matlab.fortr收藏
求大佬帮忙把这个程序转变成其他程序。matlab.fortran.pathon都行，感激不尽
大神有木有啊
有偿转吗？
登录百度帐号拒绝访问 | www.bzfxw.com | 百度云加速
请打开cookies.
此网站 (www.bzfxw.com) 的管理员禁止了您的访问。原因是您的访问包含了非浏览器特征(42d377ec-ua98).
重新安装浏览器，或使用别的浏览器苹果/安卓/wp
积分 47, 距离下一级还需 38 积分
道具: 涂鸦板, 彩虹炫, 雷达卡, 热点灯, 显身卡, 匿名卡, 金钱卡下一级可获得
权限: 自定义头衔
购买后可立即获得
权限: 隐身
道具: 金钱卡, 变色卡, 彩虹炫, 雷达卡, 热点灯, 涂鸦板
　　最近开始接触ｍａｔｌａｂ编程，在循环的改进上希望通过ＭＥＸ文件来提升ｆｏｒ循环的效率，　但是在从Ｍ文件转换为ＭＥＸ文件的过程中总是遇到问题，我用的ｍａｔｌａｂ７.０，代码如下：
&& load data1.txt
&& mcc -l f2．ｍ
&& load data1.txt
&& f2(data1)
Mex file entry point is missing.&&Please check the (case-sensitive)
spelling of mexFunction (for C MEX-files), or the (case-insensitive)
spelling of MEXFUNCTION (for FORTRAN MEX-files).
??? Invalid MEX-file 'G:\matlab 7.0\work\f2.dll': 找不到指定的模块。
总是同样的错误，不知道怎么办，网上搜了一些办法感觉没什么用处。。。
一个比较常见的答案是：
是在新建的工程中的.def文件中少加了一行：.def文件EXPORTS项后面加一行语句mexFunction。但是我找不到这个ｄｅｆ文件啊！！求助。。。
方法：在Matlab图标或快捷方式图标点击右键-&属性，在起始位置一栏填写自定义路径，点击确定。再运行Matlab时会发现，Current& &Directory会变成自定义的路径。自定义路径改成程序安装的路径就好
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
&nbsp&nbsp|
如有投资本站或合作意向，请联系（010-）；
邮箱：service@pinggu.org
投诉或不良信息处理：（010-）
论坛法律顾问：王进律师matlab程序问题,那位帮着说说是什么意思,希望逐句注释
matlab程序问题,那位帮着说说是什么意思,希望逐句注释if(options.verbose）figure,for i=1:6xtest = ShapeData.x_mean + ShapeData.Evectors(:,i)*sqrt(ShapeData.Evalues(i))*3;subplot(2,3,i),%?plot(xtest(end/2+1:end),xtest(1:end/2),'r');plot(ShapeData.x_mean(end/2+1:end),ShapeData.x_mean(1:end/2),'b');endend
if(options.verbose）%判断options.verbose是不是0figure,%建立一个figure图for i=1:6 %循环xtest = ShapeData.x_mean + ShapeData.Evectors(:,i)*sqrt(ShapeData.Evalues(i))*3;%数学运算subplot(2,3,i),%?%建立一个2行3列的sub子图plot(xtest(end/2+1:end),xtest(1:end/2),'r');%在子图上画图
plot(ShapeData.x_mean(end/2+1:end),ShapeData.x_mean(1:end/2),'b');%在同一个子图上画另一个图. end%循环结束end
我有更好的回答：
剩余:2000字
与《matlab程序问题,那位帮着说说是什么意思,希望逐句注释》相关的作业问题
[y,Fs]=wavread('ringout.wav'); y=y(:,1); sigLength=length(y); %从这里开始就好 Y= fft(y,sigLength); %在sigLength这个有限区间内做快速傅立叶变换 Pyy= Y.* conj(Y) / sigL %Y乘Y的共轭,得到功
一般解非线性微分方程组可以用ode45,ode23等命令,编程时将p,v,th,x,y记为x(5),x(1),x(2),x(3),x(4)(方便方程组函数的编写就这么记号）下面便方程组函数,文件命名为myfun.mfunction dx=myfun(t,x)c=;n=;cx=;g=;r=;ta=;%参数项值自赋dx=[
n=1:100;t =atan(sqrt(1-(6.32e-4+4e-6*n)./(1.8e-9.*n.*n)))./sqrt((0.5625e-6./(1.58e-4./n+1e-6).^2)-(1./(1.264e-7+8e-10*n)));t1=.89+28.676*n)./(5.89+n)
就是想让颜色表示这个曲面的梯度而已,默认颜色表示的是这个曲面的高度（就是Z）,两幅图颜色是不一样的
改成下面这样就可以了.clctic%符号定义%重物下降的高度h%小车行驶的路程s%内部能耗系数ypxln=10000;h=0.5;nn=1000;ypxl=linspace(0.5,1,n);R2=111/R1=35/m=1;g=9.8;mz=2;&sgm=0.5/for&i=1:
1.plot（x(1:N/4)）是作图向量x的第一到第N/4个值2.f=-0.5:1/N:0.5-1/N; 中-0.5的意思是f的初值,0.5-1/N是f的最后值,1/N则是f没变化一次的增量.例如若N=10,那么f=-0.5：0.1：0.4,其实f就分别取-0.5 -0.4 -0.3 -0.2 -0.1 0 0.1
数组之间的乘除要用点乘,点除根据你的fortran程序,是不能直接乘除的,得改成for next循环a=1b=1v0=2.0for x=0:0.1:afor y=0:0.1:bv=v0for i=1:2:200v=v+4.0*v0/pi*(sin(i*x*pi/a)*sinh(i*pi*y/a)/(i*sinh(i*p
pp=spline(x0,y0);s=@(x)ppval(pp,x);for i=1:25 L(i)=quadl(s,0,i);endL是25个
有两点疑问：1、为了保证整数解且两两不等而引入的非线性等式约束,为什么不从1次方开始（当然,经测试,似乎并无影响）?2、非线性等式约束的第4次项加入时,为什么认为“得到的解是错误的”?就因为“不但不满足整数要求,最小的最大值也不为-7”吗?这种原因好像有点说不过去：（1）要满足整数解的要求,7个变量应该有7个方程的约束
Sv=1/T*2*cos(pi*f*T)^2*abs(G)^2;这个有问题.不能用*,应该用.*（点乘）.Sv=1/T*2*cos(pi*f*T)^2.*abs(G)^2;或Sv=1/T*2*abs(G)^2.*cos(pi*f*T)^2;
程序能运行 再问： 我的版本问题？ 再答： 我的2012a.再问： 我去下一个吧 谢谢
a=ones（8）生成是单位阵a（1,1）,a（2,2)都是1,不用赋值>> a=ones(8)a =1 1 1 1 1 1 1 11 1 1 1 1 1 1 11 1 1 1 1 1 1 11 1 1 1 1 1 1 11 1 1 1 1 1 1 11 1 1 1 1 1 1 11 1 1 1 1 1 1 11 1
这句话的意思是尝试将脚本文件当做函数文件.你运行时出错的原因可能是m文件开头没写函数名,或者是函数名与内部函数名冲突了.请您仔细检查一下该函数的m文件,是不是开头没有写函数名,如果没有,请补上,如果有,将函数名修改一下,然后试一下是否解决了您的问题. 希望我的解答解决了您的疑问,谢谢. 再问： 谢谢你了，这问题已经解决
哈 出结果了q1 =132.4.5.7.7913不过我原来的东东 没有了 再问： 不是说运行！是说把这个程序简化一下！用循环！ 再答： 这个我不会, 期待高手. 我回一下, 不然个人中心总提示回答有新追问 ^_^
建议数值方法求解.因为5次及以的上方程没有解析解. 再问： 您能教教我怎么求吗？谢谢了！ 再答： 我写一个示意，自己来让他运行起来。%&求两个函数的交点B&=&[1&2&3&4&5&6];C&=&[6&5&nb
你这是调用的时候出现的问题吧,在主程序中调用函数前没定义A 再问： 程序不能运行 再答： 把主程序，就是调用这个函数的程序贴一下 你不是直接运行这个函数了吧？？得调用之~
可以把错误提示贴出来吗?这样不好解决. 再问： 看看 再答： 你调用这个函数时A的值取多少呢？再问： A是迭代算出来的啊 再答： 你写的这是个function，必须要有初始的输入才能运行吧。再问： 私信聊 再答： 已经发了。
里面讲的跟你所需的一样.
fid=fopen(R,'r'); % 打开R对应的文件Sta=fscanf(fid,'%s\n',1);%读取文件内容,读取一个字符串nn=fscanf(fid,'%d\n',1); %读取一个整数,得到循环的次数for i=1:nn sta(i).s=fscanf(fid,'%s',1); %读字符串zm(i).s