MathGroup Archive 2000

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Re: Counting the total number of available Mathematica commands ?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg22902] Re: [mg22882] Re: Counting the total number of available Mathematica commands ?
  • From: BobHanlon at aol.com
  • Date: Tue, 4 Apr 2000 22:41:06 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

If your interest were restricted to the numeric functions then you could use

(numFuncList = 
      Select[Names["*"], ! FreeQ[Attributes[#], NumericFunction] &]) // Length

Bob Hanlon

In a message dated 4/4/2000 1:54:10 AM, kuska at informatik.uni-leipzig.de 
writes:

>the problem is that Names["*"] generate a list of all Mathematica
>*symbols*
>and not of all Mathematica commands. And $TopDirectory is *not* a
>command and
>ViewPoint will do nothing.
>
>But global symbols have usual a associated value, functions typical not.
>So probably
>
>nlist = Names["*"];
>optandfun=First /@ Select[{#, ToExpression[#]} & /@ nlist, First[#] ==
>ToString[Last[#]] &]
>
>gives the list of functions and *options*.
>To remove at least the options acciciated with the funtions  we can
>
>onlyopt = 
>    ToString /@ 
>        Flatten[Options[ToExpression[#]] & /@ optandfun] /. {Rule[a_,
>b_] :> a,
>         Verbatim[RuleDelayed][a_, b_] :> a};
>
>and
>
>Complement[optanfun, onlyopt]
>
>This helps nothing for options FontFace like 
>TextStyle->{FontFace->"Times"} and nothing for symbols
>like Integers, Reals or Complexes that are not options
>and not function definitions.
>
>More ideas to find the *functions only* are welcome.
>
>But I think it is impossible due to the read protection of
>the build in symbols.
>


  • Prev by Date: 3 credit online university course - Intro to Mathematica
  • Next by Date: A faster Divisors function
  • Previous by thread: Re: Counting the total number of available Mathematica commands ?
  • Next by thread: Re: Counting the total number of available Mathematica commands ?