Message Boards Message Boards

GROUPS:

[✓] Combine plots made in a Do loop?

Posted 11 months ago
573 Views
|
2 Replies
|
3 Total Likes
|

Is there a way to use Show, e.g. Show[ Do[Graphics3D[ .. ],{i,1,n}]]?

Attachments:
2 Replies

Write Table instead of Do:

Show[Table[
  Graphics3D[Polygon[{{0, 0, 0}, {1, 0, 0}, {1, 1, i}}]], {i, 0, 1}]]

or, even shorter, move Table inside Graphics3D and forget about Show:

Graphics3D[
 Table[Polygon[{{0, 0, 0}, {1, 0, 0}, {1, 1, i}}], {i, 0, 1}]]
Posted 10 months ago

Many thanks!

Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract