版块导航: 正在加载中...

登录注册

应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜

北京石油化工学院2026年研究生招生接收调剂公告

返回列表

本帖产生 1 个程序强帖，点击这里进行查看

当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

mafuwu

银虫 (小有名气)

应助: 0 (幼儿园)
金币: 322
帖子: 90
在线: 9.1小时
虫号: 838453
注册: 2009-09-02
性别: GG
专业: 凝聚态物性I:结构、力学和

[交流] 【求助】求助编程，急已有7人参与

有一函数2/(2 + 1/4 (a + Sqrt[a^2 + 8])^2)，画出该函数的图像，随后将函数里面的所有a替换为a (a + Sqrt[a^2 + 8])^2/16，以此进行，迭代5次。sqrt是对[a^2 + 8]开根号。用For循环，while循环，do循环都可。但要在mathematica的程序下。谢谢了

[ Last edited by senlia on 2010-4-13 at 13:44 ]

回复此楼

» 猜你喜欢

288求调剂已经有6人回复
复试调剂已经有12人回复
计算机11408，286分求调剂已经有3人回复
材料专硕322分已经有8人回复
一志愿上海海洋大学083200食品学硕，求调剂，接受其他专业083200 已经有5人回复
081200-11408-276学硕求调剂已经有5人回复
材料调剂已经有10人回复
313求调剂已经有7人回复
304求调剂（085602，过四级，一志愿985）已经有14人回复
材料工程302分求调剂已经有7人回复

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

求助Fortran编程已经有8人回复
求助delphi 编程，在window2003中输入汉字为乱码问题已经有5人回复
求助matlab编程已经有13人回复
【求助】求助 matlab编程：可否实现清除文本文档数据已经有5人回复
【求助】用matlab编程，需要将数据自检分类（高手进来指点下）已经有5人回复
【求助】有关“SW0PC_FXGP编程软件”的介绍已经有1人回复
【求助】VC++MFC编程，对话框调用单文档，还要处理一些画图的东西已经有16人回复
【求助】SAS编程出了错，看不懂，请教高手已经有8人回复
【求助】蒙卡编程问题已经有15人回复

奋斗！！！！！！

1楼 2010-04-13 09:25:33

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

1377429145

应助: (幼儿园)
在线:
虫号: 986702

★
mafuwu(金币+2):谢谢参与

好像也不是很复杂啊

赞一下(1人)

回复此楼

4楼2010-04-13 21:56:41

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

查看全部 13 个回答

resonant

木虫 (正式写手)

独自为政

程序强帖: 2
应助: 0 (幼儿园)
贵宾: 0.063
金币: 3859.3
帖子: 594
在线: 44.5小时
虫号: 113887
注册: 2005-11-23
专业: 光学

★
mafuwu(金币+2):谢谢参与

画个函数还是很简单的吧?
fa[a_]=2/(2 + 1/4 (a + Sqrt[a^2 + 8])^2);
Plot[fa[a], {a, -10, 10}, DisplayFunction -> $DisplayFunction];

[ Last edited by resonant on 2010-4-14 at 17:22 ]

赞一下(1人)

回复此楼

交朋识友，猛搞科研。两手抓，两手都要硬。

2楼2010-04-13 21:14:16

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

resonant

木虫 (正式写手)

独自为政

程序强帖: 2
应助: 0 (幼儿园)
贵宾: 0.063
金币: 3859.3
帖子: 594
在线: 44.5小时
虫号: 113887
注册: 2005-11-23
专业: 光学

★ ★ ★ ★ ★
wangen994(金币+2):感谢参与应助 2010-04-14 08:08
wangen994(金币+3):活动期间额外奖励 2010-04-14 08:08
mafuwu(金币+6):谢谢。但不对，我想让他们出现在一个程序里面，这是一个迭代程序 2010-04-14 15:16

后一半也不难

For[i = 0, i < 5, fa[a_] = 2/(2 + 1/
  4 (a + Sqrt[a^2 + 8])^2) /. a -> a (a + Sqrt[a^2 + 8])^2/16, i++]
?fa
楼主自己运行一下看看。我用的是5.2

my result:
\!$\*
  InterpretationBox[GridBox[{
      {GridBox[{
            {\(fa[a_] = 2\/\(2 +
      1\/4\ \((1\/16\
         a\ \((a + \@\(8 +
            a\^2$)\)\^2 + \@$8 +
               1\/256\ a\^2\ \((a + \@\(8 + a\^2$)\)\^4\))\)\^2\)\)}
            },
         GridBaseline->{Baseline, {1, 1}},
         ColumnWidths->0.999,
         ColumnAlignments->{Left}]}
      },
   GridBaseline->{Baseline, {1, 1}},
   ColumnAlignments->{Left}],
Definition[ "fa"],
Editable->False]\)

经再次检验，如果单次手动计算的话，似乎结果要复杂的多。可能我错了。期待高手上场。

[ Last edited by resonant on 2010-4-13 at 22:03 ]

赞一下(2人)

回复此楼

交朋识友，猛搞科研。两手抓，两手都要硬。

3楼2010-04-13 21:23:29

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

resonant

木虫 (正式写手)

独自为政

程序强帖: 2
应助: 0 (幼儿园)
贵宾: 0.063
金币: 3859.3
帖子: 594
在线: 44.5小时
虫号: 113887
注册: 2005-11-23
专业: 光学

mafuwu(金币+8):谢谢，但是我运行不出来，得不到你说的这个结果。我用的是mathematica 7.0 2010-04-20 13:46

楼主这个东西的解答应该为
For[i=1;expr=2/(2+1/4*(a+Sqrt[a^2+8])^2),i<5,i++,expr=expr/.(a->a*(a+Sqrt[a^2+8])^2/16)]
这样得到的结果就正确了——

\!$2/\((2 +
1\/4\ \((\(\(1\/65536$$(a\ \((a + \@\(8 + a\^2$)\)\^2\ $(1\/16\ a\ \
\((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^2\ $(1\/256\ a\ \((a + \@\(8 + a\^2$)\)\^2\ $(1\/16\ a\ \
\((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^2 + \@$8 + \(a\^2\ \((a + \@\(8 + a\^2$)\)\^4\ $(1\/16\ \
a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + a\^2$)\
\)\^4\))\)\^4\)\/65536\))\)\^2\ $(\(\(1\/4096$$(a\ \((a + \@\(8 + \
a\^2$)\)\^2\ $(1\/16\ a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\
\ \((a + \@\(8 + a\^2$)\)\^4\))\)\^2\ $(1\/256\ a\ \((a + \@\(8 + a\^2$)\)\
\^2\ $(1\/16\ a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \
\@\(8 + a\^2$)\)\^4\))\)\^2 + √$(8 + \(\(1\/65536$$(a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\ $(1\/16\ a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\
\ \((a + \@\(8 + a\^2$)\)\^4\))\)\^4)\)\))\))\)\^2)\)\) + √$(8 + \
\(\(1\/16777216$$(a\^2\ \((a + \@\(8 + a\^2$)\)\^4\ $(1\/16\ a\ \((a + \@\
\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^4\ $(1\/256\ a\ \((a + \@\(8 + a\^2$)\)\^2\ $(1\/16\ a\ \
\((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^2 + √$(8 + \(\(1\/65536$$(a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\ $(1\/16\ a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\
\ \((a + \@\(8 + a\^2$)\)\^4\))\)\^4)\)\))\))\)\^4)\)\))\))\)\^2)\)\) + \
√$(8 + \(\(1\/4294967296$$(a\^2\ \((a + \@\(8 + a\^2$)\)\^4\ $(1\/16\ a\ \
\((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^4\ $(1\/256\ a\ \((a + \@\(8 + a\^2$)\)\^2\ $(1\/16\ a\ \
\((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^2 + √$(8 + \(a\^2\ \((a + \@\(8 + a\^2$)\)\^4\ $(1\/16\ \
a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + a\^2$)\
\)\^4\))\)\^4\)\/65536)\))\)\^4\ $(\(\(1\/4096$$(a\ \((a + \@\(8 + a\^2$)\
\)\^2\ $(1\/16\ a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a \
+ \@\(8 + a\^2$)\)\^4\))\)\^2\ $(1\/256\ a\ \((a + \@\(8 + a\^2$)\)\^2\ \
$(1\/16\ a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 \
+ a\^2$)\)\^4\))\)\^2 + √$(8 + \(\(1\/65536$$(a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\ $(1\/16\ a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\
\ \((a + \@\(8 + a\^2$)\)\^4\))\)\^4)\)\))\))\)\^2)\)\) + √$(8 + \
\(\(1\/16777216$$(a\^2\ \((a + \@\(8 + a\^2$)\)\^4\ $(1\/16\ a\ \((a + \@\
\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^4\ $(1\/256\ a\ \((a + \@\(8 + a\^2$)\)\^2\ $(1\/16\ a\ \
\((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^2 + √$(8 + \(\(1\/65536$$(a\^2\ \((a + \@\(8 + \
a\^2$)\)\^4\ $(1\/16\ a\ \((a + \@\(8 + a\^2$)\)\^2 + \@$8 + 1\/256\ a\^2\
\ \((a + \@\(8 + \
a\^2$)\)\^4\))\)\^4)\)\))\))\)\^4)\)\))\))\)\^4)\)\))\))\)\^2)\)\)

赞一下

回复此楼

交朋识友，猛搞科研。两手抓，两手都要硬。

5楼2010-04-20 13:10:40

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

查看全部 13 个回答

最具人气热帖推荐 [查看全部]		作者	回/看	最后发表

[考研] 材料专硕(0856) 339分求调剂 +9	哈哈哈鹅哈哈哈 2026-04-04	9/450	2026-04-05 13:09 by gaoxiaoniuma
[考研] 一志愿北京化工085600 310分求调剂 +11	0856材料与化工3 2026-04-04	13/650	2026-04-05 12:50 by 418490947
[考研] 求调剂 +3	电气小神童 2026-04-04	3/150	2026-04-05 10:17 by barlinike
[考研] 286求调剂 +3	草木不言 2026-04-04	3/150	2026-04-04 22:40 by lbsjt
[考研] 材料专硕306英一数二 +8	z1z2z3879 2026-03-31	8/400	2026-04-04 22:08 by hemengdong
[考研] 292求调剂 +11	2022080213 2026-04-04	13/650	2026-04-04 18:38 by macy2011
[考研] 348分环境工程·调剂 +10	吴彦祖24k 2026-04-03	11/550	2026-04-04 14:19 by 无际的草原
[考研] 26调剂 086003 +6	失活的细胞 2026-04-04	6/300	2026-04-04 09:50 by zhangdingwa
[考研] 283分材料与化工求调剂 +29	罗KAKA 2026-04-02	29/1450	2026-04-03 23:56 by userper
[考研] 考研调剂 +5	小sun要好运 2026-04-03	5/250	2026-04-03 21:43 by 啵啵啵0119
[考研] 材料专硕322分 +13	哈哈哈吼吼吼哈 2026-04-01	13/650	2026-04-03 16:08 by 哦哦123
[考研] 数一英一285求调剂 +7	AZMK 2026-04-03	9/450	2026-04-03 13:03 by ms629
[考研] 282求调剂 +5	呼吸都是减肥 2026-03-31	5/250	2026-04-03 12:03 by 1753564080
[考研] 325分化学调剂 +5	15771691647 2026-04-02	5/250	2026-04-03 09:58 by ChemPharm
[考研] 260求调剂 +6	朱芷琳 2026-04-02	6/300	2026-04-02 20:27 by 6781022
[考研] 348环境工程调剂 +3	吴彦祖24k 2026-04-01	3/150	2026-04-02 09:14 by nanaliuyun
[考博] 26年申博 +3	staryer 2026-03-30	4/200	2026-04-01 23:21 by ai4pharm
[考研] 考研生物与医药调剂 +7	铁憨憨123425 2026-03-31	7/350	2026-04-01 08:45 by JourneyLucky
[考研] 269求调剂 +4	我想读研11 2026-03-31	4/200	2026-03-31 10:04 by cal0306
[考研] 083000环境科学与工程调剂，总分281 +4	橙子（胜意） 2026-03-30	4/200	2026-03-31 00:44 by Linzejun

24小时热门版块排行榜

mafuwu

[交流] 【求助】求助编程，急 已有7人参与

» 猜你喜欢

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

1377429145

resonant

resonant

resonant

[交流] 【求助】求助编程，急已有7人参与