
Re: ReplacePart
Posted:
Sep 15, 2013 6:57 AM


On Sat, Sep 14, 2013 at 06:02:59AM 0400, man21 wrote: > Hello, > > As a result of a calculation, I end up with a list of numerical values > which contains some "Indeterminate". > > x ={1.25664, 0.628319, 0.628319, 1.25664, Indeterminate, 1.25664, > 0.628319, 0.628319, 1.25664, Indeterminate} > > I try to replace the "Indeterminate" by "0", using : > > ReplacePart[x, {5, 10} > 0.] > > but this dosen't work. Any idea why, and how to do it ?
A flat list in ReplacePart is interpreted as a single multilevel part specification. For example,
In[282]:= ReplacePart[Array[a, {2, 2}], {1, 2} > 0.]
Out[282]= {{a[1, 1], 0.}, {a[2, 1], a[2, 2]}}
What you want is this.
In[280]:= ReplacePart[x, {{5}, {10}} > 0.]
Out[280]= {1.25664, 0.628319, 0.628319, 1.25664, 0., 1.25664, \ 0.628319, 0.628319, 1.25664, 0.}
I think in any event it is easier and better to use ReplaceAll
In[283]:= x /. Indeterminate > 0.
Out[283]= {1.25664, 0.628319, 0.628319, 1.25664, 0., 1.25664, \ 0.628319, 0.628319, 1.25664, 0.}
 Itai Seggev Mathematica Algorithms R&D 2173980700

