분류 | 게시판 |
베스트 |
|
유머 |
|
이야기 |
|
이슈 |
|
생활 |
|
취미 |
|
학술 |
|
방송연예 |
|
방송프로그램 |
|
디지털 |
|
스포츠 |
|
야구팀 |
|
게임1 |
|
게임2 |
|
기타 |
|
운영 |
|
임시게시판 |
|
clear all;
A=400; U=248.61;
r=[0:0.1:2]; t=[-2*pi:0.1:2*pi];
f=U*cos(t); g=-U*sin(t);
[r,t]=meshgrid(r,t);
for n=0:200
f=f+A.*(1./(2.^(n+1))).*((2.*r-2.*n.*(cos(t)+0.01.*sin(t)))./(r.^2+(1.+0.01.^2).*n.^2-2.*n.*r.*(cos(t)+0.01.*sin(t))));
end;
for n=0:200
g=g+A.*(1./(2.^(n+1))).*((-2*n.*(0.01.*cos(t)-sin(t)))./(r.^2+(1+0.01.^2).*n.^2-2.*n.*r.*(cos(t)+0.01.*sin(t))));
end;
contour(r,t,f,0:2:100);
hold on;
contour(r,t,g,0:2:100);
죄송합니다. 댓글 작성은 회원만 가능합니다.