RE: Subscript[x, y] and the Symbol x
- To: mathgroup at smc.vnet.net
- Subject: [mg33777] RE: [mg33770] Subscript[x, y] and the Symbol x
- From: "David Park" <djmp at earthlink.net>
- Date: Tue, 16 Apr 2002 03:50:26 -0400 (EDT)
- Sender: owner-wri-mathgroup at wolfram.com
Curt,
Ted Ersek has just put up a new package called SubscriptSymbols at
MathSource. It will allow you to symbolize x_y. It works this way:
Needs["Utilities`SubscriptSymbols`"]
The following turns x_y into a symbol:
\!\(SubscriptSymbols[{x\_y}, On]\)
Now you can define your function.
\!\(f[x_, y_] := x\_y\ + \ x + y\)
f[2, 2]
\!\(4 + x\_y\)
Ted's package is easy to use and quite versatile.
David Park
djmp at earthlink.net
http://home.earthlink.net/~djmp/
> From: Curt Fischer [mailto:cfisher at bio.titech.ac.jp]
To: mathgroup at smc.vnet.net
>
>
> Dear Mathgroup:
>
> The Subscript function in Mathematica has no built-in meaning. What
> definition can I give this function to allow me to use Subscript[x,y] as
> a "stand-alone" symbol that is completely distinct from the Symbol x or
> the Symbol y? For example:
>
> In[1]:=
> \!\(f[x_, y_] := x\_y\ + \ x + y\)
>
> In[2]:=
> f[2,2]//FullForm
>
> Out[2]//FullForm=
> Plus[4,Subscript[2,2]]
>
> This is exactly what I don't want. Instead I want
> Plus[4,Subscript[x,y]]. Is there a way to do this?
>
> Thanks for your help.
> --
> Curt Fischer
> Tokyo Institute of Technology
> Dept. of Bioengineering
>
>
>
>