24小时热门版块排行榜    

查看: 2296  |  回复: 10

zuo19880318

银虫 (小有名气)

[求助] 求高手用MATLAB编写一个画张量积曲面的程序

希望给出16个控制顶点,即4行4列的双三次Bezier网格,画出双三次Bezier曲面。
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

wurongjun

专家顾问 (职业作家)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
zuo19880318: 金币+15, ★★★很有帮助 2013-03-30 19:53:46
function bzqum33
clear;
N=30;M=30;
x=[1 2 3 4];y=[1 2 3 4];
n=length(x)-1;
[x y]=meshgrid(x,y);
z=[1 2 2 1;
   2 2.5 2.5 2;
   2 2.5 2.5 2;
   1 2 2 1 ];
t=linspace(0,1,N);
s=linspace(0,1,M);
xst=zeros(M,N);yst=zeros(M,N);zst=zeros(M,N);
xst=T(n,s)'*x*T(n,t);
yst=T(n,s)'*y*T(n,t);
zst=T(n,s)'*z*T(n,t);
axis equal;
axis([0 6 0 6 1 3]);
for i=1:4
    plot3(x(i,,y(i,,z(i,,'-or','LineWidth',2);
    hold on;
    plot3(x(:,i),y(:,i),z(:,i),'-ob','LineWidth',2);
end
axis([0 6 0 6 1 3]);
grid on
mesh(xst,yst,zst);
colormap([1,0,0]);
hold on;
xlabel('X-axis');ylabel('Y-axis');zlabel('Z-axis');
hold off;
function y=T(n,t)
y=zeros(n,length(t));
for i=1:n+1
y(i,=nchoosek(n,i-1)*(1-t).^(n+1-i).*t.^(i-1);
end

qm.jpg

善恶到头终有报,人间正道是沧桑.
2楼2013-03-30 18:12:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zuo19880318

银虫 (小有名气)

引用回帖:
2楼: Originally posted by wurongjun at 2013-03-30 18:12:10
function bzqum33
clear;
N=30;M=30;
x=;y=;
n=length(x)-1;
=meshgrid(x,y);
z=;
t=linspace(0,1,N);
s=linspace(0,1,M);
xst=zeros(M,N);yst=zeros(M,N);zst=zeros(M,N);
xst=T(n,s)'*x*T(n,t);
yst=T ...

请问在此基础上做渐进迭代逼近(PIA),你会嘛?
3楼2013-03-30 19:53:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wurongjun

专家顾问 (职业作家)

好吧!金币要给的!!
好的!
function bzqumnn
clear;
N=30;M=30;%网格大小
x=[1 2 3 4;
   1 2 3 4;
   1 2 3 4;
   1 2 3 4];
y=[1 1 1 1;
   2 2 2 2;
   3 3 3 3;
   4 4 4 5];
z=[1 2 2 1;
   2 2.5 2.5 2;
   2 2.5 2.5 2;
   1 2 2 1 ];%十六个点的坐标,注意排成网格状
[xst,yst,zst]=bezqum(x,y,z,M,N,3);%调用函数
axis equal;
mesh(xst,yst,zst);
xlabel('X-axis');ylabel('Y-axis');zlabel('Z-axis');
function [xst,yst,zst]=bezqum(x,y,z,M,N,n)
t=linspace(0,1,N);
s=linspace(0,1,M);
xst=zeros(M,N);yst=zeros(M,N);zst=zeros(M,N);
xst=T(n,s)'*x*T(n,t);
yst=T(n,s)'*y*T(n,t);
zst=T(n,s)'*z*T(n,t);
function y=T(n,t)
y=zeros(n,length(t));
for i=1:n+1
y(i,=nchoosek(n,i-1)*(1-t).^(n+1-i).*t.^(i-1);
end

qm.jpg

善恶到头终有报,人间正道是沧桑.
8楼2013-03-30 22:35:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zuo19880318

银虫 (小有名气)

引用回帖:
8楼: Originally posted by wurongjun at 2013-03-30 22:35:36
好吧!金币要给的!!
好的!
function bzqumnn
clear;
N=30;M=30;%网格大小
x=;
y=;
z=;%十六个点的坐标,注意排成网格状
=bezqum(x,y,z,M,N,3);%调用函数
axis equal;
mesh(xst,yst,zst);
xlabel('X-axis') ...

昨天金币全给你了。已经40个给完了,现在给不了。。。
9楼2013-03-31 12:07:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wurongjun

专家顾问 (职业作家)

玩笑一下!
希望能帮到你!!
善恶到头终有报,人间正道是沧桑.
10楼2013-03-31 20:52:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

wurongjun

专家顾问 (职业作家)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
zuo19880318: 金币+25, ★★★很有帮助 2013-03-30 20:13:52
你把我给的那个程序成写成函数(输入控制顶点)型!
再根据你的判定准则迭代就行了!
善恶到头终有报,人间正道是沧桑.
4楼2013-03-30 20:08:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zuo19880318

银虫 (小有名气)

引用回帖:
4楼: Originally posted by wurongjun at 2013-03-30 20:08:06
你把我给的那个程序成写成函数(输入控制顶点)型!
再根据你的判定准则迭代就行了!

要不你帮我写成输入控制顶点型吧?,麻烦你了,可以嘛?
5楼2013-03-30 20:14:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wurongjun

专家顾问 (职业作家)

这个很简单!
你自己不会吗?
你是学过这个Matlab吧!
善恶到头终有报,人间正道是沧桑.
6楼2013-03-30 20:59:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zuo19880318

银虫 (小有名气)

引用回帖:
6楼: Originally posted by wurongjun at 2013-03-30 20:59:15
这个很简单!
你自己不会吗?
你是学过这个Matlab吧!

学的只是小小的皮毛啊。。。希望你能帮帮我把。。哈哈
7楼2013-03-30 21:48:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zuo19880318 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 基金不中,共勉 +6 eulota 2026-08-26 6/300 2026-08-27 08:00 by zzuzxg
[基金申请] 国自然面上复盘~欢迎讨论 +7 晴天加油 2026-08-26 8/400 2026-08-27 07:53 by longfie172
[基金申请] 怎么查啊 +5 huang1991js 2026-08-26 5/250 2026-08-26 16:09 by Equinoxhua
[基金申请] 2026国自然函评费到账 +22 羊腰板 2026-08-21 25/1250 2026-08-26 15:00 by zuocuiping
[基金申请] 能否退出参与的面上项目解除限项 +23 koalala 2026-08-24 26/1300 2026-08-26 14:29 by 宝贝虫子
[基金申请] 出来了 +9 trojank 2026-08-26 9/450 2026-08-26 14:25 by 宝贝虫子
[基金申请] 哪位高人中了,把查询到的截图贴出来让我看看,让我长长见识 +4 yuleib84 2026-08-26 5/250 2026-08-26 13:40 by yuleib84
[基金申请] 为什么国自然不能直接公布 +4 bjdxyxy 2026-08-26 4/200 2026-08-26 13:12 by qingmu1201
[基金申请] 国际合作可查了,中了面上 +18 Ldrop2023 2026-08-26 18/900 2026-08-26 11:15 by cmrandy
[基金申请] 系统进不去 +4 yanglien 2026-08-26 5/250 2026-08-26 11:10 by wenfengw83
[基金申请] 某些机构,以效率低为荣,以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
[基金申请] 如果此刻你正在为国基感到焦虑,不妨来听听这首《基金之外》 +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
[基金申请] 人气不行了 +11 fansofjerry 2026-08-21 11/550 2026-08-25 11:04 by 孤独的英雄6
[教师之家] 导师吐槽:我怎么摊上了这么个极品研究生! +3 苏东坡二世 2026-08-23 3/150 2026-08-25 10:35 by shisan1313
[基金申请] 建议基金发布提前给出明确的时间点 +13 kulium 2026-08-21 16/800 2026-08-24 16:27 by superceng
[基金申请] 时间戳今天,20号变了 +5 archvillain 2026-08-20 5/250 2026-08-22 06:12 by hui_daxiao
[基金申请] 看来今天不会放榜了? +8 chengyan1220 2026-08-21 11/550 2026-08-21 17:52 by dcqxinyang
[基金申请] 应该是下周三26日公布了吧? +4 哈哈蛤? 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
信息提示
请填处理意见