Putting a 2D region plot under a 3D plot The Next CEO of Stack OverflowPutting ticks with values on a parametric plotPlot above desired regionIntersecting RegionPlotsRegion plot with predicatePlot region from given coordinatesPutting arrows in 3d plotFilling the region under a lineHow Plot this RegionPlot a function under constraintregion plot with region function

How to write papers efficiently when English isn't my first language?

Is it okay to store user locations?

Why does C# sound extremely flat when saxophone is tuned to G?

How can I open an app using Terminal?

How should I support this large drywall patch?

How long to clear the 'suck zone' of a turbofan after start is initiated?

Whats the best way to handle refactoring a big file?

How easy is it to start Magic from scratch?

Is the concept of a "numerable" fiber bundle really useful or an empty generalization?

Is it my responsibility to learn a new technology in my own time my employer wants to implement?

Is HostGator storing my password in plaintext?

Fastest way to shutdown Ubuntu Mate 18.10

Science fiction novels about a solar system spanning civilisation where people change their bodies at will

If the heap is initialized for security, then why is the stack uninitialized?

How to be diplomatic in refusing to write code that breaches the privacy of our users

Opposite of a diet

WOW air has ceased operation, can I get my tickets refunded?

Increase performance creating Mandelbrot set in python

Why is there a PLL in CPU?

% symbol leads to superlong (forever?) compilations

How do spells that require an ability check vs. the caster's spell save DC work?

How do I solve this limit?

How to make a variable always equal to the result of some calculations?

The King's new dress



Putting a 2D region plot under a 3D plot



The Next CEO of Stack OverflowPutting ticks with values on a parametric plotPlot above desired regionIntersecting RegionPlotsRegion plot with predicatePlot region from given coordinatesPutting arrows in 3d plotFilling the region under a lineHow Plot this RegionPlot a function under constraintregion plot with region function










2












$begingroup$


I am trying to plot this 3D function over a hexagonal region:



a1 = Sqrt[3] 1, 0;
a2 = Sqrt[3] 1/2, Sqrt[3]/2;
k = kx, ky;
S = 1 + Exp[I k. a2] + Exp[I k.(a2 - a1)];
EE = Abs[S]
R = 4 Pi/(3 Sqrt[3]);
ep = Plot3D[EE, -EE, kx, ky [Element] RegularPolygon[R, 6], Axes -> False, Boxed -> False, AspectRatio -> 2]


This works fine, but I would also like to draw the region under the 3D graph, something like:



bz = Graphics[RegularPolygon[R, 6]];


or



bz = RegionPlot[RegularPolygon[R, 6]];


However, using



Show[ep, bz]


doesn't work. I have found a few similar questions but they mostly seem to be about contours, I didn't know how to extend this for something as simple as a regular polygon.










share|improve this question











$endgroup$











  • $begingroup$
    do you want you Polygon flat under the region of 3D !?
    $endgroup$
    – Alrubaie
    5 hours ago










  • $begingroup$
    Try This p = Graphics3D[Polygon[1, 0, 0, 0, 1, 0, 0, 0, 1]]
    $endgroup$
    – Alrubaie
    4 hours ago















2












$begingroup$


I am trying to plot this 3D function over a hexagonal region:



a1 = Sqrt[3] 1, 0;
a2 = Sqrt[3] 1/2, Sqrt[3]/2;
k = kx, ky;
S = 1 + Exp[I k. a2] + Exp[I k.(a2 - a1)];
EE = Abs[S]
R = 4 Pi/(3 Sqrt[3]);
ep = Plot3D[EE, -EE, kx, ky [Element] RegularPolygon[R, 6], Axes -> False, Boxed -> False, AspectRatio -> 2]


This works fine, but I would also like to draw the region under the 3D graph, something like:



bz = Graphics[RegularPolygon[R, 6]];


or



bz = RegionPlot[RegularPolygon[R, 6]];


However, using



Show[ep, bz]


doesn't work. I have found a few similar questions but they mostly seem to be about contours, I didn't know how to extend this for something as simple as a regular polygon.










share|improve this question











$endgroup$











  • $begingroup$
    do you want you Polygon flat under the region of 3D !?
    $endgroup$
    – Alrubaie
    5 hours ago










  • $begingroup$
    Try This p = Graphics3D[Polygon[1, 0, 0, 0, 1, 0, 0, 0, 1]]
    $endgroup$
    – Alrubaie
    4 hours ago













2












2








2





$begingroup$


I am trying to plot this 3D function over a hexagonal region:



a1 = Sqrt[3] 1, 0;
a2 = Sqrt[3] 1/2, Sqrt[3]/2;
k = kx, ky;
S = 1 + Exp[I k. a2] + Exp[I k.(a2 - a1)];
EE = Abs[S]
R = 4 Pi/(3 Sqrt[3]);
ep = Plot3D[EE, -EE, kx, ky [Element] RegularPolygon[R, 6], Axes -> False, Boxed -> False, AspectRatio -> 2]


This works fine, but I would also like to draw the region under the 3D graph, something like:



bz = Graphics[RegularPolygon[R, 6]];


or



bz = RegionPlot[RegularPolygon[R, 6]];


However, using



Show[ep, bz]


doesn't work. I have found a few similar questions but they mostly seem to be about contours, I didn't know how to extend this for something as simple as a regular polygon.










share|improve this question











$endgroup$




I am trying to plot this 3D function over a hexagonal region:



a1 = Sqrt[3] 1, 0;
a2 = Sqrt[3] 1/2, Sqrt[3]/2;
k = kx, ky;
S = 1 + Exp[I k. a2] + Exp[I k.(a2 - a1)];
EE = Abs[S]
R = 4 Pi/(3 Sqrt[3]);
ep = Plot3D[EE, -EE, kx, ky [Element] RegularPolygon[R, 6], Axes -> False, Boxed -> False, AspectRatio -> 2]


This works fine, but I would also like to draw the region under the 3D graph, something like:



bz = Graphics[RegularPolygon[R, 6]];


or



bz = RegionPlot[RegularPolygon[R, 6]];


However, using



Show[ep, bz]


doesn't work. I have found a few similar questions but they mostly seem to be about contours, I didn't know how to extend this for something as simple as a regular polygon.







plotting regions






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited 12 mins ago









J. M. is slightly pensive

98.7k10310467




98.7k10310467










asked 5 hours ago









AshAsh

185




185











  • $begingroup$
    do you want you Polygon flat under the region of 3D !?
    $endgroup$
    – Alrubaie
    5 hours ago










  • $begingroup$
    Try This p = Graphics3D[Polygon[1, 0, 0, 0, 1, 0, 0, 0, 1]]
    $endgroup$
    – Alrubaie
    4 hours ago
















  • $begingroup$
    do you want you Polygon flat under the region of 3D !?
    $endgroup$
    – Alrubaie
    5 hours ago










  • $begingroup$
    Try This p = Graphics3D[Polygon[1, 0, 0, 0, 1, 0, 0, 0, 1]]
    $endgroup$
    – Alrubaie
    4 hours ago















$begingroup$
do you want you Polygon flat under the region of 3D !?
$endgroup$
– Alrubaie
5 hours ago




$begingroup$
do you want you Polygon flat under the region of 3D !?
$endgroup$
– Alrubaie
5 hours ago












$begingroup$
Try This p = Graphics3D[Polygon[1, 0, 0, 0, 1, 0, 0, 0, 1]]
$endgroup$
– Alrubaie
4 hours ago




$begingroup$
Try This p = Graphics3D[Polygon[1, 0, 0, 0, 1, 0, 0, 0, 1]]
$endgroup$
– Alrubaie
4 hours ago










1 Answer
1






active

oldest

votes


















4












$begingroup$

Try this:



region = Graphics3D[Polygon[CirclePoints[R, 6] /. x_, y_ :> x, y, -3]];
Show[ep,region]


Mathematica graphics






share|improve this answer









$endgroup$












  • $begingroup$
    Works perfectly, thank you!
    $endgroup$
    – Ash
    4 hours ago










  • $begingroup$
    @Ash You are very welcome! Thank you for the accept as well!
    $endgroup$
    – MarcoB
    4 hours ago











  • $begingroup$
    That's nice! What AspectRatio did you use?
    $endgroup$
    – mjw
    3 hours ago










  • $begingroup$
    @mjw Thank you! The aspect ratio is inherited from ep, which was in the OP's original code; they had set it to $2$.
    $endgroup$
    – MarcoB
    3 hours ago











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


















StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194130%2fputting-a-2d-region-plot-under-a-3d-plot%23new-answer', 'question_page');

);

Post as a guest















Required, but never shown

























1 Answer
1






active

oldest

votes








1 Answer
1






active

oldest

votes









active

oldest

votes






active

oldest

votes









4












$begingroup$

Try this:



region = Graphics3D[Polygon[CirclePoints[R, 6] /. x_, y_ :> x, y, -3]];
Show[ep,region]


Mathematica graphics






share|improve this answer









$endgroup$












  • $begingroup$
    Works perfectly, thank you!
    $endgroup$
    – Ash
    4 hours ago










  • $begingroup$
    @Ash You are very welcome! Thank you for the accept as well!
    $endgroup$
    – MarcoB
    4 hours ago











  • $begingroup$
    That's nice! What AspectRatio did you use?
    $endgroup$
    – mjw
    3 hours ago










  • $begingroup$
    @mjw Thank you! The aspect ratio is inherited from ep, which was in the OP's original code; they had set it to $2$.
    $endgroup$
    – MarcoB
    3 hours ago















4












$begingroup$

Try this:



region = Graphics3D[Polygon[CirclePoints[R, 6] /. x_, y_ :> x, y, -3]];
Show[ep,region]


Mathematica graphics






share|improve this answer









$endgroup$












  • $begingroup$
    Works perfectly, thank you!
    $endgroup$
    – Ash
    4 hours ago










  • $begingroup$
    @Ash You are very welcome! Thank you for the accept as well!
    $endgroup$
    – MarcoB
    4 hours ago











  • $begingroup$
    That's nice! What AspectRatio did you use?
    $endgroup$
    – mjw
    3 hours ago










  • $begingroup$
    @mjw Thank you! The aspect ratio is inherited from ep, which was in the OP's original code; they had set it to $2$.
    $endgroup$
    – MarcoB
    3 hours ago













4












4








4





$begingroup$

Try this:



region = Graphics3D[Polygon[CirclePoints[R, 6] /. x_, y_ :> x, y, -3]];
Show[ep,region]


Mathematica graphics






share|improve this answer









$endgroup$



Try this:



region = Graphics3D[Polygon[CirclePoints[R, 6] /. x_, y_ :> x, y, -3]];
Show[ep,region]


Mathematica graphics







share|improve this answer












share|improve this answer



share|improve this answer










answered 4 hours ago









MarcoBMarcoB

38k556114




38k556114











  • $begingroup$
    Works perfectly, thank you!
    $endgroup$
    – Ash
    4 hours ago










  • $begingroup$
    @Ash You are very welcome! Thank you for the accept as well!
    $endgroup$
    – MarcoB
    4 hours ago











  • $begingroup$
    That's nice! What AspectRatio did you use?
    $endgroup$
    – mjw
    3 hours ago










  • $begingroup$
    @mjw Thank you! The aspect ratio is inherited from ep, which was in the OP's original code; they had set it to $2$.
    $endgroup$
    – MarcoB
    3 hours ago
















  • $begingroup$
    Works perfectly, thank you!
    $endgroup$
    – Ash
    4 hours ago










  • $begingroup$
    @Ash You are very welcome! Thank you for the accept as well!
    $endgroup$
    – MarcoB
    4 hours ago











  • $begingroup$
    That's nice! What AspectRatio did you use?
    $endgroup$
    – mjw
    3 hours ago










  • $begingroup$
    @mjw Thank you! The aspect ratio is inherited from ep, which was in the OP's original code; they had set it to $2$.
    $endgroup$
    – MarcoB
    3 hours ago















$begingroup$
Works perfectly, thank you!
$endgroup$
– Ash
4 hours ago




$begingroup$
Works perfectly, thank you!
$endgroup$
– Ash
4 hours ago












$begingroup$
@Ash You are very welcome! Thank you for the accept as well!
$endgroup$
– MarcoB
4 hours ago





$begingroup$
@Ash You are very welcome! Thank you for the accept as well!
$endgroup$
– MarcoB
4 hours ago













$begingroup$
That's nice! What AspectRatio did you use?
$endgroup$
– mjw
3 hours ago




$begingroup$
That's nice! What AspectRatio did you use?
$endgroup$
– mjw
3 hours ago












$begingroup$
@mjw Thank you! The aspect ratio is inherited from ep, which was in the OP's original code; they had set it to $2$.
$endgroup$
– MarcoB
3 hours ago




$begingroup$
@mjw Thank you! The aspect ratio is inherited from ep, which was in the OP's original code; they had set it to $2$.
$endgroup$
– MarcoB
3 hours ago

















draft saved

draft discarded
















































Thanks for contributing an answer to Mathematica Stack Exchange!


  • Please be sure to answer the question. Provide details and share your research!

But avoid


  • Asking for help, clarification, or responding to other answers.

  • Making statements based on opinion; back them up with references or personal experience.

Use MathJax to format equations. MathJax reference.


To learn more, see our tips on writing great answers.




draft saved


draft discarded














StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194130%2fputting-a-2d-region-plot-under-a-3d-plot%23new-answer', 'question_page');

);

Post as a guest















Required, but never shown





















































Required, but never shown














Required, but never shown












Required, but never shown







Required, but never shown

































Required, but never shown














Required, but never shown












Required, but never shown







Required, but never shown







Popular posts from this blog

ValueError: Error when checking input: expected conv2d_13_input to have shape (3, 150, 150) but got array with shape (150, 150, 3)2019 Community Moderator ElectionError when checking : expected dense_1_input to have shape (None, 5) but got array with shape (200, 1)Error 'Expected 2D array, got 1D array instead:'ValueError: Error when checking input: expected lstm_41_input to have 3 dimensions, but got array with shape (40000,100)ValueError: Error when checking target: expected dense_1 to have shape (7,) but got array with shape (1,)ValueError: Error when checking target: expected dense_2 to have shape (1,) but got array with shape (0,)Keras exception: ValueError: Error when checking input: expected conv2d_1_input to have shape (150, 150, 3) but got array with shape (256, 256, 3)Steps taking too long to completewhen checking input: expected dense_1_input to have shape (13328,) but got array with shape (317,)ValueError: Error when checking target: expected dense_3 to have shape (None, 1) but got array with shape (7715, 40000)Keras exception: Error when checking input: expected dense_input to have shape (2,) but got array with shape (1,)

Ружовы пелікан Змест Знешні выгляд | Пашырэнне | Асаблівасці біялогіі | Літаратура | НавігацыяДагледжаная версіяправерана1 зменаДагледжаная версіяправерана1 змена/ 22697590 Сістэматыкана ВіківідахВыявына Вікісховішчы174693363011049382

Illegal assignment from SObject to ContactFetching String, Id from Map - Illegal Assignment Id to Field / ObjectError: Compile Error: Illegal assignment from String to BooleanError: List has no rows for assignment to SObjectError on Test Class - System.QueryException: List has no rows for assignment to SObjectRemote action problemDML requires SObject or SObject list type error“Illegal assignment from List to List”Test Class Fail: Batch Class: System.QueryException: List has no rows for assignment to SObjectMapping to a user'List has no rows for assignment to SObject' Mystery