1.问题描述:
碎片拼接
2.部分程序:
%cd piecejoint
a=tic;
%%
global allP
global margl margr
global ld
global pn pw ph
allP=brief_pretreat;
[margl,margr]=extractmargin;
lmark=brief_markline_accurate;
% save(‘a’,’lmark’)
% load(‘a’)
%%%%%%%%%%%%%%%%%%%
pind=zeros(11,19);
tick=[0 4.5 10 20 26 30 36 40 47.5 50 57.01 60];
for k=1:11
pind(k,:)=find(tick(k)<lmark&lmark<tick(k+1));
end
rerow=[4 6 8 10 2 3 5 7 9 11 1];
pind=pind(rerow,:);
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%55
P=zeros(11,19);
for k=1:11
P(k,:)=arrangemethod3_1(pind(k,:));
end
%writecomP(P,1)
%showP(P)
%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
upind=[];
dnind=P(2,:);
ppind=pind([1,7],:);
ppind=ppind(:);
P(1,:)=arrangemethod4(upind,ppind,dnind);
%showP(P(1:2,:))
upind=P(6,:);
dnind=P(8,:);
ppind=pind([1,7],:);
ppind=ppind(:);
P(7,:)=arrangemethod4(upind,ppind,dnind);
%showP(P(6:8,:))
%show2line(ppind(1:19)-1,ppind(20:38)-1)
%%%%%%%%%%%%%%%%%%%5
showP(P)
toc(a)
3.仿真结论:
C74
今天的文章碎片拼接分享到此就结束了,感谢您的阅读,如果确实帮到您,您可以动动手指转发给其他人。
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。
如需转载请保留出处:https://bianchenghao.cn/28260.html