MS能带分开matlab小程序分享

%数据前期处理方法：

1.MS计算的能带，ctrl+C；

2.把数据先粘贴到word；

3.在word中，ctrl+F,点“替换”，在“查找内容”里输入：“0 1e+308^p”（不加引号），“替换为”里什么都不填，最后点“全部替换”；

4.替换工作做完后，把所有内容复制到了下txt文档中，保存；

5.打开origin8.0,把txt文档直接拖入origin中，能带的数据就显示出来了（一个二维数组）；

6.在origin中，点：File,Export,ASCII。把数据导出为A.dat文件。

%打开Matlab，导入A.dat文件 %nb为能级数 %nc为0到1分割的点数 %键入以下命令（可以全部复制） %矩阵B即为把能带分开的数据了。

[l,m]=size(A); nc=0; for x=1:l nc=nc+1 if A(nc,1)==1,break; end end nb=l/nc; for i=1:nb t=(i-1)*nc for j=1:nc t=t+1 B(j,i+1)=A(t,2) end end for k=1:nc B(k,1)=A(k,1) end

免责声明：本文系网络转载或改编，未找到原创作者，版权归原作者所有。如涉及版权，请联系删