LL_61)_Poker.mw

I am having some problem with this procedure located in the "experiment" sub section.
I am trying to calculate the win probability in a poker game pre flop ie each player
get two cards. I am trying to find out which two card combination will result in the
highest probability of winning in the end.

In the first example I simply assume that player 1 gets [DA, HA] ie dimond ace

Maple is slowly driving me insane. I look at probobly 15 cloud storage solution and I found
one that support http (OwnCloud on Red Free Hosting (free)). The rest uses https.

So I upload my file (see working link below)

http://marcusdavidsson.redfreehost.com/owncloud/public.php?service=files&t=71ff3b85a3d4353e1dd60a49a6e6250f&download

I have this csv file on my website (the file is hosted on dropbox.com) that I want to load into Maple:
Hence I type:

URL := "https://dl.dropboxusercontent.com/s/7fqalrdtn0c3r8u/Stockholm%20Stock%20Exchange%28Percentage%20Change%29.csv?token_hash=AAGxpzva90O6oNlLAie3T1h0UNP06I5EPg2qrROHMglRMw&dl=1":
HTTP:-Get(URL, 'timeout' = 100)

Then I get:

Error, (in HTTP:-Get) timed out waiting for initial response from server

If you past the url into...

Let say that you have two datasets:

restart:
with(MyFinance):
z1 := GetCSV("http://www.quandl.com/api/v1/datasets/USER_18Q/18R.csv?&auth_token=BXckVSG3twWkV272c9Q4&trim_start=1968-04-01&trim_end=2013-04-12&collapse=daily&transformation=rdiff&sort_order=desc");
z2 := GetCSV("http://www.quandl.com/api/v1/datasets/USER_18Q/1EV.csv?&auth_token=BXckVSG3twWkV272c9Q4&trim_start=1994-01-03&trim_end=2013-04-12&collapse=daily&...

Why does this not work?

restart:
with(Statistics):

P := Sample(RandomVariable(Normal(10, 10)), 500):
X := RandomVariable(EmpiricalDistribution(P)):

DensityPlot(X);