24小时热门版块排行榜    

查看: 771  |  回复: 5
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

digghost

木虫 (著名写手)

[求助] 如何根据晶格常数求lennard jones 势函数的两个参量

如题:,最好带文献
回复此楼
呵呵了
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

digghost

木虫 (著名写手)

我自己弄出来了
Clear["Global`*"]
radius = 15;
a = 4.38/2
Rnm[mx_, my_, mz_] := ((mx*a)^2 + (my*a)^2 + (mz*a)^2)^0.5;


Aa = (Sum[
      If[Mod[(mx + my + mz), 2] ==
         0 && (mx != 0 || my != 0 || mz != 0), 1/(Rnm[mx, my, mz])^6,
       0], {mx, 0, radius}, {my, 0, radius}, {mz, 0, radius}]/
     Sum[If[Mod[(mx + my + mz), 2] ==
         0 && (mx != 0 || my != 0 || mz != 0), 1/(Rnm[mx, my, mz])^12,
        0], {mx, 0, radius}, {my, 0, radius}, {mz, 0, radius}]/2)^(1/
    6)
呵呵了
6楼2013-03-07 05:57:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

dahezhanjian

金虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
digghost: 金币+20, ★★★★★最佳答案, 果然还是你厉害呀 2013-03-06 13:34:59
只能求指数的大小,把所有键能加起来得到一个指数的函数,取最小值对应的指数就行了
2楼2013-03-06 07:08:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

digghost

木虫 (著名写手)

引用回帖:
2楼: Originally posted by dahezhanjian at 2013-03-06 07:08:20
只能求指数的大小,把所有键能加起来得到一个指数的函数,取最小值对应的指数就行了

请问能提供一个程序么?
呵呵了
3楼2013-03-06 13:36:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dahezhanjian

金虫 (小有名气)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ...
digghost: 金币+300, 有帮助 2013-03-06 17:14:14
Rn[mx_, my_, mz_] :=
  If[mx*my*mz == 0,
   10000, (((mx)*ax)^2 + ((my)*ay)^2 + ((mz)*az)^2)^0.5;
   U[oab_, R_] := ((oab/R)^12 - (oab/R)^6)];
radio = 10
F[oab_] :=
Sum[U[oab, Rnm[mx, my, mz]], {mx, 0, radio}, {my, 0, radio}, {mz, 1,
   radio}]
Solve[(F[oab])' == 0, oab]
4楼2013-03-06 17:01:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 考研调剂 +6 来好运来来来 2026-03-21 7/350 2026-03-25 22:43 by 418490947
[考研] 086000生物与医药292求调剂 +4 小小陈小小 2026-03-22 7/350 2026-03-25 19:07 by 星空星月
[考研] 考研一志愿苏州大学初始315(英一)求调剂 +3 sbdksD 2026-03-24 4/200 2026-03-25 18:16 by xcjcqu
[考研] 296求调剂 +4 汪!?! 2026-03-25 7/350 2026-03-25 16:41 by 汪!?!
[考研] 085602 289分求调剂 +7 WWW西西弗斯 2026-03-24 7/350 2026-03-25 14:28 by 3Strings
[考研] 求调剂 +3 李李不服输 2026-03-25 3/150 2026-03-25 13:03 by cmz0325
[考研] 289求调剂 +9 怀瑾握瑜l 2026-03-20 9/450 2026-03-25 11:02 by userper
[考研] 311求调剂 +3 冬十三 2026-03-24 3/150 2026-03-24 21:31 by peike
[考研] 材料调剂 +6 匹克i 2026-03-23 6/300 2026-03-24 21:09 by greychen00
[考研] 求调剂 +5 林之夕 2026-03-24 5/250 2026-03-24 17:16 by dick_runner
[考研] 材料292调剂 +8 橘颂思美人 2026-03-23 8/400 2026-03-24 16:33 by laoshidan
[材料工程] 一志愿C9材料与化工专业总分300求调剂 +4 曼111 2026-03-24 5/250 2026-03-24 15:44 by 星空星月
[考研] 一志愿山东大学药学学硕求调剂 +3 开开心心没烦恼 2026-03-23 4/200 2026-03-24 00:06 by 开开心心没烦恼
[考研] 336求调剂 +4 收到VS 2026-03-20 4/200 2026-03-23 19:02 by macy2011
[考研] 303求调剂 +5 安忆灵 2026-03-22 6/300 2026-03-22 12:46 by 素颜倾城1988
[考研] 求调剂 +7 Auroracx 2026-03-22 7/350 2026-03-22 12:38 by 素颜倾城1988
[考研] 0703化学297求调剂 +3 Daisy☆ 2026-03-20 3/150 2026-03-21 17:45 by ColorlessPI
[考研] 求调剂 +3 .m.. 2026-03-21 4/200 2026-03-21 16:25 by barlinike
[考研] 材料与化工(0856)304求 B区 调剂 +3 邱gl 2026-03-21 3/150 2026-03-21 13:47 by lature00
[考研] 求调剂 +3 白QF 2026-03-21 3/150 2026-03-21 13:12 by zhukairuo
信息提示
请填处理意见