Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

RE: Re: WorldPlot Question

  • To: mathgroup at smc.vnet.net
  • Subject: [mg47056] RE: [mg47043] Re: WorldPlot Question
  • From: "Wolf, Hartmut" <Hartmut.Wolf at t-systems.com>
  • Date: Mon, 22 Mar 2004 22:39:11 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

>-----Original Message-----
>From: Terry [mailto:tharter at attglobal.net]
To: mathgroup at smc.vnet.net
>Sent: Monday, March 22, 2004 11:19 AM
>To: mathgroup at smc.vnet.net
>Subject: [mg47056] [mg47043] Re: WorldPlot Question
>
>
>Sorry, but I found out that I have the Mathematica command wrong.  The 
>correct command is
>WorldData["Country Name].   My same question below still stands.
>.......Terry
>
>Terry wrote:
>
>>Hi All:
>>   In the WorldPlot package, it is possible to obtain  the 
>vertices of 
>>the polygon that defines the border
>>of a country by entering the command,
>>     WorldPoints["Country Name"]
>>
>>A fixed (default) number of vertex points is returned.    
>Now, is there 
>>a way to increase the number of points
>>that this command returns with?  If so, how?
>>TIA,
>>.......Terry
>>
>>  
>>
>
Terry,

the Database for WordPlot is separate from the code, see Help.

In[2]:= << Miscellaneous`WorldNames`

To get the association of countries to  continents.

In[3]:= << Miscellaneous`WorldData`

In[5]:= Oceania // InputForm
Out[5]//InputForm=
{"Indonesia", "Papua New Guinea", "Fiji", "Australia", 
 "New Zealand"}

In[6]:= WorldData["New Zealand"]
Out[6]=
{{{-2501, 10441}, {-2430, 10363}, {-2505, 10288},
  {-2773, 10004}, {-2753, 10247}, {-2685, 10229},
  {-2634, 10332}, {-2598, 10257}, {-2596, 10365}, 
  {-2501, 10441}},
 {{-2381, 10616}, {-2497, 10514}, {-2412, 10521},
  {-2365, 10428}, {-2224, 10497}, {-2065, 10362},
  {-2258, 10560}, {-2262, 10713}, {-2381, 10616}}}

You see two closed lines for each of the main isles. It just isn't more. But
I'm certain for more details you'll find resources on the internet. All you
have to do then, is to bring it to the syntax above and define
WorldData["New Zealand"]= <the better (and perhaps more) polygons>

--
Hartmut Wolf


  • Prev by Date: RE: Re: WorldPlot Question
  • Next by Date: Re: Notebook path in title bar of window and/or notebooks menu
  • Previous by thread: RE: Re: WorldPlot Question
  • Next by thread: newbie Comment question