MathGroup Archive 2005

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

Search the Archive

Re: Re: Replacement equivalence?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg63358] Re: [mg63352] Re: Replacement equivalence?
  • From: Pratik Desai <pdesai1 at umbc.edu>
  • Date: Sun, 25 Dec 2005 02:19:36 -0500 (EST)
  • References: <do6892$b1t$1@smc.vnet.net><dod6tt$4fd$1@smc.vnet.net> <200512231008.FAA25926@smc.vnet.net> <dojf3r$fpn$1@smc.vnet.net> <200512242103.QAA24201@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

carlos at colorado.edu wrote:

>Hmm... cant get it to work as stated.  Can you try the idea in this
>benchmark test
>
> ClearAll[f,a,b,c,i];  f[b_,c_]:=1/(c+b^2);
> v=Table[{i,f[b,i]/.b^2->16},{i,-6,6}];  ListPlot[v,PlotJoined->True];
>
>and see if the plot gap goes away? Thanks.
>
>  
>
This seems to work
Clear[b, x, c]
f[b_,c_]:=1/(c+b^2);
ListPlot[Table[{i, Replace[f[b, i], b -> (b =
4 â?¨ b = -4 )]}, {i, -6, 6}], PlotJoined -> True]

Hope this helps

Pratik


  • Prev by Date: Re: Questions regarding MatrixExp, and its usage
  • Next by Date: Re: Extracting information from lists
  • Previous by thread: Re: Replacement equivalence?
  • Next by thread: Re: Replacement equivalence?