24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1282  |  回复: 12
本帖产生 1 个 程序强帖 ,点击这里进行查看
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

mafuwu

银虫 (小有名气)

[交流] 【求助】求助编程,急 已有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 ]
回复此楼
奋斗!!!!!!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

resonant

木虫 (正式写手)

独自为政

mafuwu(金币+4):恩,谢谢 2010-04-20 21:44
hehe,楼主真是抱歉,我用5.2
原来装过7,结果由于乱改Preference,导致出现了意想不到的错误,卸掉以后只能等下次系统重装才能再安装这个了。

其实你要不用多核心的cpu,一般功能的话估计5.2和6.0也差不多。哈哈,只要能实现功能不妨用个低版本,占系统资源还少点。
交朋识友,猛搞科研。两手抓,两手都要硬。
7楼2010-04-20 13:50:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 13 个回答

resonant

木虫 (正式写手)

独自为政


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 ]
交朋识友,猛搞科研。两手抓,两手都要硬。
2楼2010-04-13 21:14:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

resonant

木虫 (正式写手)

独自为政

★ ★ ★ ★ ★
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 ]
交朋识友,猛搞科研。两手抓,两手都要硬。
3楼2010-04-13 21:23:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

1377429145


mafuwu(金币+2):谢谢参与
好像也不是很复杂啊
4楼2010-04-13 21:56:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 复试调剂 +8 春日来信- 2026-04-03 8/400 2026-04-05 18:58 by 蓝云思雨
[考研] 0855求调剂材料 +10 红桃灼灼 2026-04-04 10/500 2026-04-05 18:08 by 猪会飞
[考研] 考研调剂 +3 mcbbc 2026-04-04 3/150 2026-04-05 10:03 by barlinike
[考研] 求调剂 +10 熊二想上岸 2026-04-04 10/500 2026-04-05 08:09 by qlm5820
[考研] 材料与化工306分找调剂 +12 沧海轻舟e 2026-04-03 13/650 2026-04-04 23:45 by lqwchd
[考研] 278求调剂 +14 范婷娜 2026-04-04 15/750 2026-04-04 22:15 by lqwchd
[考研] 环境285分,过六级,求调剂 +10 xhr12 2026-04-02 10/500 2026-04-04 21:53 by bn53987
[考研] 321求调剂 +6 认真求上学 2026-04-03 6/300 2026-04-04 19:51 by dongzh2009
[考研] 材料383求调剂 +5 郭阳阳阳成 2026-04-04 5/250 2026-04-04 19:06 by dongzh2009
[考研] 一志愿北交大材料工程总分358 +6 cs0106 2026-04-03 6/300 2026-04-04 11:20 by w_xuqing
[考研] 调剂 +5 asdasdassda 2026-04-03 6/300 2026-04-03 20:27 by 岸上的一条鱼
[考研] 303求调剂 +9 DLkz1314. 2026-03-30 9/450 2026-04-03 18:34 by ls刘帅
[考研] 求调剂机会 +5 意染ivy 2026-04-03 5/250 2026-04-03 15:13 by qoooooo614
[考研] 交通运输考试264分求工科调剂 +4 jike777 2026-04-02 4/200 2026-04-02 21:53 by zllcz
[考研] 08工科求调剂290分 +5 1314捧花 2026-04-02 8/400 2026-04-02 13:16 by 乔哒哒哒
[考研] 372求调剂 +3 jj涌77 2026-04-02 3/150 2026-04-02 09:57 by olim
[考研] 379求调剂 +3 ?苦瓜不苦 2026-04-01 3/150 2026-04-01 20:09 by 暮云清寒
[硕博家园] 考研调剂 +5 骆驼男人 2026-04-01 5/250 2026-04-01 14:28 by syjjj0321
[考研] 318求调剂 +8 七忆77 2026-04-01 8/400 2026-04-01 10:37 by Jaylen.
[考研] 考研生物与医药调剂 +7 铁憨憨123425 2026-03-31 7/350 2026-04-01 08:45 by JourneyLucky
信息提示
请填处理意见