Re: shuffling (randomizing) a series

• To: mathgroup at smc.vnet.net
• Subject: [mg52914] Re: [mg52857] shuffling (randomizing) a series
• From: Tomas Garza <tgarza01 at prodigy.net.mx>
• Date: Thu, 16 Dec 2004 03:41:52 -0500 (EST)
• References: <200412150926.EAA10600@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```I suggest you use RandomPermutation in the AddOn
DiscreteMath`Combinatorica`.

In[1]:=
<<DiscreteMath`Combinatorica`

Here you have a list of 1,000,000 integers:

In[2]:=
lstA = Table[Random[Integer, {1, 100}], {1000000}];

This will produce a random shuffling of the list in less than 5 seconds:

In[3]:=
AbsoluteTiming[lstA[[RandomPermutation[
Length[lstA]]]]; ]
Out[3]=
{4.9687500 Second,Null}

Tomas Garza
Mexico City
----- Original Message -----
From: "George Szpiro" <george at netvision.net.il>
To: mathgroup at smc.vnet.net
Subject: [mg52914] [mg52857] shuffling (randomizing) a series

> Hello,
>
> I would like to put a series of numbers (of the order of 10^7 numbers)
> into
> random order, i.e., to shuffle it. In Excel I would simply add a column
> next
> to the column with the data, and then sort by the random number. But I
> could
> only do this for 64000 numbers. How can I do that in Mathematica for a
> file with a
> much larger series?
>
> george at netvision.net.il)
>
> Thanks!
> George
>
>
> --
>
> --------
> George Szpiro
> Neue Zürcher Zeitung (Switzerland)
> POB 6278
> Jerusalem 91060
> Israel
>
>
>
>
>

```

• Prev by Date: Re: SymbolShape
• Next by Date: Re: about Package
• Previous by thread: shuffling (randomizing) a series
• Next by thread: Re: shuffling (randomizing) a series