Sfrgttk

Describing a chess game in a novel

How does one measure the Fourier components of a signal?

Is honey really a supersaturated solution? Does heating to un-crystalize redissolve it or melt it?

HP P840 HDD RAID 5 many strange drive failures

Do native speakers use "ultima" and "proxima" frequently in spoken English?

Is it correct to say "which country do you like the most?"

Tikz: place node leftmost of two nodes of different widths

How to generate binary array whose elements with values 1 are randomly drawn

Calculate the frequency of characters in a string

How can my new character not be a role-playing handicap to the party?

What is the relationship between relativity and the Doppler effect?

Brake pads destroying wheels

Why is indicated airspeed rather than ground speed used during the takeoff roll?

Deletion of copy-ctor & copy-assignment - public, private or protected?

In what cases must I use 了 and in what cases not?

Four married couples attend a party. Each person shakes hands with every other person, except their own spouse, exactly once. How many handshakes?

Does multi-classing into Fighter give you heavy armor proficiency?

Print last inputted byte

What should I install to correct "ld: cannot find -lgbm and -linput" so that I can compile a Rust program?

Writing in a Christian voice

If "dar" means "to give", what does "daros" mean?

Synchronized implementation of a bank account in Java

gerund and noun applications

Have the tides ever turned twice on any open problem?

Geography in 3D perspective

Highlighting individual countries on a world mapUsing J/Link to decode Google Maps Polyline stringsShow density plot on a geographic mapColoring a map of GeoRegionsPlots of United States states with non-standard labelsCustom ColorFunction for GeoGraphics plot with ReliefMapHow can I use multiple overlaid map layers (e.g. basemap, labels) in GeoGraphics?How to extract geo location of city and plot the mapConstant disk size on GeoGraphics ImageGeographics Geolabels and Polygons

1

1

$begingroup$

I would like to make map a GeoGraphics with GeoMarkers in the pseudo 3D perspective. For example, consider this plot of the Eiffel Tower:

I would like to reproduce it in a 3D perspective like this:

Both examples come from google maps, I’m not sure if this is possible in 11.3, but would love to know.

geography geographics

share|improve this question

asked 3 hours ago

M.R.M.R.

15.7k558188

$endgroup$

add a comment | 

1

1

$begingroup$

I would like to make map a GeoGraphics with GeoMarkers in the pseudo 3D perspective. For example, consider this plot of the Eiffel Tower:

I would like to reproduce it in a 3D perspective like this:

Both examples come from google maps, I’m not sure if this is possible in 11.3, but would love to know.

geography geographics

share|improve this question

asked 3 hours ago

M.R.M.R.

15.7k558188

$endgroup$

add a comment | 

$begingroup$

I would like to make map a GeoGraphics with GeoMarkers in the pseudo 3D perspective. For example, consider this plot of the Eiffel Tower:

I would like to reproduce it in a 3D perspective like this:

Both examples come from google maps, I’m not sure if this is possible in 11.3, but would love to know.

geography geographics

share|improve this question

asked 3 hours ago

M.R.M.R.

15.7k558188

$endgroup$

share|improve this question

asked 3 hours ago

M.R.M.R.

15.7k558188

share|improve this question

asked 3 hours ago

M.R.M.R.

15.7k558188

asked 3 hours ago

M.R.M.R.

15.7k558188

asked 3 hours ago

M.R.M.R.

15.7k558188

1 Answer
1

active

oldest

votes

3

$begingroup$

You could use an orthographic with a custom centering:

GeoGraphics[

  Entity["Building", "EiffelTower::5h9w8"], 

  GeoProjection -> {"Orthographic", "Centering" -> GeoPosition[{-30.858`, 2.295`}]}, 

  GeoZoomLevel -> 18, 

  GeoRange -> {{48.852`, 48.872`}, {2.2895`, 2.2995`}}

]

Note that this does incorporate the curvature of the earth and will be noticeable over larger areas.

If you're after something flat, you could always inset the tiles in 3D and pick custom View* values. Note I pad the range to allow the map to be seen at an angle:

im = GeoImage[

  Entity["Building", "EiffelTower::5h9w8"], 

  "StreetMapNoLabels", 

  GeoZoomLevel -> 17, 

  GeoRange -> {{48.852`, 48.872`}, {2.285`, 2.305`}}

];



{x, y} = ImageDimensions[im];



Graphics3D[

  {Texture[im], EdgeForm[], Polygon[{{0, 0, 0}, {x, 0, 0}, {x, y, 0}, {0, y, 0}}, 

    VertexTextureCoordinates -> {{0, 0}, {1, 0}, {1, 1}, {0, 1}}]}, 

  Background -> Black,

  Boxed -> False, 

  Lighting -> "Neutral", 

  ViewAngle -> 0.03233723833101999`, 

  ViewCenter -> {{0.5`, 0.5`, 0.5`}, {1.4456583184354543`, 0.7806170277104297`}}, 

  ViewPoint -> {1.076788325190908`, -3.1635309749673284`, 0.5316001064285271`}, 

  ViewVertical -> {0.00011882147473772082`, -0.00015290540260965785`, 0.9999999812506973`}

]

share|improve this answer

edited 5 mins ago

answered 30 mins ago

Chip HurstChip Hurst

22.3k15791

$endgroup$

add a comment | 

Your Answer

StackExchange.ifUsing("editor", function () {
return StackExchange.using("mathjaxEditing", function () {
StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix) {
StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
});
});
}, "mathjax-editing");

StackExchange.ready(function() {
var channelOptions = {
tags: "".split(" "),
id: "387"
};
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function() {
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled) {
StackExchange.using("snippets", function() {
createEditor();
});
}
else {
createEditor();
}
});

function createEditor() {
StackExchange.prepareEditor({
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader: {
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
},
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
});


}
});

draft saved

draft discarded

Sign up or log in

StackExchange.ready(function () {
StackExchange.helpers.onClickDraftSave('#login-link');
});

Sign up using Google

Sign up using Facebook

Sign up using Email and Password

Post as a guest

Name

Email

Required, but never shown

StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193444%2fgeography-in-3d-perspective%23new-answer', 'question_page');
}
);

Post as a guest

Name

Email

Required, but never shown

3

$begingroup$

You could use an orthographic with a custom centering:

GeoGraphics[

  Entity["Building", "EiffelTower::5h9w8"], 

  GeoProjection -> {"Orthographic", "Centering" -> GeoPosition[{-30.858`, 2.295`}]}, 

  GeoZoomLevel -> 18, 

  GeoRange -> {{48.852`, 48.872`}, {2.2895`, 2.2995`}}

]

Note that this does incorporate the curvature of the earth and will be noticeable over larger areas.

If you're after something flat, you could always inset the tiles in 3D and pick custom View* values. Note I pad the range to allow the map to be seen at an angle:

im = GeoImage[

  Entity["Building", "EiffelTower::5h9w8"], 

  "StreetMapNoLabels", 

  GeoZoomLevel -> 17, 

  GeoRange -> {{48.852`, 48.872`}, {2.285`, 2.305`}}

];



{x, y} = ImageDimensions[im];



Graphics3D[

  {Texture[im], EdgeForm[], Polygon[{{0, 0, 0}, {x, 0, 0}, {x, y, 0}, {0, y, 0}}, 

    VertexTextureCoordinates -> {{0, 0}, {1, 0}, {1, 1}, {0, 1}}]}, 

  Background -> Black,

  Boxed -> False, 

  Lighting -> "Neutral", 

  ViewAngle -> 0.03233723833101999`, 

  ViewCenter -> {{0.5`, 0.5`, 0.5`}, {1.4456583184354543`, 0.7806170277104297`}}, 

  ViewPoint -> {1.076788325190908`, -3.1635309749673284`, 0.5316001064285271`}, 

  ViewVertical -> {0.00011882147473772082`, -0.00015290540260965785`, 0.9999999812506973`}

]

share|improve this answer

edited 5 mins ago

answered 30 mins ago

Chip HurstChip Hurst

22.3k15791

$endgroup$

add a comment | 

3

$begingroup$

You could use an orthographic with a custom centering:

GeoGraphics[

  Entity["Building", "EiffelTower::5h9w8"], 

  GeoProjection -> {"Orthographic", "Centering" -> GeoPosition[{-30.858`, 2.295`}]}, 

  GeoZoomLevel -> 18, 

  GeoRange -> {{48.852`, 48.872`}, {2.2895`, 2.2995`}}

]

Note that this does incorporate the curvature of the earth and will be noticeable over larger areas.

If you're after something flat, you could always inset the tiles in 3D and pick custom View* values. Note I pad the range to allow the map to be seen at an angle:

im = GeoImage[

  Entity["Building", "EiffelTower::5h9w8"], 

  "StreetMapNoLabels", 

  GeoZoomLevel -> 17, 

  GeoRange -> {{48.852`, 48.872`}, {2.285`, 2.305`}}

];



{x, y} = ImageDimensions[im];



Graphics3D[

  {Texture[im], EdgeForm[], Polygon[{{0, 0, 0}, {x, 0, 0}, {x, y, 0}, {0, y, 0}}, 

    VertexTextureCoordinates -> {{0, 0}, {1, 0}, {1, 1}, {0, 1}}]}, 

  Background -> Black,

  Boxed -> False, 

  Lighting -> "Neutral", 

  ViewAngle -> 0.03233723833101999`, 

  ViewCenter -> {{0.5`, 0.5`, 0.5`}, {1.4456583184354543`, 0.7806170277104297`}}, 

  ViewPoint -> {1.076788325190908`, -3.1635309749673284`, 0.5316001064285271`}, 

  ViewVertical -> {0.00011882147473772082`, -0.00015290540260965785`, 0.9999999812506973`}

]

share|improve this answer

edited 5 mins ago

answered 30 mins ago

Chip HurstChip Hurst

22.3k15791

$endgroup$

add a comment | 

$begingroup$

You could use an orthographic with a custom centering:

GeoGraphics[

  Entity["Building", "EiffelTower::5h9w8"], 

  GeoProjection -> {"Orthographic", "Centering" -> GeoPosition[{-30.858`, 2.295`}]}, 

  GeoZoomLevel -> 18, 

  GeoRange -> {{48.852`, 48.872`}, {2.2895`, 2.2995`}}

]

Note that this does incorporate the curvature of the earth and will be noticeable over larger areas.

If you're after something flat, you could always inset the tiles in 3D and pick custom View* values. Note I pad the range to allow the map to be seen at an angle:

im = GeoImage[

  Entity["Building", "EiffelTower::5h9w8"], 

  "StreetMapNoLabels", 

  GeoZoomLevel -> 17, 

  GeoRange -> {{48.852`, 48.872`}, {2.285`, 2.305`}}

];



{x, y} = ImageDimensions[im];



Graphics3D[

  {Texture[im], EdgeForm[], Polygon[{{0, 0, 0}, {x, 0, 0}, {x, y, 0}, {0, y, 0}}, 

    VertexTextureCoordinates -> {{0, 0}, {1, 0}, {1, 1}, {0, 1}}]}, 

  Background -> Black,

  Boxed -> False, 

  Lighting -> "Neutral", 

  ViewAngle -> 0.03233723833101999`, 

  ViewCenter -> {{0.5`, 0.5`, 0.5`}, {1.4456583184354543`, 0.7806170277104297`}}, 

  ViewPoint -> {1.076788325190908`, -3.1635309749673284`, 0.5316001064285271`}, 

  ViewVertical -> {0.00011882147473772082`, -0.00015290540260965785`, 0.9999999812506973`}

]

share|improve this answer

edited 5 mins ago

answered 30 mins ago

Chip HurstChip Hurst

22.3k15791

$endgroup$

GeoGraphics[

  Entity["Building", "EiffelTower::5h9w8"], 

  GeoProjection -> {"Orthographic", "Centering" -> GeoPosition[{-30.858`, 2.295`}]}, 

  GeoZoomLevel -> 18, 

  GeoRange -> {{48.852`, 48.872`}, {2.2895`, 2.2995`}}

]

im = GeoImage[

  Entity["Building", "EiffelTower::5h9w8"], 

  "StreetMapNoLabels", 

  GeoZoomLevel -> 17, 

  GeoRange -> {{48.852`, 48.872`}, {2.285`, 2.305`}}

];



{x, y} = ImageDimensions[im];



Graphics3D[

  {Texture[im], EdgeForm[], Polygon[{{0, 0, 0}, {x, 0, 0}, {x, y, 0}, {0, y, 0}}, 

    VertexTextureCoordinates -> {{0, 0}, {1, 0}, {1, 1}, {0, 1}}]}, 

  Background -> Black,

  Boxed -> False, 

  Lighting -> "Neutral", 

  ViewAngle -> 0.03233723833101999`, 

  ViewCenter -> {{0.5`, 0.5`, 0.5`}, {1.4456583184354543`, 0.7806170277104297`}}, 

  ViewPoint -> {1.076788325190908`, -3.1635309749673284`, 0.5316001064285271`}, 

  ViewVertical -> {0.00011882147473772082`, -0.00015290540260965785`, 0.9999999812506973`}

]

share|improve this answer

edited 5 mins ago

answered 30 mins ago

Chip HurstChip Hurst

22.3k15791

answered 30 mins ago

Chip HurstChip Hurst

22.3k15791

answered 30 mins ago

Chip HurstChip Hurst

22.3k15791