Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
1998
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1998

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Derivative via mathematica

  • To: mathgroup at smc.vnet.net
  • Subject: [mg13757] Re: Derivative via mathematica
  • From: jpk at max.mpae.gwdg.de
  • Date: Mon, 24 Aug 1998 05:07:08 -0400
  • Sender: owner-wri-mathgroup at wolfram.com

> Hi,
> 
> I just used mathematica for a couple of days.  I am trying to compute
> the derivative under mathematica.  Because the function is complicated,
> I like to break it down.
> 
> f[t_] = (m/(1+Exp[1/t] +b)
> 
> Here m and b are functions of t.
> If I directly use command D after insert m and b terms, a very
> complicated equaion is gerenated, which I do not want.
> 
> What I want is if I define the values of m' and b', rewrite the f
> 
> m' = p
> b' = q   // well, I dont know how to define, this is the idea
> 
> f[t_, m[t], b[t]] = (m/(1+Exp[1/t] +b)
>

Hi,

The definitions:

f[t_,m_[t_],b_[t_]]:=(m[t]/(1+Exp[1/t] +b[t]))
Derivative[1][mu][t_]:=phi[t]
Derivative[1][beta][t_]:=xi[t]

will do what You want

D[f[t,mu[t],beta[t]],t] //InputForm


phi[t]/
   (1 + E^t^(-1) + beta[t]) - 
  (mu[t]*(-(E^t^(-1)/t^2) + 
       xi[t]))/
   (1 + E^t^(-1) + beta[t])^2


 
> then use the command D[f[t,m[t],b[t]],t] hopeful get a equation which is
> the function of t, p and q.  How to do that?
> 
> A related question, I tried to use non-defined function In[19]:= m[t_]
> Out[19]= m[t_]
> In[20]:= D[m[t],t]
> Out[20]= m'[t]
> and expected D[f[t,m[t],b[t]],t] contains m'[t].  Is it possible?
> 


  • Prev by Date: Please somebody, need help on weightmatching/minimizing problem!
  • Next by Date: Re: Mathematica Crash
  • Previous by thread: Re: Disappearing variables
  • Next by thread: Re: a^n*b^n != (a*b)^n