应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » MATLAB/Mathematica » 重金求matlab模拟柱面透镜全息干涉图
51/1返回列表
查看: 1728  |  回复: 13
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

晨曦晓月

新虫 (初入文坛)

[求助] 重金求matlab模拟柱面透镜全息干涉图 已有1人参与

要程序能模拟出所给图形，谢了。

重金求matlab模拟柱面透镜全息干涉图
untitled.jpg
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2014-09-04 18:03:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hytao2012

铁杆木虫 (正式写手)

木头虫子
引用回帖:
5楼: Originally posted by 晨曦晓月 at 2014-09-05 10:08:16
图片要求fig格式...

clear; clc;
Liang=220; An=40; % 亮暗程度
A=(Liang+An)/2; B=(Liang-An)/2;
mylength=800; mywidth=600; % 区域大小
unknow1=2; unknow2=20; unknow3=100; % 控制条纹粗细、曲率及栅线频率
I=zeros(mywidth,mylength/2);
for i=1:mylength/2
    for j=1:mywidth
        I(j,i)=A-B*cos(2*pi/unknow1*(j/unknow2+(i/unknow3)^2));
    end
end
% I=uint8(I);
% J=[fliplr(I) I];
% imwrite(J,'A.bmp')
J=[fliplr(I) I];
image(J)
colormap(gray(255))
赞一下 回复此楼
7楼2014-09-05 10:25:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 14 个回答

hytao2012

铁杆木虫 (正式写手)

木头虫子

【答案】应助回帖

★ ★ ★ ★ ★
感谢参与，应助指数 +1
晨曦晓月(xzhdty代发): 金币+5, 谢谢参与 2014-09-07 10:13:09
% 模拟光栅
clear; clc;
f0=10; % 栅线频率
Liang=220; An=40; % 亮暗程度
A=(Liang+An)/2; B=(Liang-An)/2;
mylength=150; mywidth=100; % 区域大小
unknow=10; % 控制条纹粗细及曲率
I=zeros(mywidth,mylength/2);
for i=1:mylength/2
    for j=1:mywidth
        I(j,i)=A-B*cos(2*pi/f0*(j+(i/10)^2));
    end
end
I=uint8(I);
J=fliplr(I);
K=[J I];
imwrite(K,'A.bmp')
赞一下 回复此楼
2楼2014-09-04 19:47:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hytao2012

铁杆木虫 (正式写手)

木头虫子

【答案】应助回帖

% 不好意思上面没调参数，感觉下面这组数比较像
% 模拟光栅
clear; clc;
f0=20; % 栅线频率
Liang=220; An=40; % 亮暗程度
A=(Liang+An)/2; B=(Liang-An)/2;
mylength=800; mywidth=600; % 区域大小
unknow=20; % 控制条纹粗细及曲率
I=zeros(mywidth,mylength/2);
for i=1:mylength/2
    for j=1:mywidth
        I(j,i)=A-B*cos(2*pi/f0*(j+(i/unknow)^2));
    end
end
I=uint8(I);
J=fliplr(I);
K=[J I];
imwrite(K,'A.bmp')
赞一下 回复此楼
3楼2014-09-04 19:51:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hytao2012

铁杆木虫 (正式写手)

木头虫子

【答案】应助回帖

% 最后一次。。。
% 模拟光栅
clear; clc;
Liang=220; An=40; % 亮暗程度
A=(Liang+An)/2; B=(Liang-An)/2;
mylength=800; mywidth=600; % 区域大小
unknow1=10; unknow2=20; unknow3=110; % 控制栅线频率、粗细及曲率
I=zeros(mywidth,mylength/2);
for i=1:mylength/2
    for j=1:mywidth
        I(j,i)=A-B*cos(unknow1*((j/unknow2)+(i/unknow3)^2));
    end
end
I=uint8(I);
J=[fliplr(I) I];
imwrite(J,'Image.bmp')
赞一下 回复此楼
4楼2014-09-04 22:00:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 14 个回答
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 310求调剂 +3 baibai1314 2026-03-16 3/150 2026-03-21 03:56 by JourneyLucky
[考研] 华东师范大学-071000生物学-293分-求调剂 +3 研究生何瑶明 2026-03-18 3/150 2026-03-21 01:30 by JourneyLucky
[考研] 22408 344分 求调剂 一志愿 华电计算机技术 +4 solanXXX 2026-03-20 4/200 2026-03-20 23:49 by alg094825
[考研] 330求调剂 +4 小材化本科 2026-03-18 4/200 2026-03-20 23:13 by JourneyLucky
[考研] 考研调剂求学校推荐 +3 伯乐29 2026-03-18 5/250 2026-03-20 22:59 by JourneyLucky
[考研] 324求调剂 +5 lucky呀呀呀鸭 2026-03-20 5/250 2026-03-20 22:30 by 促天成
[考研] 288求调剂 +16 于海海海海 2026-03-19 16/800 2026-03-20 22:28 by JourneyLucky
[考研] 317求调剂 +5 申子申申 2026-03-19 9/450 2026-03-20 22:26 by JourneyLucky
[考研] 一志愿苏州大学材料求调剂，总分315（英一） +5 sbdksD 2026-03-19 5/250 2026-03-20 22:10 by luoyongfeng
[考研] 中南大学化学学硕337求调剂 +3 niko- 2026-03-19 6/300 2026-03-20 21:58 by luoyongfeng
[考研] 材料学求调剂 +4 Stella_Yao 2026-03-20 4/200 2026-03-20 20:28 by ms629
[考研] 08工学调剂 +5 用户573181 2026-03-20 5/250 2026-03-20 15:47 by xia_2003
[考研] 复试调剂 +4 z1z2z3879 2026-03-14 6/300 2026-03-19 17:18 by fei626-918
[考研] 311求调剂 +6 26研0 2026-03-15 6/300 2026-03-18 14:43 by haxia
[考研] 302求调剂 +10 呼呼呼。。。。 2026-03-17 10/500 2026-03-18 12:45 by Linda Hu
[考研] 304求调剂 +12 小熊joy 2026-03-14 13/650 2026-03-18 12:34 by Linda Hu
[考研] 333求调剂 +3 文思客 2026-03-16 7/350 2026-03-16 18:21 by 文思客
[考研] 304求调剂 +5 素年祭语 2026-03-15 5/250 2026-03-16 17:00 by 我的船我的海
[考研] 304求调剂 +3 曼殊2266 2026-03-14 3/150 2026-03-16 16:39 by houyaoxu
[考研] 一志愿哈工大材料324分求调剂 +5 闫旭东 2026-03-14 5/250 2026-03-14 14:53 by 木瓜膏
信息提示
关闭
请填处理意见
关闭