Используйте besselj --- функцию Бесселя первого рода --- для генерации J1
. Я полагаю, вы должны изменить a
и r
, чтобы создать "пузырь".
Я сгенерировал следующее, варьируя x
и y
из -1:0.01:1
и нанося точки сетки (x,y,f)
, не знаю, хотите ли вы этого.
код
a = 2*pi;
[X Y] = meshgrid(-1:0.01:1,-1:0.01:1);
R = sqrt(X.^2+Y.^2);
f = (2*besselj(1,a*R(:))./R(:)).^2;
mesh(X,Y,reshape(f,size(X)));
axis vis3d;
Лог участок
Предложение Doresdoom, я заменил axis vis3d;
на set(gca,'Zscale','Log')
.
Сетка