The Math Forum

Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Math Forum » Discussions » Inactive » comp.soft-sys.math.mathematica

Notice: We are no longer accepting new posts, but the forums will continue to be readable.

Topic: Applying "Replace" to subsets of lists
Replies: 0  

Advanced Search

Back to Topic List Back to Topic List  
Abed Alnaif

Posts: 13
Registered: 10/21/08
Applying "Replace" to subsets of lists
Posted: Dec 19, 2012 4:55 AM
  Click to see the message monospaced in plain text Plain Text   Click to reply to this topic Reply

Say I have the following list, and I'd like to replace the second 'b' with the value 1, leaving the first b untouched:

MagicFunction[{{b, 2}, b}] = {{b, 2}, 1}

How do I do this? I've tried the following:

This doesn't work since it replaces both 'b'
In: {{b, 2}, b} /. b -> 1
Out: {{1, 2}, 1}

This doesn't work (I'm not sure why):
In: {{b, 2}, b} /. {{x_, y_}, f_[b]} -> {{x, y}, 1, f[1]}
Out: {{b, 2}, b}

This works:
In: {{b, 2}, b} /. {{x_, y_}, b} -> {{x, y}, 1}
Out: {{b, 2}, 1}

However, 'b' may appear in different forms, in which case the previous approach fails:
In: {{b, 2}, b^2} /. {{x_, y_}, b} -> {{x, y}, 1}
Out: {{b, 2}, b^2}

Using the 'levelspec' argument of 'Replace' also fails since 'b' can appear in different forms:
In: Replace[{{b, 2}, b^2}, b -> 1, 1]
Out: {{b, 2}, b^2}
In: Replace[{{b, 2}, b^2}, b -> 1, 2]
Out: {{1, 2}, 1}

Thank you,


Point your RSS reader here for a feed of the latest messages in this topic.

[Privacy Policy] [Terms of Use]

© The Math Forum at NCTM 1994-2018. All Rights Reserved.