24小时热门版块排行榜    

查看: 3033  |  回复: 6

deletep

新虫 (初入文坛)

[交流] MATALB生成具有指定自相关函数的粗糙表面 已有5人参与

参考文献是陈辉、胡元中的《粗擦表面计算机模拟》,,这个是我模拟的图像结果,,文献中的结果见附件
clear
clc

N=512;
L=0.05;
delta=0.05;%表面均方根粗糙度
betax=10;%x方向的相关长度
betay=10;
C=1;%功率谱密度

dx=L/N;dy=dx;
NN=-N/2:N/2-1;
[Nx,Ny]=meshgrid(NN,NN);
taux=dx.*Nx;tauy=dy.*Ny;

%%生成具有指定自相关函数的粗糙表面
eta=randn(N,N);%高斯分布白噪声
A=fft2(eta);%傅里叶变换
R=zeros(N,N);
R=delta^2*exp(-2.3*((taux/betax).^2+(tauy/betay).^2).^0.5);%自相关函数
Gz=1/(2*pi^2).*fft2(R);%功率谱密度函数
H=(Gz/C).^0.5;%传递函数
Z=H.*A;%表面高度的傅里叶变换
z=ifft2(Z);%表面高度分布

figure(1)
meshz(abs(z));
title('rough surface');
axis square

有没有哪位大神能帮忙看看,问题出在哪儿
更多 0

MATALB生成具有指定自相关函数的粗糙表面
1390271227_63743.jpg


MATALB生成具有指定自相关函数的粗糙表面-1
1390271252_165409.jpg
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

刘忆庵

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
楼主,解决模拟的粗糙表面不光滑这个问题了吗?
2楼2016-06-29 18:40:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

KA_KA_D

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
楼主,你的问题解决了吗
3楼2017-11-17 11:37:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

木石君

新虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
没看出程序有啥问题啊,哪位大神看出来了
4楼2017-12-18 15:45:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

w_tlvz_r

新虫 (初入文坛)


小木虫: 金币+0.5, 给个红包,谢谢回帖
楼主请问问题解决了吗?求指导一下,可有偿回报
5楼2018-02-02 15:51:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yanglongren

新虫 (正式写手)

6楼2018-02-03 10:17:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yanglongren

新虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
可以三个方面解决,一是N值变大,二是采取平滑编码shading  interp或者其他的平滑命令,三是扩大Z的值,使得视角深一点

发自小木虫IOS客户端
7楼2018-02-03 10:22:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 deletep 的主题更新
普通表情 高级回复 (可上传附件)
信息提示
请填处理意见