Microstructural And Mechanical Properties Of Human Ribs Joseph

fcol=min(oscoor1(:,2))-205;
j=1;
for j=1:8
xy=osteoncoor{j}';
xy=[xy(:,1),xy(:,2)];
m=ones(length(xy),1);
fc=m.*fcol;
fr=m.*frow;
fr=fr;
fc=fc;
move=[fr,fc];
xy=xy-move;
osteonc{j}=xy;
end
inmin=min(xy(:,1));
inmax=inmin+inth;
extmax=max(xy(:,1));
extmin=extmax-exth;
for w=1:8
rc=osteonc{w};
a=0;
b=0;
for u=1:length(rc)
if ((rc(u,1) >= inmin) & (rc(u,1) = extmin) & (rc(u,1)