How to anchor the origin (0,0,0) to the center of multiple generated images in tikz?TikZ: Cropping the Bounding BoxAlign edges with anchor other than centerHow to define the default vertical distance between nodes?Understanding TikZ border anchorEdge anchor in tikztikz and pgfdeclareshape why the text is not at the center anchor?small multiple images moving toward each other in beamertikz anchor unexpectedtikz-cd nested tikzpicture wrong center anchortikz: show 0 at the axis origin
What is a writing material that persists nearly forever or for a long time?
Need a non-volatile memory IC with near unlimited read/write operations capability
Swapping "Good" and "Bad"
When did "&" stop being taught alongside the alphabet?
User Vs. Connected App
Publishing papers seem natural to many, while I find it really hard to think novel stuff to pursue till publication. How to cope up with this?
Object's height not a multiple of layer height
Four ships at the ocean with the same distance
How to properly translate the key phrase of Erdoğan's 2016 letter to Putin, "kusura bakmasınlar," to Russian
Can Jimmy hang on his rope?
IX-NAY on the IX-SAY
control gate with 3 inputs, two control and rotation gate
Conditions for Roots of a quadratic equation at infinity
My previous employer committed a severe violation of the law and is also being sued by me. How do I explain the situation to future employers?
VHF 50 Ω Antenna Over 75 Ω TV Coax
An integral that needs subtitution to be solved.
What exactly is a "murder hobo"?
Run Bash scripts in folder all at the same time
Why AI became applicable only after Nvidia's chips were available?
Are all diatonic chords in the diminished scale diminished?
Moving millions of files to a different directory with specfic name patterns
Did depressed people far more accurately estimate how many monsters they killed in a video game?
Distance between horizontal tree levels
Don't the events of "Forest of the Dead" contradict the fixed point in "The Wedding of River Song"?
How to anchor the origin (0,0,0) to the center of multiple generated images in tikz?
TikZ: Cropping the Bounding BoxAlign edges with anchor other than centerHow to define the default vertical distance between nodes?Understanding TikZ border anchorEdge anchor in tikztikz and pgfdeclareshape why the text is not at the center anchor?small multiple images moving toward each other in beamertikz anchor unexpectedtikz-cd nested tikzpicture wrong center anchortikz: show 0 at the axis origin
.everyoneloves__top-leaderboard:empty,.everyoneloves__mid-leaderboard:empty,.everyoneloves__bot-mid-leaderboard:empty margin-bottom:0;
2
I have the following file to generate an animation with a separate file
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endtikzpicture
enddocument
but my problem is that the point (0,0,0) changes place during rotation and I would like to have it in a single place throughout the entire animation. Is there a way to anchor it?
Thank you.
tikz-pgf animate
asked 10 hours ago
Concept7Concept7
1238 bronze badges
add a comment |
2
I have the following file to generate an animation with a separate file
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endtikzpicture
enddocument
but my problem is that the point (0,0,0) changes place during rotation and I would like to have it in a single place throughout the entire animation. Is there a way to anchor it?
Thank you.
tikz-pgf animate
asked 10 hours ago
Concept7Concept7
1238 bronze badges
add a comment |
2
2
2
I have the following file to generate an animation with a separate file
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endtikzpicture
enddocument
but my problem is that the point (0,0,0) changes place during rotation and I would like to have it in a single place throughout the entire animation. Is there a way to anchor it?
Thank you.
tikz-pgf animate
asked 10 hours ago
Concept7Concept7
1238 bronze badges
I have the following file to generate an animation with a separate file
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endtikzpicture
enddocument
but my problem is that the point (0,0,0) changes place during rotation and I would like to have it in a single place throughout the entire animation. Is there a way to anchor it?
Thank you.
tikz-pgf animate
tikz-pgf animate
asked 10 hours ago
Concept7Concept7
1238 bronze badges
asked 10 hours ago
Concept7Concept7
1238 bronze badges
asked 10 hours ago
Concept7Concept7
1238 bronze badges
asked 10 hours ago
Concept7Concept7
1238 bronze badges
asked 10 hours ago
Concept7Concept7
1238 bronze badges
1238 bronze badges
add a comment |
add a comment |
1 Answer
1
active
oldest
votes
3
It is not the point (0,0,0) that changes but the bounding box. To prevent this from happening, you can set a bounding box yourself, e.g. by saying
path[use as bounding box] (-4,-1.45) rectangle (4,4);
This yields
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
path[use as bounding box] (-4,-1.45) rectangle (4,4);
beginscope
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endscope
endtikzpicture
enddocument
However, I would recommend tikz-3dplot for that. It allows you to do orthographic projections, and makes it more easy to distinguish hidden from foreground faces. I also use [a routine to determine the minimal bounding box that fits all frames.
documentclass[tikz,border=3.14mm]standalone
usepackagetikz-3dplot
newcounterx
newcountery
newcounterz
tikzsetplane/.style n args=3insert path=%
#1 -- ++ #2 -- ++ #3 -- ++ ($-1*#2$) -- cycle,
xy plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,pgfkeysvalueof/tikz/3d block/y length,0),
xz plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
yz plane/.style=plane=#1(0,pgfkeysvalueof/tikz/3d block/y length,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
get projections/.style=insert path=%
let p1=(1,0,0),p2=(0,1,0) in
[/utils/exec=pgfmathtruncatemacroxprojsign(x1)xdefxprojxproj
pgfmathtruncatemacroyprojsign(x2)xdefyprojyproj
pgfmathtruncatemacrozprojsign(cos(tdplotmaintheta))xdefzprojzproj],
pics/3d block/.style=code=
tikzset3d block/.cd,#1
path[get projections];
ifnumzproj=-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumzproj>-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
,
3d block/.cd,
xy face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
xz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
yz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
every face/.style=draw,very thick,
x length/.initial=1,
y length/.initial=1,
z length/.initial=1,
/tikz/retrieve bounding box/.style=insert path=
let p1=(current bounding box.south west),
p2=(current bounding box.north east)
in pgfextra%
pgfmathsetmacroxminmin(x1,xmin)
pgfmathsetmacroxmaxmax(x2,xmax)
pgfmathsetmacroyminmin(y1,ymin)
pgfmathsetmacroymaxmax(y2,ymax)
xdefxminxmin pt
xdefxmaxxmax pt
xdefyminymin pt
xdefymaxymax pt
%typeoutxmin,xmax,ymin,ymax
pgfmathsetmacroxmin0
pgfmathsetmacroxmax0
pgfmathsetmacroymin0
pgfmathsetmacroymax0
begindocument
foreach vari in 0,5,10,15,...,360
tdplotsetmaincoords70vari % the first argument cannot be larger than 90
begintikzpicture[line join=round,tdplot_main_coords,>=stealth]
ifdefinedfigbbrelax
path figbb;
fi
coordinate (A) at (3,-3,-1.5);
coordinate (B) at (3,3,-1.5);
coordinate (C) at (-3,3,-1.5);
coordinate (D) at (-3,-3,-1.5);
coordinate (E) at (3,-3,1.5);
coordinate (F) at (3,3,1.5);
coordinate (G) at (-3,3,1.5);
coordinate (H) at (-3,-3,1.5);
foreach X in A,B,C,D
path (X) node[below]X;
draw[dashed] (3,0,-1.5) -- (0,0,-1.5) -- (0,3,-1.5)
(0,0,-1.5) -- (0,0,1.5);
draw[thick,->] (3,0,-1.5) -- (5,0,-1.5);
draw[thick,->] (0,3,-1.5) -- (0,5,-1.5);
pic3d block=x length=6,y length=6,z length=3;
draw[thick,->] (0,0,1.5) -- (0,0,4);
foreach X in E,F,G,H
path (X) node[above]X;
path[retrieve bounding box];
endtikzpicture
makeatletter
edeffigbb(xmin,ymin) rectangle (xmax,ymax)
immediatewrite@mainauxxdefstringfigbbfigbbrelax
makeatother
enddocument
answered 10 hours ago
marmotmarmot
143k6 gold badges187 silver badges345 bronze badges
Do you mean loadtikz-3dplotinstead oftikzpackage? Is there a possible significant reduction in code complexity? I haven't looked intotikz-3dplotpackage so I don't know the commands available in it.
– Concept7
10 hours ago
2
@Concept7 Thetikz-3dplotpackage loadstikzand allows you to set the view angles and then does an orthographic projection. That is, it will replace ` x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),` by something entirely fixed by the view angles.
– marmot
10 hours ago
1
@Concept7 I added atikz-3dplotversion. True, one needs more preparations, but you can adjust the view more easily and can also more easily distinguish between foreground and background faces.
– marmot
9 hours ago
add a comment |
Your Answer
StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "85"
;
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
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f499021%2fhow-to-anchor-the-origin-0-0-0-to-the-center-of-multiple-generated-images-in-t%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
3
It is not the point (0,0,0) that changes but the bounding box. To prevent this from happening, you can set a bounding box yourself, e.g. by saying
path[use as bounding box] (-4,-1.45) rectangle (4,4);
This yields
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
path[use as bounding box] (-4,-1.45) rectangle (4,4);
beginscope
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endscope
endtikzpicture
enddocument
However, I would recommend tikz-3dplot for that. It allows you to do orthographic projections, and makes it more easy to distinguish hidden from foreground faces. I also use [a routine to determine the minimal bounding box that fits all frames.
documentclass[tikz,border=3.14mm]standalone
usepackagetikz-3dplot
newcounterx
newcountery
newcounterz
tikzsetplane/.style n args=3insert path=%
#1 -- ++ #2 -- ++ #3 -- ++ ($-1*#2$) -- cycle,
xy plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,pgfkeysvalueof/tikz/3d block/y length,0),
xz plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
yz plane/.style=plane=#1(0,pgfkeysvalueof/tikz/3d block/y length,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
get projections/.style=insert path=%
let p1=(1,0,0),p2=(0,1,0) in
[/utils/exec=pgfmathtruncatemacroxprojsign(x1)xdefxprojxproj
pgfmathtruncatemacroyprojsign(x2)xdefyprojyproj
pgfmathtruncatemacrozprojsign(cos(tdplotmaintheta))xdefzprojzproj],
pics/3d block/.style=code=
tikzset3d block/.cd,#1
path[get projections];
ifnumzproj=-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumzproj>-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
,
3d block/.cd,
xy face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
xz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
yz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
every face/.style=draw,very thick,
x length/.initial=1,
y length/.initial=1,
z length/.initial=1,
/tikz/retrieve bounding box/.style=insert path=
let p1=(current bounding box.south west),
p2=(current bounding box.north east)
in pgfextra%
pgfmathsetmacroxminmin(x1,xmin)
pgfmathsetmacroxmaxmax(x2,xmax)
pgfmathsetmacroyminmin(y1,ymin)
pgfmathsetmacroymaxmax(y2,ymax)
xdefxminxmin pt
xdefxmaxxmax pt
xdefyminymin pt
xdefymaxymax pt
%typeoutxmin,xmax,ymin,ymax
pgfmathsetmacroxmin0
pgfmathsetmacroxmax0
pgfmathsetmacroymin0
pgfmathsetmacroymax0
begindocument
foreach vari in 0,5,10,15,...,360
tdplotsetmaincoords70vari % the first argument cannot be larger than 90
begintikzpicture[line join=round,tdplot_main_coords,>=stealth]
ifdefinedfigbbrelax
path figbb;
fi
coordinate (A) at (3,-3,-1.5);
coordinate (B) at (3,3,-1.5);
coordinate (C) at (-3,3,-1.5);
coordinate (D) at (-3,-3,-1.5);
coordinate (E) at (3,-3,1.5);
coordinate (F) at (3,3,1.5);
coordinate (G) at (-3,3,1.5);
coordinate (H) at (-3,-3,1.5);
foreach X in A,B,C,D
path (X) node[below]X;
draw[dashed] (3,0,-1.5) -- (0,0,-1.5) -- (0,3,-1.5)
(0,0,-1.5) -- (0,0,1.5);
draw[thick,->] (3,0,-1.5) -- (5,0,-1.5);
draw[thick,->] (0,3,-1.5) -- (0,5,-1.5);
pic3d block=x length=6,y length=6,z length=3;
draw[thick,->] (0,0,1.5) -- (0,0,4);
foreach X in E,F,G,H
path (X) node[above]X;
path[retrieve bounding box];
endtikzpicture
makeatletter
edeffigbb(xmin,ymin) rectangle (xmax,ymax)
immediatewrite@mainauxxdefstringfigbbfigbbrelax
makeatother
enddocument
answered 10 hours ago
marmotmarmot
143k6 gold badges187 silver badges345 bronze badges
Do you mean loadtikz-3dplotinstead oftikzpackage? Is there a possible significant reduction in code complexity? I haven't looked intotikz-3dplotpackage so I don't know the commands available in it.
– Concept7
10 hours ago
2
@Concept7 Thetikz-3dplotpackage loadstikzand allows you to set the view angles and then does an orthographic projection. That is, it will replace ` x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),` by something entirely fixed by the view angles.
– marmot
10 hours ago
1
@Concept7 I added atikz-3dplotversion. True, one needs more preparations, but you can adjust the view more easily and can also more easily distinguish between foreground and background faces.
– marmot
9 hours ago
add a comment |
3
It is not the point (0,0,0) that changes but the bounding box. To prevent this from happening, you can set a bounding box yourself, e.g. by saying
path[use as bounding box] (-4,-1.45) rectangle (4,4);
This yields
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
path[use as bounding box] (-4,-1.45) rectangle (4,4);
beginscope
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endscope
endtikzpicture
enddocument
However, I would recommend tikz-3dplot for that. It allows you to do orthographic projections, and makes it more easy to distinguish hidden from foreground faces. I also use [a routine to determine the minimal bounding box that fits all frames.
documentclass[tikz,border=3.14mm]standalone
usepackagetikz-3dplot
newcounterx
newcountery
newcounterz
tikzsetplane/.style n args=3insert path=%
#1 -- ++ #2 -- ++ #3 -- ++ ($-1*#2$) -- cycle,
xy plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,pgfkeysvalueof/tikz/3d block/y length,0),
xz plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
yz plane/.style=plane=#1(0,pgfkeysvalueof/tikz/3d block/y length,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
get projections/.style=insert path=%
let p1=(1,0,0),p2=(0,1,0) in
[/utils/exec=pgfmathtruncatemacroxprojsign(x1)xdefxprojxproj
pgfmathtruncatemacroyprojsign(x2)xdefyprojyproj
pgfmathtruncatemacrozprojsign(cos(tdplotmaintheta))xdefzprojzproj],
pics/3d block/.style=code=
tikzset3d block/.cd,#1
path[get projections];
ifnumzproj=-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumzproj>-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
,
3d block/.cd,
xy face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
xz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
yz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
every face/.style=draw,very thick,
x length/.initial=1,
y length/.initial=1,
z length/.initial=1,
/tikz/retrieve bounding box/.style=insert path=
let p1=(current bounding box.south west),
p2=(current bounding box.north east)
in pgfextra%
pgfmathsetmacroxminmin(x1,xmin)
pgfmathsetmacroxmaxmax(x2,xmax)
pgfmathsetmacroyminmin(y1,ymin)
pgfmathsetmacroymaxmax(y2,ymax)
xdefxminxmin pt
xdefxmaxxmax pt
xdefyminymin pt
xdefymaxymax pt
%typeoutxmin,xmax,ymin,ymax
pgfmathsetmacroxmin0
pgfmathsetmacroxmax0
pgfmathsetmacroymin0
pgfmathsetmacroymax0
begindocument
foreach vari in 0,5,10,15,...,360
tdplotsetmaincoords70vari % the first argument cannot be larger than 90
begintikzpicture[line join=round,tdplot_main_coords,>=stealth]
ifdefinedfigbbrelax
path figbb;
fi
coordinate (A) at (3,-3,-1.5);
coordinate (B) at (3,3,-1.5);
coordinate (C) at (-3,3,-1.5);
coordinate (D) at (-3,-3,-1.5);
coordinate (E) at (3,-3,1.5);
coordinate (F) at (3,3,1.5);
coordinate (G) at (-3,3,1.5);
coordinate (H) at (-3,-3,1.5);
foreach X in A,B,C,D
path (X) node[below]X;
draw[dashed] (3,0,-1.5) -- (0,0,-1.5) -- (0,3,-1.5)
(0,0,-1.5) -- (0,0,1.5);
draw[thick,->] (3,0,-1.5) -- (5,0,-1.5);
draw[thick,->] (0,3,-1.5) -- (0,5,-1.5);
pic3d block=x length=6,y length=6,z length=3;
draw[thick,->] (0,0,1.5) -- (0,0,4);
foreach X in E,F,G,H
path (X) node[above]X;
path[retrieve bounding box];
endtikzpicture
makeatletter
edeffigbb(xmin,ymin) rectangle (xmax,ymax)
immediatewrite@mainauxxdefstringfigbbfigbbrelax
makeatother
enddocument
answered 10 hours ago
marmotmarmot
143k6 gold badges187 silver badges345 bronze badges
Do you mean loadtikz-3dplotinstead oftikzpackage? Is there a possible significant reduction in code complexity? I haven't looked intotikz-3dplotpackage so I don't know the commands available in it.
– Concept7
10 hours ago
2
@Concept7 Thetikz-3dplotpackage loadstikzand allows you to set the view angles and then does an orthographic projection. That is, it will replace ` x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),` by something entirely fixed by the view angles.
– marmot
10 hours ago
1
@Concept7 I added atikz-3dplotversion. True, one needs more preparations, but you can adjust the view more easily and can also more easily distinguish between foreground and background faces.
– marmot
9 hours ago
add a comment |
3
3
3
It is not the point (0,0,0) that changes but the bounding box. To prevent this from happening, you can set a bounding box yourself, e.g. by saying
path[use as bounding box] (-4,-1.45) rectangle (4,4);
This yields
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
path[use as bounding box] (-4,-1.45) rectangle (4,4);
beginscope
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endscope
endtikzpicture
enddocument
However, I would recommend tikz-3dplot for that. It allows you to do orthographic projections, and makes it more easy to distinguish hidden from foreground faces. I also use [a routine to determine the minimal bounding box that fits all frames.
documentclass[tikz,border=3.14mm]standalone
usepackagetikz-3dplot
newcounterx
newcountery
newcounterz
tikzsetplane/.style n args=3insert path=%
#1 -- ++ #2 -- ++ #3 -- ++ ($-1*#2$) -- cycle,
xy plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,pgfkeysvalueof/tikz/3d block/y length,0),
xz plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
yz plane/.style=plane=#1(0,pgfkeysvalueof/tikz/3d block/y length,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
get projections/.style=insert path=%
let p1=(1,0,0),p2=(0,1,0) in
[/utils/exec=pgfmathtruncatemacroxprojsign(x1)xdefxprojxproj
pgfmathtruncatemacroyprojsign(x2)xdefyprojyproj
pgfmathtruncatemacrozprojsign(cos(tdplotmaintheta))xdefzprojzproj],
pics/3d block/.style=code=
tikzset3d block/.cd,#1
path[get projections];
ifnumzproj=-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumzproj>-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
,
3d block/.cd,
xy face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
xz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
yz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
every face/.style=draw,very thick,
x length/.initial=1,
y length/.initial=1,
z length/.initial=1,
/tikz/retrieve bounding box/.style=insert path=
let p1=(current bounding box.south west),
p2=(current bounding box.north east)
in pgfextra%
pgfmathsetmacroxminmin(x1,xmin)
pgfmathsetmacroxmaxmax(x2,xmax)
pgfmathsetmacroyminmin(y1,ymin)
pgfmathsetmacroymaxmax(y2,ymax)
xdefxminxmin pt
xdefxmaxxmax pt
xdefyminymin pt
xdefymaxymax pt
%typeoutxmin,xmax,ymin,ymax
pgfmathsetmacroxmin0
pgfmathsetmacroxmax0
pgfmathsetmacroymin0
pgfmathsetmacroymax0
begindocument
foreach vari in 0,5,10,15,...,360
tdplotsetmaincoords70vari % the first argument cannot be larger than 90
begintikzpicture[line join=round,tdplot_main_coords,>=stealth]
ifdefinedfigbbrelax
path figbb;
fi
coordinate (A) at (3,-3,-1.5);
coordinate (B) at (3,3,-1.5);
coordinate (C) at (-3,3,-1.5);
coordinate (D) at (-3,-3,-1.5);
coordinate (E) at (3,-3,1.5);
coordinate (F) at (3,3,1.5);
coordinate (G) at (-3,3,1.5);
coordinate (H) at (-3,-3,1.5);
foreach X in A,B,C,D
path (X) node[below]X;
draw[dashed] (3,0,-1.5) -- (0,0,-1.5) -- (0,3,-1.5)
(0,0,-1.5) -- (0,0,1.5);
draw[thick,->] (3,0,-1.5) -- (5,0,-1.5);
draw[thick,->] (0,3,-1.5) -- (0,5,-1.5);
pic3d block=x length=6,y length=6,z length=3;
draw[thick,->] (0,0,1.5) -- (0,0,4);
foreach X in E,F,G,H
path (X) node[above]X;
path[retrieve bounding box];
endtikzpicture
makeatletter
edeffigbb(xmin,ymin) rectangle (xmax,ymax)
immediatewrite@mainauxxdefstringfigbbfigbbrelax
makeatother
enddocument
answered 10 hours ago
marmotmarmot
143k6 gold badges187 silver badges345 bronze badges
It is not the point (0,0,0) that changes but the bounding box. To prevent this from happening, you can set a bounding box yourself, e.g. by saying
path[use as bounding box] (-4,-1.45) rectangle (4,4);
This yields
documentclass[tikz, border=1cm]standalone
usepackagetkz-euclide
usetkzobjall
begindocument
foreach vari in 0,5,10,15,...,360
begintikzpicture
path[use as bounding box] (-4,-1.45) rectangle (4,4);
beginscope
[
scale=.5,
x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),
rotate around z=vari
]
% coordinates
coordinate (A) at (3,-3,0);
coordinate (B) at (3,3,0);
coordinate (C) at (-3,3,0);
coordinate (D) at (-3,-3,0);
coordinate (E) at (3,-3,3);
coordinate (F) at (3,3,3);
coordinate (G) at (-3,3,3);
coordinate (H) at (-3,-3,3);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](C,D,H,G)
% Axes 3d
draw[->,>=stealth] (3,0,0) -- (5,0,0);
draw[->,>=stealth] (0,3,0) -- (0,5,0);
draw[dashed] (0,0,0) -- (0,0,4);
draw[dashed] (0,0,0) -- (0,3,0);
draw[dashed] (0,0,0) -- (3,0,0);
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,C,D)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](B,C,G,F)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,D,H,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](A,B,F,E)
tkzDrawPolygon[fill=blue!20,opacity=.5,rounded corners=.1pt](G,H,E,F)
tkzDrawSegments[ultra thick](A,B B,C C,G G,H H,E E,F E,A F,B F,G)
tkzLabelPoints[above](E,F,G,H)
tkzLabelPoints[below](A,B,C,D)
draw[->,>=stealth] (0,0,4) -- (0,0,7);
endscope
endtikzpicture
enddocument
However, I would recommend tikz-3dplot for that. It allows you to do orthographic projections, and makes it more easy to distinguish hidden from foreground faces. I also use [a routine to determine the minimal bounding box that fits all frames.
documentclass[tikz,border=3.14mm]standalone
usepackagetikz-3dplot
newcounterx
newcountery
newcounterz
tikzsetplane/.style n args=3insert path=%
#1 -- ++ #2 -- ++ #3 -- ++ ($-1*#2$) -- cycle,
xy plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,pgfkeysvalueof/tikz/3d block/y length,0),
xz plane/.style=plane=#1(pgfkeysvalueof/tikz/3d block/x length,0,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
yz plane/.style=plane=#1(0,pgfkeysvalueof/tikz/3d block/y length,0)(0,0,pgfkeysvalueof/tikz/3d block/z length),
get projections/.style=insert path=%
let p1=(1,0,0),p2=(0,1,0) in
[/utils/exec=pgfmathtruncatemacroxprojsign(x1)xdefxprojxproj
pgfmathtruncatemacroyprojsign(x2)xdefyprojyproj
pgfmathtruncatemacrozprojsign(cos(tdplotmaintheta))xdefzprojzproj],
pics/3d block/.style=code=
tikzset3d block/.cd,#1
path[get projections];
ifnumzproj=-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumyproj=1
path[3d block/every face,3d block/yz face,yz plane=
(pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/yz face,yz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumxproj=1
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xz face,xz plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
ifnumzproj>-1
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
pgfkeysvalueof/tikz/3d block/z length/2)];
else
path[3d block/every face,3d block/xy face,xy plane=
(-pgfkeysvalueof/tikz/3d block/x length/2,
-pgfkeysvalueof/tikz/3d block/y length/2,
-pgfkeysvalueof/tikz/3d block/z length/2)];
fi
,
3d block/.cd,
xy face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
xz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
yz face/.style=fill=blue!20,opacity=.5,rounded corners=.1pt,
every face/.style=draw,very thick,
x length/.initial=1,
y length/.initial=1,
z length/.initial=1,
/tikz/retrieve bounding box/.style=insert path=
let p1=(current bounding box.south west),
p2=(current bounding box.north east)
in pgfextra%
pgfmathsetmacroxminmin(x1,xmin)
pgfmathsetmacroxmaxmax(x2,xmax)
pgfmathsetmacroyminmin(y1,ymin)
pgfmathsetmacroymaxmax(y2,ymax)
xdefxminxmin pt
xdefxmaxxmax pt
xdefyminymin pt
xdefymaxymax pt
%typeoutxmin,xmax,ymin,ymax
pgfmathsetmacroxmin0
pgfmathsetmacroxmax0
pgfmathsetmacroymin0
pgfmathsetmacroymax0
begindocument
foreach vari in 0,5,10,15,...,360
tdplotsetmaincoords70vari % the first argument cannot be larger than 90
begintikzpicture[line join=round,tdplot_main_coords,>=stealth]
ifdefinedfigbbrelax
path figbb;
fi
coordinate (A) at (3,-3,-1.5);
coordinate (B) at (3,3,-1.5);
coordinate (C) at (-3,3,-1.5);
coordinate (D) at (-3,-3,-1.5);
coordinate (E) at (3,-3,1.5);
coordinate (F) at (3,3,1.5);
coordinate (G) at (-3,3,1.5);
coordinate (H) at (-3,-3,1.5);
foreach X in A,B,C,D
path (X) node[below]X;
draw[dashed] (3,0,-1.5) -- (0,0,-1.5) -- (0,3,-1.5)
(0,0,-1.5) -- (0,0,1.5);
draw[thick,->] (3,0,-1.5) -- (5,0,-1.5);
draw[thick,->] (0,3,-1.5) -- (0,5,-1.5);
pic3d block=x length=6,y length=6,z length=3;
draw[thick,->] (0,0,1.5) -- (0,0,4);
foreach X in E,F,G,H
path (X) node[above]X;
path[retrieve bounding box];
endtikzpicture
makeatletter
edeffigbb(xmin,ymin) rectangle (xmax,ymax)
immediatewrite@mainauxxdefstringfigbbfigbbrelax
makeatother
enddocument
answered 10 hours ago
marmotmarmot
143k6 gold badges187 silver badges345 bronze badges
edited 9 hours ago
answered 10 hours ago
marmotmarmot
143k6 gold badges187 silver badges345 bronze badges
answered 10 hours ago
marmotmarmot
143k6 gold badges187 silver badges345 bronze badges
answered 10 hours ago
marmotmarmot
143k6 gold badges187 silver badges345 bronze badges
143k6 gold badges187 silver badges345 bronze badges
Do you mean loadtikz-3dplotinstead oftikzpackage? Is there a possible significant reduction in code complexity? I haven't looked intotikz-3dplotpackage so I don't know the commands available in it.
– Concept7
10 hours ago
2
@Concept7 Thetikz-3dplotpackage loadstikzand allows you to set the view angles and then does an orthographic projection. That is, it will replace ` x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),` by something entirely fixed by the view angles.
– marmot
10 hours ago
1
@Concept7 I added atikz-3dplotversion. True, one needs more preparations, but you can adjust the view more easily and can also more easily distinguish between foreground and background faces.
– marmot
9 hours ago
add a comment |
Do you mean loadtikz-3dplotinstead oftikzpackage? Is there a possible significant reduction in code complexity? I haven't looked intotikz-3dplotpackage so I don't know the commands available in it.
– Concept7
10 hours ago
2
@Concept7 Thetikz-3dplotpackage loadstikzand allows you to set the view angles and then does an orthographic projection. That is, it will replace ` x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),` by something entirely fixed by the view angles.
– marmot
10 hours ago
1
@Concept7 I added atikz-3dplotversion. True, one needs more preparations, but you can adjust the view more easily and can also more easily distinguish between foreground and background faces.
– marmot
9 hours ago
Do you mean load
tikz-3dplot instead of tikz package? Is there a possible significant reduction in code complexity? I haven't looked into tikz-3dplot package so I don't know the commands available in it.– Concept7
10 hours ago
Do you mean load
tikz-3dplot instead of tikz package? Is there a possible significant reduction in code complexity? I haven't looked into tikz-3dplot package so I don't know the commands available in it.– Concept7
10 hours ago
2
2
@Concept7 The
tikz-3dplot package loads tikz and allows you to set the view angles and then does an orthographic projection. That is, it will replace ` x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),` by something entirely fixed by the view angles.– marmot
10 hours ago
@Concept7 The
tikz-3dplot package loads tikz and allows you to set the view angles and then does an orthographic projection. That is, it will replace ` x=(-1cm,-.25cm),y=(1cm,-.25cm),z=(0cm,1cm),` by something entirely fixed by the view angles.– marmot
10 hours ago
1
1
@Concept7 I added a
tikz-3dplot version. True, one needs more preparations, but you can adjust the view more easily and can also more easily distinguish between foreground and background faces.– marmot
9 hours ago
@Concept7 I added a
tikz-3dplot version. True, one needs more preparations, but you can adjust the view more easily and can also more easily distinguish between foreground and background faces.– marmot
9 hours ago
add a comment |
draft saved
draft discarded
Thanks for contributing an answer to TeX - LaTeX 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.
To learn more, see our tips on writing great answers.
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
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f499021%2fhow-to-anchor-the-origin-0-0-0-to-the-center-of-multiple-generated-images-in-t%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
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
Required, but never shown
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
Required, but never shown
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
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
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
