File:Drum_vibration_mode02.gif
From Wikipedia, the free encyclopedia
Drum_vibration_mode02.gif (۲۵۲ × ۱۶۹ پیکسل، اندازهٔ پرونده: ۲۰۰ کیلوبایت، نوع MIME پرونده: image/gif، چرخشدار، ۱۹ قاب، ۱٫۹ ثانیه)
![]() | این پرونده در ویکیانبار موجود است. محتویات صفحهٔ توصیف آن در زیر نمایش داده میشود. |
توضیحDrum vibration mode02.gif | Illustration of vibrations of a drum. |
تاریخ | (UTC) |
منبع | self-made with MATLAB |
پدیدآور | Oleg Alexandrov |
دیگر نسخهها | آثار انشقاقی از این پرونده: Membrane-normal-modes.gif |
Public domainPublic domainfalsefalse |
![]() |
من، دارنده حق تکثیر این اثر، این اثر را به مالکیت عمومی منتشر میکنم. این قابل اجرا در تمام نقاط جهان است. در برخی از کشورها ممکن است به صورت قانونی این امکانپذیر نباشد؛ اگر چنین است: من اجازهٔ استفاده از این اثر را برای هر مقصودی، بدون هیچگونه شرایطی میدهم، تا وقتی که این شرایط توسط قانون مستلزم نشده باشد. |
Source code (MATLAB)
function main()
k = 0; % k-th asimuthal number and bessel function
p = 2; % p-th bessel root
q=find_pth_bessel_root(k, p);
N=20; % used for plotting
% Get a grid
R1=linspace(0.0, 1.0, N);
Theta1=linspace(0.0, 2*pi, N);
[R, Theta]=meshgrid(R1, Theta1);
X=R.*cos(Theta);
Y=R.*sin(Theta);
T=linspace(0.0, 2*pi/q, N); T=T(1:(N-1));
for iter=1:length(T);
t = T(iter);
Z=sin(q*t)*besselj(k, q*R).*cos(k*Theta);
figure(1); clf;
surf(X, Y, Z);
caxis([-1, 1]);
shading faceted;
colormap autumn;
% viewing angle
view(108, 42);
axis([-1, 1, -1, 1, -1, 1]);
axis off;
H=text(0, -0.3, 1.4, sprintf('(%d, %d) mode', k, p), 'fontsize', 25);
file=sprintf('Frame%d.png', 1000+iter);
disp(sprintf('Saving to %s', file));
print('-dpng', '-zbuffer', '-r100', file);
pause(0.1);
end
% converted to gif with the command
% convert -antialias -loop 10000 -delay 10 -scale 50% Frame10* Drum_vibration_mode02.gif
function r = find_pth_bessel_root(k, p)
% a dummy way of finding the root, just get a small interval where the root is
X=0.5:0.5:(10*p+1); Y = besselj(k, X);
[a, b] = find_nthroot(X, Y, p);
X=a:0.01:b; Y = besselj(k, X);
[a, b] = find_nthroot(X, Y, 1);
X=a:0.0001:b; Y = besselj(k, X);
[a, b] = find_nthroot(X, Y, 1);
r=(a+b)/2;
function [a, b] = find_nthroot(X, Y, n)
l=0;
m=length(X);
for i=1:(m-1)
if ( Y(i) >= 0 & Y(i+1) <= 0 ) | ( Y(i) <= 0 & Y(i+1) >= 0 )
l=l+1;
end
if l==n
a=X(i); b=X(i+1);
%disp(sprintf('Error in finding the root %0.9g', b-a));
return;
end
end
disp('Root not found!');
عنوان
شرحی یکخطی از محتوای این فایل اضافه کنید
آیتمهایی که در این پرونده نمایش داده شدهاند
توصیفها
این خصوصیت مقداری دارد اما نامشخص است.
۱۲ ژانویهٔ 2008
image/gif
تاریخچهٔ پرونده
روی تاریخ/زمانها کلیک کنید تا نسخهٔ مربوط به آن هنگام را ببینید.
تاریخ/زمان | بندانگشتی | ابعاد | کاربر | توضیح | |
---|---|---|---|---|---|
کنونی | ۱۸ مارس ۲۰۲۳، ساعت ۱۱:۱۲ | ![]() | ۲۵۲ در ۱۶۹ (۲۰۰ کیلوبایت) | Dndnrmn1 | Reverted to version as of 06:25, 12 January 2008 (UTC) |
۱۶ ژانویهٔ ۲۰۰۸، ساعت ۰۴:۴۴ | ![]() | ۲۴۸ در ۱۳۰ (۱۹۱ کیلوبایت) | Oleg Alexandrov | Strip caption, looks better like this | |
۱۲ ژانویهٔ ۲۰۰۸، ساعت ۰۶:۲۵ | ![]() | ۲۵۲ در ۱۶۹ (۲۰۰ کیلوبایت) | Oleg Alexandrov | ||
۱۲ ژانویهٔ ۲۰۰۸، ساعت ۰۶:۲۱ | ![]() | ۲۵۳ در ۱۹۴ (۲۰۲ کیلوبایت) | Oleg Alexandrov | {{Information |Description=Illustration of vibrations of a drum. |Source=self-made with MATLAB |Date=~~~~~ |Author= Oleg Alexandrov |Permission= |other_versions= }} {{PD-self}} ==Source code ([[: |
کاربرد پرونده
این پرونده در هیچ صفحهای به کار نرفته است.
کاربرد سراسری پرونده
ویکیهای دیگر زیر از این پرونده استفاده میکنند:
- کاربرد در ast.wikipedia.org
- کاربرد در bs.wikipedia.org
- کاربرد در ca.wikipedia.org
- کاربرد در de.wikipedia.org
- کاربرد در el.wikipedia.org
- کاربرد در en.wikipedia.org
- کاربرد در en.wikiversity.org
- کاربرد در es.wikipedia.org
- کاربرد در fr.wikipedia.org
- کاربرد در ko.wikipedia.org
- کاربرد در ru.wikipedia.org
- کاربرد در sh.wikipedia.org
- کاربرد در sq.wikipedia.org
- کاربرد در sr.wikipedia.org
- کاربرد در te.wikipedia.org
- کاربرد در zh.wikipedia.org