2021-02-23 10:30:12 +00:00
|
|
|
%% conductivity_calc_surface.m
|
|
|
|
%%
|
|
|
|
%% calculate and present 2D sheet conductivty for graphene
|
|
|
|
|
|
|
|
close all; clear all; clc;
|
|
|
|
|
|
|
|
DISPLAY_HZ = true;
|
|
|
|
|
2021-03-09 10:42:13 +00:00
|
|
|
MIN_F = 0;
|
|
|
|
MAX_F = 15; % Hz
|
|
|
|
F_TOTAL = 50;
|
|
|
|
|
|
|
|
MAX_Y = 30; % carriers
|
|
|
|
Y_TOTAL = 50;
|
|
|
|
|
2021-03-16 07:00:21 +00:00
|
|
|
t = 2.8; % eV
|
|
|
|
|
2021-03-09 10:42:13 +00:00
|
|
|
f_vals = logspace(MIN_F, MAX_F, F_TOTAL); % hz
|
2021-02-23 10:30:12 +00:00
|
|
|
f_vals = f_vals .* (2*pi); % rads-1
|
|
|
|
|
2021-03-16 07:00:21 +00:00
|
|
|
carrier_vals = logspace(0, MAX_Y, Y_TOTAL); % m-2
|
|
|
|
%carrier_vals = carrier_vals + 273.15;
|
|
|
|
|
|
|
|
fermi_vals = zeros(1, length(carrier_vals));
|
|
|
|
for carr=1:length(carrier_vals)
|
|
|
|
fermi_vals(carr) = fermi_from_carrier_density(carrier_vals(carr), ev_to_j(t));
|
|
|
|
end
|
2021-02-23 10:30:12 +00:00
|
|
|
|
2021-03-16 07:00:21 +00:00
|
|
|
cond = zeros(length(f_vals), length(fermi_vals));
|
2021-02-23 10:30:12 +00:00
|
|
|
for freq=1:length(f_vals)
|
2021-03-16 07:00:21 +00:00
|
|
|
for y=1:length(fermi_vals)
|
|
|
|
% omega (rads-1), fermi_level (eV), temp (K), scatter_lifetime (s-1)
|
|
|
|
cond(freq, y) = sheet_conductivity(f_vals(freq), fermi_vals(y), 300, 5e-12);
|
2021-02-23 10:30:12 +00:00
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
if DISPLAY_HZ % divide radians back to hertz
|
|
|
|
f_vals = f_vals ./ (2*pi);
|
|
|
|
end
|
|
|
|
|
2021-03-09 10:42:13 +00:00
|
|
|
figure(1)
|
2021-03-16 07:00:21 +00:00
|
|
|
surf(f_vals, carrier_vals, transpose(real(cond)));
|
2021-03-09 10:42:13 +00:00
|
|
|
h = gca;
|
|
|
|
rotate3d on
|
2021-03-10 19:59:34 +00:00
|
|
|
grid;
|
|
|
|
colorbar;
|
2021-03-09 10:42:13 +00:00
|
|
|
set(h, 'xscale', 'log')
|
|
|
|
set(h, 'yscale', 'log')
|
|
|
|
title('2D Sheet Real Conductivity');
|
|
|
|
ylabel('Net Carrier Density');
|
|
|
|
zlabel('Conductivity (S/m)');
|
|
|
|
if DISPLAY_HZ
|
|
|
|
xlabel('Frequency (Hz)');
|
|
|
|
else
|
|
|
|
xlabel('Frequency (rads-1)');
|
|
|
|
end
|
2021-02-23 10:30:12 +00:00
|
|
|
|
2021-03-09 10:42:13 +00:00
|
|
|
figure(2)
|
2021-03-16 07:00:21 +00:00
|
|
|
surf(f_vals, carrier_vals, transpose(imag(cond)));
|
2021-02-23 10:30:12 +00:00
|
|
|
h = gca;
|
|
|
|
rotate3d on
|
2021-03-10 19:59:34 +00:00
|
|
|
grid;
|
|
|
|
colorbar;
|
2021-02-23 10:30:12 +00:00
|
|
|
set(h, 'xscale', 'log')
|
2021-03-09 10:42:13 +00:00
|
|
|
set(h, 'yscale', 'log')
|
|
|
|
title('2D Sheet Imaginary Conductivity');
|
|
|
|
ylabel('Net Carrier Density');
|
2021-02-23 10:30:12 +00:00
|
|
|
zlabel('Conductivity (S/m)');
|
|
|
|
if DISPLAY_HZ
|
|
|
|
xlabel('Frequency (Hz)');
|
|
|
|
else
|
|
|
|
xlabel('Frequency (rads-1)');
|
|
|
|
end
|
2021-03-09 10:42:13 +00:00
|
|
|
|