Re: Symbol function, a question
- To: mathgroup at smc.vnet.net
- Subject: [mg90506] Re: Symbol function, a question
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Fri, 11 Jul 2008 02:03:36 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <g54om5$f1i$1@smc.vnet.net>
tung tran wrote:
> Firstly, I create a variable
> x95 = 100
> Now, I want to change the value of my variable x95 to 20 ,
> so I want to use some procedure like :
>
> Symbol["x" <> ToString[95]] = 20
> my idea is to make Mathematica write the term "x95" automatically for
> me but when I use the Symbol function in this case, it gives me
> automatically 100 and I don' t know how to call only x95.
You may have to write your own function to achieve this. For instance,
SetAttributes[mySet, HoldFirst]
mySet[name_String, value_] :=
ToExpression[name <> "=" <> ToString[value]]
x95 =.
mySet["x95", 100]
mySet["x95", 20]
mySet[#, 50] &["x" <> ToString[95]]
Table[mySet[#, RandomInteger[]] &["x" <> ToString[n]], {n, 5}]
100
20
50
{0, 0, 1, 0, 1}
Regards,
-- Jean-Marc