MathGroup Archive 2007

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

Search the Archive

Re: HoldForm

  • To: mathgroup at smc.vnet.net
  • Subject: [mg76017] Re: HoldForm
  • From: Norbert Marxer <marxer at mec.li>
  • Date: Tue, 15 May 2007 04:42:20 -0400 (EDT)
  • References: <f294ia$mpg$1@smc.vnet.net>

On 14 Mai, 09:53, dimitris <dimmec... at yahoo.com> wrote:
> May be I will annoy a little Roman (I am just kiddin'!)
> but I have one question about HoldForm (and yes I am
> obsessed with it! No kiddin'! It's amazing!)
>
> I have
>
> In[19]:=
> f[x_] = Log[x]*x;
> lowerLim = 0; upperLim = Pi;
>
> Then
>
> In[20]:=
> o = HoldForm[Integrate[f[x], {x, lowerLim, upperLim}]]
>
> Out[20]=
> HoldForm[Integrate[f[x], {x, lowerLim, upperLim}]]
>
> However I want the output of Input[20] to be as Out[28]...
>
> In[28]:=
> HoldForm[Integrate[Log[x]*x, {x, 0, Pi}]]
>
> Out[28]=
> HoldForm[Integrate[Log[x]*x, {x, 0, Pi}]]
>
> Any ideas???
>
> Thanks a lot!
>
> Dimitris

Hello

One possible solution:

In[20]:=
f[x_] = Log[x]*x;
lowerLim = 0; upperLim = Pi;
Integrate[HoldForm[Evaluate[f[x]]], {x, lowerLim, upperLim}]

Out[22]=
Integrate[HoldForm[x*Log[x]], {x, 0, Pi}]

If you prefer to have the HoldForm wrapped around your expression you
could (in addition) apply the replacement rule

In[23]:=
Integrate[HoldForm[Evaluate[f[x]]], {x, lowerLim, upperLim}] /.
  Integrate[HoldForm[x_], y_] :> HoldForm[Integrate[x, y]]

Out[23]=
HoldForm[Integrate[x*Log[x], {x, 0, Pi}]]

Best Regards
Norbert Marxer



  • Prev by Date: Re: Converting Binary form to a desired array
  • Next by Date: Re: Solve & RotationMatrix
  • Previous by thread: Re: HoldForm
  • Next by thread: Re: HoldForm