NEGF程序计算态密度,电子密度,透射率

计算电子态密度主程序,体系的坐标和哈密顿量在之前的博客里面有

需要用Pade展开费米函数

ny=48; 
nx=3;   
% [x,y]=zigzagP(N,number);
[x,y]=zigzagP(ny,nx);                             %生成zigzag石墨烯的坐标
% plot(x,y,'.','MarkerSize',20); 
t1=-2.7;
H0=Hamiltonian_NN_graphene(x,y,t1,1);             %最近邻hooping
e=0.01;
m=length(H0);
Hab=Hab(m,e);
H0=H0+Hab;
hL=H0(1:ny,1:ny);                                 %取出最左边一列的哈密顿量,用于半无穷表面格林函数的计算
hR=H0(ny*(nx-1)+1:ny*nx,ny*(nx-1)+1:ny*nx);       %取出最右边的一列的哈密顿量
hLD=H0(1:ny,ny+1:2*ny);                           %取出最左与右边一列的耦合矩阵
hDL=hLD';
hRD=H0((nx-1)*ny+1:nx*ny,ny+1:2*ny);              %取出最右边与左边的耦合矩阵
hDR=hRD';
HD=H0(ny+1:ny*(nx-1),ny+1:(nx-1)*ny);             %取出device区域的哈密顿量
HLD=H0(1:ny,ny+1:ny*(nx-1));                      %左边与device区域的耦合矩阵
HRD=H0(ny*(nx-1)+1:ny*nx,ny+1:(nx-1)*ny);         %右边与device区域的耦合矩阵
HDL=HLD';
HDR=HRD';
density=zeros(length(HD));                        %初始化密度矩阵
%导入pade系数
file1=fopen('Rp.txt','r');                        %Pade展开费米函数的系数
file2=fopen('zp.txt','r');                        %Pade展开费米函数的留数
Rp=fscanf(file1,&#
评论 3
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值