Rotate the centre plate in a geometry

3 次查看（过去 30 天）

ka chun yick 2021-8-11

0
链接

此问题的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/896572-rotate-the-centre-plate-in-a-geometry

评论： darova 2021-8-20

Hi,

I wanted to rotate the inner rectangle (only) to 45 degree, which (0,0) as the fixed point as rotation. I am not sure how to do it by the coordinates. This is my code:

function Nano_Sphere_Dat_Generator
clear
clc
clf
%set value of geometric parameters
a=0.0;  
b=0.0; 
c=1000;  
plate_length=30000;  
plate_width=1000;  
pos_CNN=10000;        
channel_length=100000;  
channel_width=60000;      
upstream_dist=30000;       
CNN_width=0.001;          
%create the outer boundary
p1(1)=a-upstream_dist;
p1(2)=-channel_width/2;
p2(1)=a-upstream_dist+channel_length;
p2(2)=-channel_width/2;
p3(1)=a-upstream_dist+channel_length;
p3(2)=channel_width/2;
p4(1)=a-upstream_dist;
p4(2)=channel_width/2;
plot([p1(1),p2(1)],[p1(2),p2(2)])
hold on
plot([p2(1),p3(1)],[p2(2),p3(2)])
plot([p3(1),p4(1)],[p3(2),p4(2)])
plot([p4(1),p1(1)],[p4(2),p1(2)])
axis equal
%create the plate geometry
p5(1)=a;
p5(2)=b;
p6(1)=a+pos_CNN;
p6(2)=b;
p7(1)=a+pos_CNN+CNN_width;
p7(2)=b;
p8(1)=a+plate_length;
p8(2)=b;
p9(1)=a+plate_length;
p9(2)=b-plate_width;
p10(1)=a
p10(2)=b-plate_width;
scatter(p5(1),p5(2))
scatter(p6(1),p6(2))
scatter(p7(1),p7(2))
scatter(p8(1),p8(2))
scatter(p9(1),p9(2))
scatter(p10(1),p10(2))