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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » MATLAB/Mathematica » 重金求matlab模拟柱面透镜全息干涉图
142/2返回列表上一页12
查看: 1681  |  回复: 13
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

hytao2012

铁杆木虫 (正式写手)

木头虫子
引用回帖:
10楼: Originally posted by 晨曦晓月 at 2014-09-05 11:33:01
怎么把像素调的高一些，条纹密度小一些...

% 区域大小就是调节像素的，un1等是调节条纹参数的，你可以试着调处自己想要的
clear; clc;
Liang=220; An=40; % 亮暗程度
A=(Liang+An)/2; B=(Liang-An)/2;
ml=800; mw=600; % 区域大小(像素)
un1=10; un2=12; un3=5; % 控制条纹曲率、粗细及频率
I=zeros(mw,ml/2);
for i=1:ml/2
    for j=1:mw
        I(j,i)=A+B*cos((i^2/ml/un1+j/mw*un2)*un3);
    end
end
% I=uint8(I);
% J=[fliplr(I) I];
% imwrite(J,'A.bmp')
J=[fliplr(I) I];
image(J)
colormap(gray(255))
axis off
axis equal
赞一下 回复此楼
11楼2014-09-05 11:41:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hytao2012

铁杆木虫 (正式写手)

木头虫子

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
晨曦晓月(jjdg代发): 金币+45, lz应对应助者的劳动及时作出评价 2014-09-13 00:35:39
clear; clc;
Liang=220; An=40; % 亮暗程度
A=(Liang+An)/2; B=(Liang-An)/2;
ml=800; mw=600; % 区域大小(像素)
un1=10; un2=12; un3=5; % 控制条纹曲率、粗细及频率
I=zeros(mw,ml/2);
for i=1:ml/2
    for j=1:mw
        I(j,i)=A+B*cos((i^2/ml/un1+j/mw*un2)*un3);
    end
end
% I=uint8(I);
% J=[fliplr(I) I];
% imwrite(J,'A.bmp')
J=[fliplr(I) I];
image(J)
colormap(gray(255))
axis off
axis equal
赞一下 回复此楼
12楼2014-09-05 11:41:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

晨曦晓月

新虫 (初入文坛)
引用回帖:
7楼: Originally posted by hytao2012 at 2014-09-05 10:25:49
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 ...

把弧状图形改成类似于牛顿环的图形
赞一下 回复此楼
13楼2014-09-16 10:28:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

Rookie88

新虫 (初入文坛)
各位大侠，江湖救急。
我现在需要一张全息图做图像处理，请问哪里有拍摄好的全息图资源？
赞一下 回复此楼
14楼2016-05-10 10:23:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 晨曦晓月 的主题更新
142/2返回列表上一页12
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭