MathGroup Archive 2009

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

Search the Archive

Re: Demonstrations Surpass 5,000

  • To: mathgroup at
  • Subject: [mg101820] Re: [mg101791] Demonstrations Surpass 5,000
  • From: Mark McClure <mcmcclur at>
  • Date: Sat, 18 Jul 2009 04:50:40 -0400 (EDT)
  • References: <>

On Fri, Jul 17, 2009 at 5:03 AM, Wolfram Research <
demonstrations at> wrote:

> We're excited! The Wolfram Demonstrations Project has now
> surpassed 5,000 publications.

The 5,000 Demonstrations demonstration is cool but a bit unwieldy,
if you want to find the number of your demonstration.  You can use
the following code to find it, though.  Just change my name to yours:

nb = Import[
demodata = Uncompress[
First /@ Position[demodata, "Contributed by: Mark McClure"]

Mark McClure

  • Prev by Date: Re: Modify variable names in a loop
  • Next by Date: Re: Scalar Potential
  • Previous by thread: Demonstrations Surpass 5,000
  • Next by thread: Obtaining a Paclet URL From a Symbol