User Portlet
Discussions |
---|
You are welcome! |
Here's a very compact solution using [IGraph/M](http://szhorvat.net/mathematica/IGraphM)'s `IGVertexColoring` function. counties = EntityList@EntityClass["AdministrativeDivision", "USCountiesFlorida"]; borderingQ[c1_, c2_] :=... |
Dear [@Gilmar Rodriguez-Pierluissi][at0], this should be a comment on the post you linked, not a new post. Both discussions relate to the same content and idea. [at0]: http://community.wolfram.com/web/pumelago |