Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.soft-sys.math.mathematica > #1252 > unrolled thread
| Started by | finkh <howardfink@gmail.com> |
|---|---|
| First post | 2011-03-30 09:10 +0000 |
| Last post | 2011-03-30 09:10 +0000 |
| Articles | 1 — 1 participant |
Back to article view | Back to comp.soft-sys.math.mathematica
This discussion starts older than the indexed window; earlier articles aren't shown. The article labeled Started by
below is the oldest one visible, not the original post.
Re: Coordinates from Graphics3D images finkh <howardfink@gmail.com> - 2011-03-30 09:10 +0000
| From | finkh <howardfink@gmail.com> |
|---|---|
| Date | 2011-03-30 09:10 +0000 |
| Subject | Re: Coordinates from Graphics3D images |
| Message-ID | <imus25$hus$1@smc.vnet.net> |
I would like to extract the surface and the accompanying texture from
moon = SphericalPlot3D[1, {u, 0, Pi}, {v, 0, 2 Pi}, Mesh -> None,
TextureCoordinateFunction -> ({#5, 1 - #4} &),
PlotStyle ->
Directive[Specularity[White, 10],
Texture[Import[
"http://finkh.files.wordpress.com/2011/03/ldem_4.png"]]],
Lighting -> {"Ambient", White}, Axes -> False, Boxed -> False,
RotationAction -> "Clip"]
This is a map of the moon with elevation data represented by a
grayscale texture taken from the Planetary Data System. When I
extract the polygons from the object the texture does not travel with
the polygons. How would I select a portion of the sphere while
preserving the shape and the texture.
Then reorient so the center of the selection is up, convert to
cartesian, listplot3d and export as stl for the rapid prototyper.
Here is what I am doing: http://finkh.wordpress.com/2011/02/01/the-south-pole-of-the-moon-shackleton-crater/
Back to top | Article view | comp.soft-sys.math.mathematica
csiph-web