Tag Info

New answers tagged

0

The Wolfram '.wdx' format was made for this. It maintains wolfram code in a file, but only code, unlike a notebook. Read up here for more info. The first two lines stay the same, then you would export the data as so: Export["smokers.wdx", table]; This creates a file in MyDocuments (if in windows, otherwise the folder above where your notebooks are ...


1

Off Topic, but to show another approach on showing the concentration of events using Histogram3D, which can convey the concentration of events a wee bit better. asamjson = Import["http://msi.nga.mil/MSI_JWS/ASAM_JSON/getJSON?typename=\ DateRange_AllRefNumbers&fromDate=19900101&toDate=20140801", "JSON"]; Needs["GeneralUtilities`"] asamdataset = ...


3

You can also exploit the GeoGraphics in version 10. Using some of your variables (noting there seems to be an issue with plotting more than 4000 points or generating density histogrm with more points...that I do not fully understand): Getting a feel: GeoGraphics[{Red, PointSize[0.005], Point[(Normal@piracyLocations)[[1 ;; 4000]]]}] Now generating ...


5

You have mixed up latitudes and longitudes. So first of all change ToExpression@{#["lat"], #["lng"] } into ToExpression@{#["lng"], #["lat"] }. The second problem you have is that when you combine graphics with Show all the common options are taken to be that of the first graphics which in your case is the histogram, but what you really want is the aspect ...


4

I'm definitely not proud of this, but here's a brute force method that is pretty accurate. First let's define some functions, cheating and using the built in GeoDistance function. We'll also try to minimize the error between the distances we're using as inputs and the distances we're calculating based on our guess {latitude, longitude}: geodist[pos1 : ...


11

The problem seems to be related to mixing geopositions and raw long/lat pairs. pos is expressed as a GeoPosition and the polygon is expressed as raw pairs. The graphics are better behaved if all coordinates are expessed in the same fashion. Option one: use geopositions throughout Change the assignment to {a, b, d, c} from this: {a, b, d, c} = ...


3

Mathematica 10 introduced new ways to highlight countries on the world map. Examples follow below. There are lots of more examples in the documentation which showcase alternative stylings. myCountries = Map[ Entity["Country", #] &, {"Germany", "Hungary", "Mexico", "Austria", "Turkey", "SouthKorea", "China"} ]; GeoListPlot[myCountries, ...


11

Using the new geographic tools in Mathematica 10: GeoGraphics[ GeoCircle[ GeoPosition[Entity["City", {"Gheorgheni", "Harghita", "Romania"}] ], Quantity[4000, "km"] ], GeoBackground -> "StreetMap", (* To get country labels *) ImageSize -> 800 ] WRI posted another example on Twitter. There is another tool called GeoIdentify that ...



Top 50 recent answers are included