brknvddll/optical-trap-forces
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed matlab calculations

Browse Source
This commit is contained in:
BrokenVoodooDoll
2023-03-22 14:13:17 +04:00
parent 78916d0ec9
commit bd8cd9e635
6 changed files with 13 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Matlab/axial.m
View File

@@ -12,7 +12,7 @@ load_constants
% Intensity profile plots
rho = linspace(-r_max, r_max, 500);
figure
I = gauss(rho, r_max, w0);
I = gauss(rho, w0, r_max);
I0 = max(I);
plot(rho, I/I0, 'k')
grid
@@ -20,12 +20,11 @@ xlabel('r, м')
ylabel('I(r)')
% Integration
G0 = gauss_peak(r_max, w0);
Qres_g = @(z) 2 * pi * G0 * integral2(@(beta, r) r .* gauss(r, r_max, w0) .* ...
Qres_g = @(z) 1 / (pi * w0 ^ 2) * integral2(@(beta, r) r .* gauss(r, w0, r_max) .* ...
iscomplex(qg_z_factor(r, z, n1, n2, Rsp, f)), 0, 2*pi, 0, r_max, ...
'Method', 'iterated', 'AbsTol', 1e-12, 'RelTol', 1e-6);
Qres_s = @(z) 2 * pi * G0 * integral2(@(beta, r) r .* gauss(r, r_max, w0) .* ...
Qres_s = @(z) 1 / (pi * w0 ^ 2) * integral2(@(beta, r) r .* gauss(r, w0, r_max) .* ...
iscomplex(qs_z_factor(r, z, n1, n2, Rsp, f)), 0, 2*pi, 0, r_max, ...
'Method', 'iterated', 'AbsTol', 1e-12, 'RelTol', 1e-6);