隐函数求定积分

相似文件 换一批

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

请问隐函数怎么求定积分？

f1 =
0.5*(9*exp(-1/902*(902*lambertw(2/2255*(209*t+5625)*exp(1/902*(2487*t+500)/t)/t)*t-2487*t-500)/t)-1)/t*exp(-1/902*(902*lambertw(2/2255*(209*t+2250)*exp(1/902*(2487*t+200)/t)/t)*t-2487*t-200)/t)


怎么求 t 在[0,12.3291]的定积分？用quad和quad8貌似不行，求各位大侠指教

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：Lambert quad lamb 各位大侠 EXP

f是这样子的吗？用Mathematica求解，值为52.5978

nkunku 发表于 2011-9-5 22:12
f是这样子的吗？用Mathematica求解，值为52.5978

正在下载Mathematica试试，网速卡死了。不过之前没用过Mathematica，不知大侠能否指教一下怎么操作？

nkunku 发表于 2011-9-5 22:12
f是这样子的吗？用Mathematica求解，值为52.5978

我自己用mathematica求的时候，出现了介个：

貌似是发散的意思，接下来要怎么才能求出它的数值解？

你这样求解，岂不是将Mathematica等同于Matlab啦？哪有这么容易的事啊？每个软件都有其各自独特的函数和语法。比如，Matlab中exp()，在Mathematica中得要写成Exp[]。另外，matlab中lambertw()，在Mathematica中貌似为ProductLog[]。若有疑问，你再看看帮助吧。

nkunku 发表于 2011-9-6 22:21
你这样求解，岂不是将Mathematica等同于Matlab啦？哪有这么容易的事啊？每个软件都有其各自独特的函数和语法 ...

即使改后也出现错误了：

我对mathematica的帮助系统不熟，大侠能不能跟我说一下你当时是怎么算出来的啊，时间有点紧，没办法一点一点慢慢学，还望大侠能够指点一下

请将你的上述Mathematica命令copy到这里（不要截图），然后我复制下来，在我机子上运行一下看看。

nkunku 发表于 2011-9-7 15:15
请将你的上述Mathematica命令copy到这里（不要截图），然后我复制下来，在我机子上运行一下看看。

NItergrate[
0.5*(9*Exp[-1/
         902*(902*
            ProductLog[
             2/2255*(209*t + 5625)*exp (1/902*(2487*t + 500)/t)/t]*
            t - 2487*t - 500)/t] - 1)/t*
  Exp[-1/902*(902*
        ProductLog[
         2/2255*(209*t + 2250)*exp (1/902*(2487*t + 200)/t)/t]*t -
       2487*t - 200)/t], {t, 0, 12.3291}]

NItergrate[
0.5*(9*Exp[-1/
         902*(902*
            ProductLog[
             2/2255*(209*t + 5625)*exp (1/902*(2487*t + 500)/t)/t]*
            t - 2487*t - 500)/t] - 1)/t*
  Exp[-1/902*(902*
        ProductLog[
         2/2255*(209*t + 2250)*exp (1/902*(2487*t + 200)/t)/t]*t -
       2487*t - 200)/t], {t, 0, 12.3291}]

怎么一次不如一次啊？上次截图里我看你的积分单词是对的，这次怎么反倒错了（不会成心想考我吧，呵呵）。还有，函数用到的括号应该成双成对吧？

总之，任何时候，粗心都是大敌！

你要是实在没空研究Mathematica，就先把我上次的积分结果记下来就可以了；如果有时间，那还请你仔细看相关帮助。

nkunku 发表于 2011-9-8 21:29
NItergrate[
0.5*(9*Exp[-1/
         902*(902*

实在是不好意思，是我粗心了，上次是在别的电脑操作的，结果和过程都没保存，今晚再做一次，结果粗心了！！！下面是刚才做的：
NIntegrate[
0.5*(9*Exp[-1/
         902*(902*
            ProductLog[
             2/2255*(209*t + 5625)*Exp[1/902*(2487*t + 500)/t]/t]*t -
           2487*t - 500)/t] - 1)/t*
  Exp[-1/902*(902*
        ProductLog[
         2/2255*(209*t + 2250)*Exp[1/902*(2487*t + 200)/t]/t]*t -
       2487*t - 200)/t], {t, 0, 12.3291}]
还是没结果~~~