24小时热门版块排行榜    

Znn3bq.jpeg
查看: 1031  |  回复: 1

fhn2006

新虫 (著名写手)

[求助] mathematic运行后出现错误 已有1人参与

mathematic运行后出现错误,请大神帮忙看下,程序和出现的错误如下:
Clear["`*"]
alpha = 2.5;
beta = 2;
gama = 1;
klu := Sqrt[5];
kld := Sqrt[0.45];

Tuu :=
  2 - Cos[alpha*gama*n/(beta*klu*Cos[x])] -
   Cos[alpha*gama*n/((4*klu^2*Sin[x]^2 + B)*klu*Cos[x])] -
   alpha*n/(2*beta*klu^2*Cos[x]^2)*(1 -
      Cos[alpha*gama*n/(beta*klu*Cos[x])]) -
   alpha*n/(2*(4*klu^2*Sin[x]^2 + beta)*klu^2*Cos[x]^2)*(1 -
      Cos[alpha*gama*n/((4*klu^2*Sin[x]^2 + beta)*klu*Cos[x])]);
Tdd :=
  2 - Cos[alpha*gama*n/(beta*kld*Cos[x])] -
   Cos[alpha*gama*n/((4*kld^2*Sin[x]^2 + beta)*kld*Cos[x])] -
   alpha*n/(2*beta*kld^2*Cos[x]^2)*(1 -
      Cos[alpha*gama*n/(beta*kld*Cos[x])]) -
   alpha*n/(2*(4*kld^2*Sin[x]^2 + beta)*kld^2*Cos[x]^2)*(1 -
      Cos[alpha*gama*n/((4*kld^2*Sin[x]^2 + beta)*kld*Cos[x])]);
Tud :=
  kld/klu*(2 - Cos[alpha*gama*n/(beta*kld*Cos[x])] -
      Cos[alpha*gama*n/((4*kld^2*Sin[x]^2 + beta)*kld*Cos[x])]) -
   alpha*n/(2*beta*klu*kld*Cos[x]^2)*(1 -
      Cos[alpha*gama*n/(beta*kld*Cos[x])]) -
   alpha*n/(2*(4*klu*kld*Sin[x]^2 + beta)*kld^2*Cos[x]^2)*(1 -
      Cos[alpha*gama*n/((4*kld^2*Sin[x]^2 + beta)*kld*Cos[x])]);
Tdu :=
  klu/kld*(2 - Cos[alpha*gama*n/(beta*klu*Cos[x])] -
      Cos[alpha*gama*n/((4*klu^2*Sin[x]^2 + beta)*klu*Cos[x])]) -
   alpha*n/(2*beta*klu*kld*Cos[x]^2)*(1 -
      Cos[alpha*gama*n/(beta*klu*Cos[x])]) -
   alpha*n/(2*(4*klu*kld*Sin[x]^2 + beta)*klu^2*Cos[x]^2)*(1 -
      Cos[alpha*gama*n/((4*klu^2*Sin[x]^2 + beta)*klu*Cos[x])]);

juu := NIntegrate[Tuu, {x, -1, 1}]
jdd := NIntegrate[Tdd, {x, -1, 1}]
jud := NIntegrate[Tud, {x, -1, 1}]
jdu := NIntegrate[Tdu, {x, -1, 1}]

tmr := {n, (1 - (jud + jdu)/(juu + jdd))*100}

Export["D://tunnling.txt", Table[tmr, {n, 1, 8, 1}], "Table"];  (该语句和前面不是一个模块)

NIntegrate::inumr: The integrand 2-Cos[0.559017 Sec[x]]-Cos[(1.11803 Sec[x])/(B+20 Power[<<2>>])]-0.125 (1-Cos[0.559017 Sec[x]]) Sec[x]^2-(0.25 (1-Cos[(1.11803 Sec[x])/Plus[<<2>>]]) Sec[x]^2)/(2+20 Sin[x]^2) has evaluated to non-numerical values for all sampling points in the region with boundaries {{0,1}}.
回复此楼

» 猜你喜欢

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

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

mshwangg

至尊木虫 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
ben_ladeng: 金币+2, 谢谢指教 2014-01-26 11:00:59
ben_ladeng: 专家考核 2014-01-26 11:01:11
fhn2006: 金币+5, ★★★★★最佳答案 2014-07-11 15:53:51
Tuu定义里面有个B没有赋值
2楼2014-01-25 20:38:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 fhn2006 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 求调剂,985材料与化工348分 +9 涵竹刘 2026-04-11 13/650 2026-04-12 22:40 by 涵竹刘
[考研] 279求调剂 +9 张番茄不炒蛋 2026-04-11 9/450 2026-04-12 22:22 by paopaotu326
[考研] 材料与化工300求调剂 +39 肖开文 2026-04-09 43/2150 2026-04-12 01:30 by 秋豆菜芽
[考研] 一志愿211,0703化学305分求调剂 +26 严西西戏 2026-04-06 33/1650 2026-04-11 23:01 by 314126402
[考研] 0854调剂 +8 长弓傲 2026-04-11 9/450 2026-04-11 21:44 by 蓝云思雨
[考研] 22408调剂求助 +7 毂12 2026-04-09 9/450 2026-04-11 09:23 by 哦哦123
[考研] 287求调剂 +15 Fnhc 2026-04-07 21/1050 2026-04-10 19:09 by chemisry
[考研] 301求调剂 +5 149. 2026-04-10 5/250 2026-04-10 15:45 by 柴小白
[考研] 一志愿211,化学学硕,310分,本科重点双非,求调剂 +27 努力奋斗112 2026-04-07 30/1500 2026-04-10 15:06 by Kilig0317
[考研] 青岛科技大学材料学院,环境学院调剂补录4月10日以前都可以 +3 1青科大。 2026-04-09 5/250 2026-04-10 09:58 by 翩翩一书生
[考研] 284求调剂 +7 让我上岸吧阿西 2026-04-09 7/350 2026-04-09 18:59 by haironglove
[考研] 368化学求调剂 +13 wwwwabcde 2026-04-07 14/700 2026-04-09 14:47 by heaven_jay
[考研] 085801 总分275 本科新能源 求调剂 +8 bradoner 2026-04-08 9/450 2026-04-09 13:43 by only周
[考研] 材料调剂 +14 一样YWY 2026-04-06 14/700 2026-04-08 23:00 by 猪会飞
[考研] 一志愿华东理工085601材料工程303分求调剂 +15 a1708 2026-04-06 15/750 2026-04-08 16:23 by luoyongfeng
[考研] 电子信息346 +4 zuoshaodian 2026-04-08 4/200 2026-04-08 11:54 by zzucheup
[考研] 277、学硕,求调剂 数一104, +11 瓶子PZ 2026-04-07 12/600 2026-04-07 23:30 by 一只好果子?
[考研] 一志愿南科大生物学297分,求调剂推荐 +8 Y-yyusx 2026-04-06 9/450 2026-04-07 19:38 by biomichael
[考研] 22408 318分求调剂 +4 勤奋的小笼包 2026-04-06 6/300 2026-04-07 15:05 by 纸鹤555
[考研] 327考研调剂推荐 +6 呜呜呜呜呢 2026-04-06 6/300 2026-04-06 21:39 by 啵啵啵0119
信息提示
请填处理意见