用Mathematica畫世界地圖

在Mathematica論壇看到這個有趣的網站，Lunchtime Playground: Fun with Mathematica。裡面有一篇文章是說明怎麼用Mathematica畫世界地圖。我稍微改了一下他的函數，讓地圖更有趣！

找出所有國家的首都

nation = Select[{Reverse[CityData[CountryData[#, "CapitalCity"], "Coordinates"]], #} & /@ CountryData[], #[[1]] \[Element] Reals &];

下載世界地圖

earth = Import[ "http://phong.informatik.uni-leipzig.de/%7Ekuska/oglscript/EarthMap.png"]


先將各國首都加在地圖上

test = Graphics[Translate[{EdgeForm[Black], FaceForm[], CountryData[#, "Polygon"] & /@ CountryData[], Red, PointSize[0.01], Tooltip[Point[nation[[#, 1]]], nation[[#, 2]]] & /@ Range[Length[nation]]}, {180, 90}], PlotRange -> {{0, 360}, {0, 180}}, ImageSize -> 1024]


將兩張圖形合併成一張

ImageMultiply[test, earth]




mathematica;教學;pdf mathematica 6教學 mathematica基本教學 mathematica mathematica下載 spss教學網站 spss教學講義下載 spss教學pdf spss教學網 spss教學講義下載 spss教學網站 spss教學下載 spss教學講義 spss教學pdf roc curve spss教學 manova spss教學 spss教學手冊 spss 16教學 automator mac 教學 automator 浮水 box cox spss cwtex linux cwtex ptt cwtex texlive cwtex-linux excel matrix excel 分配圖 excel 畫常態分配圖 excel常態分配 excel常態分配圖 excel畫常態分佈圖 excel畫常態分配圖 google latex 註解 graphicspath latex 路徑 import mathematica integral exp x 2 latex latex 文字和圖片重疊 latex 浮水印 透明度 watermark latex 圖例 latex 圖片文字重疊 latex教學 mac automator mac latex 新增 package mac pdf 浮水印 mac 水印 mac合併pdf mathematica mathematica 8 圖 字 mathematica abs mathematica pso mathematica 字型 mathematica 教學 pdf mathematica 講義 mathematica教學 mathematica講義 norminv vba p-value excel scientific workplace lyx spss string substr spss 幾何平均數 spss 遺漏值 spss教學講義下載 丁吉峰 可愛手寫字體 可愛字體 可愛的字體 如何畫常態分配圖 利用mac automator幫pdf加入浮水印 怎麼合併pdf for mac automator 怎麼畫星星 浮水印 cwtex 留言板 常態分配圖 常態分配圖如何畫 敏感性分析 公式 統計學講義 最小生成樹 華康可愛字體 戴忠淵 Tags: Mathematica 教學, Mathematica 教學 畫圖, Teaching

• 編輯文章
• 此文章網址
• 轉寄此文章
• 目前有0 意見