2021-02-23 10:30:12 +00:00
|
|
|
%% conductivity_calculations.m
|
|
|
|
%%
|
|
|
|
%% calculate and present 2D sheet conductivty for graphene
|
|
|
|
|
2021-03-09 10:42:13 +00:00
|
|
|
close all;clear all; clc;
|
2021-02-23 10:30:12 +00:00
|
|
|
|
|
|
|
DISPLAY_HZ = true;
|
2021-03-09 10:42:13 +00:00
|
|
|
MIN_F = 9;
|
|
|
|
MAX_F = 15;
|
|
|
|
F_TOTAL = 1e2;
|
2021-02-23 10:30:12 +00:00
|
|
|
|
2021-03-09 10:42:13 +00:00
|
|
|
x_vals = logspace(MIN_F, MAX_F, F_TOTAL); % hz
|
2021-02-23 10:30:12 +00:00
|
|
|
x_vals = x_vals .* (2*pi); % rads-1
|
|
|
|
|
2021-03-09 10:42:13 +00:00
|
|
|
cond = [];
|
|
|
|
for x=x_vals
|
|
|
|
% omega (rads-1), fermi_level (J), temp (K), scatter_lifetime (s-1)
|
2021-03-16 07:00:21 +00:00
|
|
|
cond = [cond sheet_conductivity(x, fermi_from_carrier_density(7e7, ev_to_j(2.8)), 3000, 5e-12)];
|
2021-03-09 10:42:13 +00:00
|
|
|
end
|
2021-02-23 10:30:12 +00:00
|
|
|
|
|
|
|
if DISPLAY_HZ % divide radians back to hertz
|
|
|
|
x_vals = x_vals ./ (2*pi);
|
|
|
|
end
|
|
|
|
|
2021-03-09 10:42:13 +00:00
|
|
|
figure(1);
|
2021-03-15 07:02:45 +00:00
|
|
|
hold on;
|
2021-03-09 10:42:13 +00:00
|
|
|
%plot(x_vals, real(cond));
|
|
|
|
semilogx(x_vals, real(cond));
|
|
|
|
semilogx(x_vals, imag(cond));
|
2021-02-23 10:30:12 +00:00
|
|
|
|
2021-03-15 07:02:45 +00:00
|
|
|
legend('Real', 'Imaginary');
|
|
|
|
grid;
|
|
|
|
title('2D Sheet Conductivity');
|
2021-02-23 10:30:12 +00:00
|
|
|
ylabel('Conductivity (S/m)');
|
|
|
|
if DISPLAY_HZ
|
|
|
|
xlabel('Frequency (Hz)');
|
|
|
|
else
|
|
|
|
xlabel('Frequency (rads-1)');
|
|
|
|
end
|