Re: A list of Mathematica characters
- To: mathgroup at smc.vnet.net
- Subject: [mg21113] Re: A list of Mathematica characters
- From: Martin Kraus <Martin.Kraus at informatik.uni-stuttgart.de>
- Date: Fri, 17 Dec 1999 01:21:11 -0500 (EST)
- Organization: Institut fuer Informatik, Universitaet Stuttgart
- References: <831mgi$elb@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
Ersek, Ted R wrote:
>
> Writing a function to do this is straight forward, but it requires a list of
> all available symbols in the definition of this Symbols function. I can
> think of a lot of things I would rather do instead of typing the name of all
> 721 symbols! Does anyone know how I can automatically create a list of all
> symbol names?
>
> Thanks,
> Ted Ersek
Here it is:
Select[Table[ToString[FullForm[FromCharacterCode[i]]], {i, 1, 2^16}],
StringMatchQ[#, "@[*"] &]
Length of the list is 730! (Well, including the "[" which is
accidentally
in the list.)
Hope this helps,
Martin Kraus