Checked content

File:Wave packet.svg

Description Illustration of a wave packet.
Date 06:28, 2 December 2007 (UTC)
Source Self made, based on Image:Photon paquet onde.png. Released in the public domain.
Author Oleg Alexandrov
Public domain I, the copyright holder of this work, release this work into the public domain. This applies worldwide.
In some countries this may not be legally possible; if so:
I grant anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

% Illustration of a wave packet
 
L = 1.7; % 2*L=length of domain
A = 1.2; % max amplitude
 
K = 1.3; % gaussian param
fast_wl = 52;
slow_wl = 4;
 
N = 500; % num of data points
lw = 40; % linewidth of curves
 
X = linspace(-L, L, N);
%Y = cos(X*slow_wl)./(1 + (X/K).^2);
q=1.5;
Y = A*cos(abs(X).^q*slow_wl).*exp(-K*X.^2);
 
num_P=1; % how many periods to keep
Y( find (abs(X) > ((2*num_P+0.5)*pi/slow_wl)^(1/q)) )=0;
Z = Y.*cos(fast_wl*X);
 
% KSmrq's colors
red    = [0.867 0.06 0.14];
blue   = [0, 129, 205]/256;
green  = [0, 200,  70]/256;
yellow = [254, 194,   0]/256;
white = 0.99*[1, 1, 1];
black = [0, 0, 0];
 
figure(1); clf; hold on; axis equal; axis off;
lw2=0.7*lw;
plot(X, Y, 'colour', red, 'linewidth', lw2, 'linestyle', '--')
plot(X, -Y, 'colour', red, 'linewidth', lw2, 'linestyle', '--')
plot(X, Z,  'colour', blue, 'linewidth', lw)
 
saveas(gcf, 'Wave_packet.eps', 'psc2') % save as eps
%plot2svg(Wave_packet.svg')             % save as svg  (need the svg package for that)
The following pages on Schools Wikipedia link to this image (list may be incomplete):

Metadata

Want to know more?

Schools Wikipedia has been carefully checked to give you the best learning experience. Thanks to SOS Children, 62,000 children are enjoying a happy childhood, with a healthy, prosperous future ahead of them. Will you help another child today?