24小时热门版块排行榜    

查看: 5013  |  回复: 8

guolianshun

铜虫 (著名写手)

[交流] 用Origin画MS中电子云密度的技术!!!超漂亮 已有8人参与

用Origin画MS中电子云密度的技术!!!超漂亮
有心人可以研究一下!!!

版主请加精啊,
费了好大力气的!
呵呵!
欢迎大家学习!

MATLAB程序用来处理MS电荷密度的等高线做法,分四步:
1.找到电荷密度图的存储文件,一般是在自己所建的计算project中,隐藏的,castep模块是.charg_frm格式的,可以用txt打开后另存为txt格式。(这个地方注意把文件单独拷贝出来,以免破坏原始文件)
2.读取数据,在matlab命令里输入一下命令:
[path,fn]=uigetfile('*.txt','Open');
fp=fopen([fn,path],'r');
head=fscanf(fp,'%s',4);
data=fscanf(fp,'%f',[4,18*18*144]);
fclose(fp);
这是读取刚才保存的txt数据的,其中18*18*144是可以改的,分别对应a,b,c的重复单元。
3.作矩阵。
a=reshape(data(1,,[18,18,144]);
b=reshape(data(2,,[18,18,144]);
c=reshape(data(3,,[18,18,144]);
d=reshape(data(4,,[18,18,144]);
其中18*18*144是可以改的,分别对应a,b,c的重复单元,即长宽高的值。
4.作等高线图
layer=1;
contour(reshape(a(:,layer,,[18,144]),reshape(c(:,layer,,[18,144]),reshape(d(:,layer,,[18,144]),8);
layer=1(2,3,4....) 可以修改作图的层数,分别是从前面到后面。最后的8表示显示线条数目,可以自己修改成9,10或其它。
hold on 表示累积作图,hold off表示清空前面的 作图
举例;做表面层和第九层的等高线图
>> layer=9;
contour(reshape(a(:,layer,,[18,144]),reshape(c(:,layer,,[18,144]),reshape(d(:,layer,,[18,144]),8);
>> hold on
>> layer=1;
contour(reshape(a(:,layer,,[18,144]),reshape(c(:,layer,,[18,144]),reshape(d(:,layer,,[18,144]),8);
这是沿侧面做等高线(即xz平面),其它方向作图类似。只要修改其中的参数就可以了,如把a(:,layer,,[18,144]),reshape(c(:,layer,,[18,144]),reshape(d(:,layer,,[18,144]),8);
改为a(layer,:,,[18,144]),reshape(c(layer,l:,,[18,144]),reshape(d(layer,:,,[18,144]),8);
一个牛人的总结,转自分子论坛。
回复此楼

» 收录本帖的淘帖专辑推荐

第一性原理 物理前沿 第一性原理计算 @个人收集@
Photochemistry 计算化学相关 精华帖子 第一性

» 本帖已获得的红花(最新10朵)

» 猜你喜欢

» 本主题相关商家推荐: (我也要在这里推广)

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lushunqi

禁虫 (小有名气)


小木虫(金币+0.5):给个红包,谢谢回帖
本帖内容被屏蔽

2楼2011-10-11 15:40:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

YUN杰2070

金虫 (小有名气)


小木虫(金币+0.5):给个红包,谢谢回帖
以后要用,不知道LZ会不会用Origin做此图,望指点一二!呵呵
不求做的最好,只求做的更好!
3楼2011-10-28 21:20:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ustc

金虫 (著名写手)

不错,值得推广
4楼2011-10-28 21:27:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
送鲜花一朵
5楼2011-10-29 23:07:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

风之梦

木虫 (小有名气)


小木虫(金币+0.5):给个红包,谢谢回帖
期待做差分密度的方法
6楼2011-10-31 09:27:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

fanny0007

金虫 (小有名气)

引用回帖:
1楼: Originally posted by guolianshun at 2011-10-11 14:41:25:
用Origin画MS中电子云密度的技术!!!超漂亮
有心人可以研究一下!!!

版主请加精啊,
费了好大力气的!
呵呵!
欢迎大家学习!

MATLAB程序用来处理MS电荷密度的等高线做法,分四步:
1.找到电荷密度 ...

收藏,谢谢
Dowhatyousay,saywhatyoudo.
7楼2011-10-31 10:24:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

余昭福

新虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
楼主的程序几乎没有能够运行的。
8楼2015-11-09 11:12:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

lywbanner

金虫 (正式写手)


小木虫: 金币+0.5, 给个红包,谢谢回帖
楼主的方法很麻烦,而且数据格式不对。我输出的电荷密度是四列而不是四行。楼主这句,data=fscanf(fp,'%f',[4,18*18*144]);,显然不对。应该为data=fscanf(fp,'%f',[18*18*144,4]);
9楼2019-01-03 13:14:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 guolianshun 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 国自然评审意见 +3 wangmingqi 2026-08-28 3/150 2026-08-28 17:43 by James-1988
[基金申请] 投票:  有多少人是今天查系统知道结果的? +16 爱看书的可乐 2026-08-26 18/900 2026-08-28 17:09 by winsaint
[基金申请] 为什么资助数各大高校都创新高,自己申请怎么就这么难 +11 Kittylucky 2026-08-27 12/600 2026-08-28 16:26 by lyxiaomc
[基金申请] 基金不中,共勉 +11 eulota 2026-08-26 11/550 2026-08-28 14:22 by 火星超人xi
[基金申请] 麻烦专家们看看评委们的意见(F口面上) +4 gdd2018 2026-08-28 9/450 2026-08-28 14:22 by jklily
[基金申请] 哪位高人中了,把查询到的截图贴出来让我看看,让我长长见识 +5 yuleib84 2026-08-26 6/300 2026-08-28 00:02 by yudaoqian88
[基金申请] 申请删除本帖 +6 lyz123lyz 2026-08-27 7/350 2026-08-27 17:31 by 宁静致远sy
[基金申请] 怎么看青基中了没有啊 +5 叶九微 2026-08-26 5/250 2026-08-27 10:35 by l_zh2008
[文学芳草园] 梦想 +3 myrtle 2026-08-26 3/150 2026-08-27 10:01 by angelyueyi
[基金申请] 我不理解! +15 Edward_pc 2026-08-26 23/1150 2026-08-26 20:34 by zzuzxg
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +7 process2012 2026-08-23 10/500 2026-08-26 19:23 by hmhminy
[基金申请] 系统查不到 +10 董八千 2026-08-26 10/500 2026-08-26 16:30 by Equinoxhua
[基金申请] 为什么国自然不能直接公布 +4 bjdxyxy 2026-08-26 4/200 2026-08-26 13:12 by qingmu1201
[基金申请] 国合里面能看到了 +7 一怀馨秋 2026-08-26 7/350 2026-08-26 11:23 by zhaosm1982
[基金申请] 项目信息和经费信息在系统里都可以看到了 +6 wittyboy 2026-08-26 14/700 2026-08-26 10:55 by wittyboy
[基金申请] 国合现在查不到了吗? +10 chengyan1220 2026-08-24 20/1000 2026-08-26 08:57 by peasantsprig
[基金申请] 牛来!米来!面来! +8 beefly 2026-08-26 8/400 2026-08-26 08:37 by xuzhipiao
[基金申请] 某些机构,以效率低为荣,以效率低作为存在感 +9 yuleib84 2026-08-25 10/500 2026-08-25 17:14 by alexon
[基金申请] 如果此刻你正在为国基感到焦虑,不妨来听听这首《基金之外》 +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
[基金申请] 没有任何消息-是不是就凉了 +9 图啦图啦 2026-08-24 10/500 2026-08-25 11:59 by 南海小哥
信息提示
请填处理意见