小木虫 --- 600万学术达人喜爱的学术科研平台
热门搜索：
&&新手求助pwscf的进行磁性运算和LDA+U运算
新手求助pwscf的进行磁性运算和LDA+U运算
组里一直用的vasp，现在导师让学习pwscf，自己在看example和小木虫，自己捣鼓，但是最近在计算费米面的时候遇到一些问题，望各位大神能指导指导，谢谢！
1，考虑磁性的时候我是画CrO2的费米面，对Cr加了铁磁，在starting_magnetization搞了好久，因为一直没有从vasp转过来，这里是自旋极化率，值在-1到1之间，刚开始纠结好了好久，怎么会在-1到1之间呢，那么问题来了，这个值我到底怎么确定呢，如果是按计算公式，在费米能级上P=/,那绝缘体怎么办，这个值是多少呢？
2，计算的out中就给出了absolute magnetization到底是怎么回事，total magnetization这个我已经能理解，关键的是pwscf不能像vasp那样给出每个离子的磁矩，不知道每个离子的磁矩要怎么算，看到一个帖子里是这样写的，但是不是很懂，“tot_magnetization=N_total majority spin charge - N_minority spin charge
& && && && && && && &absolute_magnetization=|N_total majority spin charge -N_minority spin charge|
& && && && && && &&&例如体系为铁磁，tot_magnetization=absolute_magnetization
& && && && && && &&&体系为反铁磁性，tot_magnetization=0, absolute_magnetization= 2 * N_total majority spin charge”
对absolute magnetization还是没有感觉，也不知道单个离子的磁矩要怎么得到？
3，关于LDA+U，看了侯老子的博客，感觉是不是只要设置lda_plus_u=.true. ，再指定Hubbard_U(I)的值就可以了，因为vasp里还需要指定了是在在d或者f上加U，vasp里加U的同时要设置J的值，pwscf是不是不需要设置阿？
4，侯老师同时还给出了需要可选的参数，那些参数到底在什么时候需要考虑阿，比如：Hubbard_alpha(I)，starting_ns_eigenvalue(m,ispin,I) ，
5，如果PW/set_hubbard_l.f90 和PW/tabd.f90文件中没有定义我需要的元素，怎么修改阿，直接添加上就可以了么，还是怎么弄，有没有人修改过阿。
问题比较多，十分感谢！
这个我也是初学者不是很懂，但是我们用vasp算的时候都加了磁性的，现在用pwscf画费米面的话，应该也是要加磁性加U吧，这个磁性计算有多少不靠谱呢……
谢谢，谢谢，麻烦您了！
1.第4个问题，我不是很懂，我想问下您的意思是，考虑强关联的时候只需要设置U ，不需要考虑其他那些参数，还是在强关联的时候要考虑U，我没有很懂你的意思，就是其他那些可选的参数都选默认呢，还是在什么时候是需要设置的？
2.现在还有一个新的问题，我在计算CrO2的时候，我是用的LDA，模守恒的势，ecutwfc=30.不知道是不是小了点，因为我看到example里的Ni就放了24，就没放多大，但是当我变成100的时候，发现fermi energy 和总能量都有很大的变化，包括磁矩都在变化，是不是ecutwfc太小的原因……
麻烦了谢谢，
学术必备与600万学术达人在线互动！
扫描下载送金币查看: 1326|回复: 3
菜鸟求助！Excel宏设置出现的运行时错误1004！
阅读权限10
在线时间 小时
本帖最后由 dukeyork 于
10:39 编辑
本人刚开始学习excel中关于宏部分内容，设置了一个抽查表，但是录制宏之前的操作都没有问题，录制后执行时出现运行时错误`1004`：方法`run`作用于对象`_Application`时失败。
点调试后出现如下编码：
Sub Macro1()
' Macro1 Macro
& &&&Application.Run &ATPVBAEN.XLAM!Sample&, ActiveSheet.Range(&$A$2:$A$400&), _
& && &&&ActiveSheet.Range(&$A$5:$A$94&), &R&, 90, False
& & ActiveWindow.SmallScroll Down:=-75
& & Range(&B4:B94&).Select
& & Selection.Copy
& & ActiveWindow.SmallScroll Down:=-87
& & Range(&A4&).Select
& & Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
& && &&&SkipBlanks:=False, Transpose:=False
& & Application.CutCopyMode = False
求帮助{:soso_e154:}
阅读权限10
在线时间 小时
自顶，请帮助！
阅读权限10
在线时间 小时
再顶一下，求帮助啊
阅读权限30
在线时间 小时
再顶一下，求帮助啊
没有附件你怎么顶都没用。
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师2009年9月 总版技术专家分月排行榜第一
2009年8月 总版技术专家分月排行榜第二
2017年8月 总版技术专家分月排行榜第一
2016年2月 总版技术专家分月排行榜第二2014年2月 总版技术专家分月排行榜第二2013年4月 总版技术专家分月排行榜第二
匿名用户不能发表回复！|
每天回帖即可获得10分可用分！小技巧：
你还可以输入10000个字符
(Ctrl+Enter)
请遵守CSDN，不得违反国家法律法规。
转载文章请注明出自“CSDN（www.csdn.net）”。如是商业用途请联系原作者。}