Kdtyjb

What is better: yes / no radio, or simple checkbox?

Professor forcing me to attend a conference

Does the US political system, in principle, allow for a no-party system?

What is the oldest European royal house?

Replacing tantalum capacitor with ceramic capacitor for Op Amps

How can I be pwned if I'm not registered on the compromised site?

Is there a way to find out the age of climbing ropes?

Why won't the strings command stop?

Dukha vs legitimate need

Computing the volume of a simplex-like object with constraints

Is every open circuit a capacitor?

PTIJ: Aliyot for the deceased

Why can't we use freedom of speech and expression to incite people to rebel against government in India?

Are there other characters in the Star Wars universe who had damaged bodies and needed to wear an outfit like Darth Vader?

The (Easy) Road to Code

Is there a frame of reference in which I was born before I was conceived?

Quitting employee has privileged access to critical information

3.5% Interest Student Loan or use all of my savings on Tuition?

Python 3.6+ function to ask for a multiple-choice answer

Why do we call complex numbers “numbers” but we don’t consider 2 vectors numbers?

What does "rhumatis" mean?

What is the meaning of option 'by' in TikZ Intersections

Sundering Titan and basic normal lands and snow lands

What can I do if someone tampers with my SSH public key?

Cylinder with non circle bottom, TikZ

TikZ: a cylinder of infinite heightLaTeX equivalent of ConTeXt buffersRotate a node but not its content: the case of the ellipse decorationHow to define the default vertical distance between nodes?Numerical conditional within tikz keys?TikZ: Drawing an arc from an intersection to an intersectionCylinder , circle and planeHow to prevent rounded and duplicated tick labels in pgfplots with fixed precision?TikZ: Drawing a cylinder with a hole the bottomLine up nested tikz enviroments or how to get rid of themCreating horizontal cylinder with bottom node shape in TikZ/PGF

5

3

Hi i try to plot a cylindrical domain, where the bottom of the cylinder is not a circle or ellipse.

My knowledge is very poor and all my previous attempts failed.

Failed attempt:

documentclass{article}

usepackage{tikz}

usepackage[active,tightpage]{preview}

PreviewEnvironment{tikzpicture}

begin{document}

begin{tikzpicture}



draw plot [smooth cycle] coordinates{(0,0) (1,-.5) (1.2,1.5) (0,1) (-.5,.5) (-.7,.2)};



draw plot [smooth cycle] coordinates{(3,2) (4,1.5) (4.2,3.5) (3,3) (2.5,2.5) (2.3,2.2)};





draw (1,-.5)--(4,1.5);



draw (1.2,1.5)--(4.2,3.5);



end{tikzpicture}

end{document}

tikz-pgf asymptote

share|improve this question

edited 5 mins ago

g.kov

17.4k13976

asked Oct 25 '13 at 9:02

NoobtronNoobtron

262

• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  
  can you include your failed attempt too? It will help us to get the idea what you mean
  
  – percusse
  Oct 25 '13 at 9:14
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Here it is, very poor
  
  – Noobtron
  Oct 25 '13 at 9:33
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Can you also include a mock-up of what you are trying to achieve? It can be done with drawing software.
  
  – Alenanno
  Oct 25 '13 at 11:10
  
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Are you trying to do something like asked in this question?
  
  – Habi
  Oct 25 '13 at 14:22
  
  
  

  
  
  
  

add a comment | 

5

3

Hi i try to plot a cylindrical domain, where the bottom of the cylinder is not a circle or ellipse.

My knowledge is very poor and all my previous attempts failed.

Failed attempt:

documentclass{article}

usepackage{tikz}

usepackage[active,tightpage]{preview}

PreviewEnvironment{tikzpicture}

begin{document}

begin{tikzpicture}



draw plot [smooth cycle] coordinates{(0,0) (1,-.5) (1.2,1.5) (0,1) (-.5,.5) (-.7,.2)};



draw plot [smooth cycle] coordinates{(3,2) (4,1.5) (4.2,3.5) (3,3) (2.5,2.5) (2.3,2.2)};





draw (1,-.5)--(4,1.5);



draw (1.2,1.5)--(4.2,3.5);



end{tikzpicture}

end{document}

tikz-pgf asymptote

share|improve this question

edited 5 mins ago

g.kov

17.4k13976

asked Oct 25 '13 at 9:02

NoobtronNoobtron

262

• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  
  can you include your failed attempt too? It will help us to get the idea what you mean
  
  – percusse
  Oct 25 '13 at 9:14
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Here it is, very poor
  
  – Noobtron
  Oct 25 '13 at 9:33
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Can you also include a mock-up of what you are trying to achieve? It can be done with drawing software.
  
  – Alenanno
  Oct 25 '13 at 11:10
  
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Are you trying to do something like asked in this question?
  
  – Habi
  Oct 25 '13 at 14:22
  
  
  

  
  
  
  

add a comment | 

Hi i try to plot a cylindrical domain, where the bottom of the cylinder is not a circle or ellipse.

My knowledge is very poor and all my previous attempts failed.

Failed attempt:

documentclass{article}

usepackage{tikz}

usepackage[active,tightpage]{preview}

PreviewEnvironment{tikzpicture}

begin{document}

begin{tikzpicture}



draw plot [smooth cycle] coordinates{(0,0) (1,-.5) (1.2,1.5) (0,1) (-.5,.5) (-.7,.2)};



draw plot [smooth cycle] coordinates{(3,2) (4,1.5) (4.2,3.5) (3,3) (2.5,2.5) (2.3,2.2)};





draw (1,-.5)--(4,1.5);



draw (1.2,1.5)--(4.2,3.5);



end{tikzpicture}

end{document}

tikz-pgf asymptote

share|improve this question

edited 5 mins ago

g.kov

17.4k13976

asked Oct 25 '13 at 9:02

NoobtronNoobtron

262

documentclass{article}

usepackage{tikz}

usepackage[active,tightpage]{preview}

PreviewEnvironment{tikzpicture}

begin{document}

begin{tikzpicture}



draw plot [smooth cycle] coordinates{(0,0) (1,-.5) (1.2,1.5) (0,1) (-.5,.5) (-.7,.2)};



draw plot [smooth cycle] coordinates{(3,2) (4,1.5) (4.2,3.5) (3,3) (2.5,2.5) (2.3,2.2)};





draw (1,-.5)--(4,1.5);



draw (1.2,1.5)--(4.2,3.5);



end{tikzpicture}

end{document}

share|improve this question

edited 5 mins ago

g.kov

17.4k13976

asked Oct 25 '13 at 9:02

NoobtronNoobtron

262

share|improve this question

edited 5 mins ago

g.kov

17.4k13976

asked Oct 25 '13 at 9:02

NoobtronNoobtron

262

edited 5 mins ago

g.kov

17.4k13976

edited 5 mins ago

g.kov

17.4k13976

asked Oct 25 '13 at 9:02

NoobtronNoobtron

262

asked Oct 25 '13 at 9:02

NoobtronNoobtron

262

3 Answers
3

active

oldest

votes

8

There are many ways to visualize such a cylinder in TeX world, here is one made by means of
extrude feature of the Asymptote using raster output.

% cyl.tex :

%

documentclass{article}

usepackage[inline]{asymptote}

usepackage{lmodern}

begin{document}

begin{figure}

begin{asy}

settings.outformat="png";

settings.tex="pdflatex";

settings.render=8;

size(5cm);

import graph3;

import fontsize;

defaultpen(fontsize(9pt));



currentprojection=orthographic(camera=(3,3,6),up=Z,target=O,zoom=1);



currentlight=light(gray(0.8),ambient=rgb(0.1,0.099,0.101),specular=gray(0.7),

                     specularfactor=3,viewport=true,dir(42,48));



pair[] ppair={(0,0),(1,-.5),(1.2,1.5),(0,1),(-.5,.5),(-.7,.2)};

real height=3;



guide gbase=graph(ppair, Spline)..cycle;



pen bpen=rgb(0.1, 0.1, 0.8)+opacity(0.5);

material m=material(diffusepen=0.7bpen

,ambientpen=bpen,emissivepen=0.3*bpen,specularpen=0.999white,shininess=1.0);



draw(rotate(-90,Y)*rotate(180,Z)*extrude(gbase,height*Z),m,render(merge=true));



xaxis3("$x$",-3.2,1.2,red  ,Arrow3);

yaxis3("$y$",  -2,2,green,Arrow3);

zaxis3("$z$",  -3,3,blue ,Arrow3);



end{asy}

end{figure}

end{document}

%

% Process:

%

% pdflatex cyl.tex    

% asy cyl-*.asy    

% pdflatex cyl.tex

share|improve this answer

answered Oct 25 '13 at 16:07

g.kovg.kov

17.4k13976

add a comment | 

6

It looks like you could use pgfplots for this, e.g.:

Code

documentclass[tikz,border=2mm]{standalone}

usepackage{pgfplots}

pgfplotsset{compat=1.8}



begin{document}



begin{tikzpicture}

    begin{axis}

    [ z buffer=sort,

    ]

        addplot3[domain=0:360,y domain=0:360,surf,shader=faceted,samples=40]

        ( {cos(y)+0.1*sin(7*y)},

            {x},

            {sin(y)+0.1*cos(3*y)}

        );

    end{axis}

end{tikzpicture}



end{document}

Output

share|improve this answer

answered Oct 25 '13 at 15:41

Tom BombadilTom Bombadil

35.1k8114172

add a comment | 

3

A function for the base is also possible.

documentclass[pstricks,border=12pt]{standalone}

usepackage{pst-solides3d}

begin{document}



psset{viewpoint=50 -20 40 rtp2xyz, Decran=50,linearc=0.2}

begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

linecolor=red,h=4,action=draw*]

end{pspicture}



begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

hollow,fillcolor=red!30,incolor=blue!30,

linecolor=red,h=4,action=draw**]%

end{pspicture}



end{document}

share|improve this answer

answered Oct 25 '13 at 18:02

HerbertHerbert

275k25418731

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Heart like base should be interesting.
  
  – kiss my armpit
  Oct 25 '13 at 18:40
  

  
  
  
  

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

Name

Email

Required, but never shown

StackExchange.ready(
function () {
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f140576%2fcylinder-with-non-circle-bottom-tikz%23new-answer', 'question_page');
}
);

Post as a guest

Name

Email

Required, but never shown

8

There are many ways to visualize such a cylinder in TeX world, here is one made by means of
extrude feature of the Asymptote using raster output.

% cyl.tex :

%

documentclass{article}

usepackage[inline]{asymptote}

usepackage{lmodern}

begin{document}

begin{figure}

begin{asy}

settings.outformat="png";

settings.tex="pdflatex";

settings.render=8;

size(5cm);

import graph3;

import fontsize;

defaultpen(fontsize(9pt));



currentprojection=orthographic(camera=(3,3,6),up=Z,target=O,zoom=1);



currentlight=light(gray(0.8),ambient=rgb(0.1,0.099,0.101),specular=gray(0.7),

                     specularfactor=3,viewport=true,dir(42,48));



pair[] ppair={(0,0),(1,-.5),(1.2,1.5),(0,1),(-.5,.5),(-.7,.2)};

real height=3;



guide gbase=graph(ppair, Spline)..cycle;



pen bpen=rgb(0.1, 0.1, 0.8)+opacity(0.5);

material m=material(diffusepen=0.7bpen

,ambientpen=bpen,emissivepen=0.3*bpen,specularpen=0.999white,shininess=1.0);



draw(rotate(-90,Y)*rotate(180,Z)*extrude(gbase,height*Z),m,render(merge=true));



xaxis3("$x$",-3.2,1.2,red  ,Arrow3);

yaxis3("$y$",  -2,2,green,Arrow3);

zaxis3("$z$",  -3,3,blue ,Arrow3);



end{asy}

end{figure}

end{document}

%

% Process:

%

% pdflatex cyl.tex    

% asy cyl-*.asy    

% pdflatex cyl.tex

share|improve this answer

answered Oct 25 '13 at 16:07

g.kovg.kov

17.4k13976

add a comment | 

8

There are many ways to visualize such a cylinder in TeX world, here is one made by means of
extrude feature of the Asymptote using raster output.

% cyl.tex :

%

documentclass{article}

usepackage[inline]{asymptote}

usepackage{lmodern}

begin{document}

begin{figure}

begin{asy}

settings.outformat="png";

settings.tex="pdflatex";

settings.render=8;

size(5cm);

import graph3;

import fontsize;

defaultpen(fontsize(9pt));



currentprojection=orthographic(camera=(3,3,6),up=Z,target=O,zoom=1);



currentlight=light(gray(0.8),ambient=rgb(0.1,0.099,0.101),specular=gray(0.7),

                     specularfactor=3,viewport=true,dir(42,48));



pair[] ppair={(0,0),(1,-.5),(1.2,1.5),(0,1),(-.5,.5),(-.7,.2)};

real height=3;



guide gbase=graph(ppair, Spline)..cycle;



pen bpen=rgb(0.1, 0.1, 0.8)+opacity(0.5);

material m=material(diffusepen=0.7bpen

,ambientpen=bpen,emissivepen=0.3*bpen,specularpen=0.999white,shininess=1.0);



draw(rotate(-90,Y)*rotate(180,Z)*extrude(gbase,height*Z),m,render(merge=true));



xaxis3("$x$",-3.2,1.2,red  ,Arrow3);

yaxis3("$y$",  -2,2,green,Arrow3);

zaxis3("$z$",  -3,3,blue ,Arrow3);



end{asy}

end{figure}

end{document}

%

% Process:

%

% pdflatex cyl.tex    

% asy cyl-*.asy    

% pdflatex cyl.tex

share|improve this answer

answered Oct 25 '13 at 16:07

g.kovg.kov

17.4k13976

add a comment | 

There are many ways to visualize such a cylinder in TeX world, here is one made by means of
extrude feature of the Asymptote using raster output.

% cyl.tex :

%

documentclass{article}

usepackage[inline]{asymptote}

usepackage{lmodern}

begin{document}

begin{figure}

begin{asy}

settings.outformat="png";

settings.tex="pdflatex";

settings.render=8;

size(5cm);

import graph3;

import fontsize;

defaultpen(fontsize(9pt));



currentprojection=orthographic(camera=(3,3,6),up=Z,target=O,zoom=1);



currentlight=light(gray(0.8),ambient=rgb(0.1,0.099,0.101),specular=gray(0.7),

                     specularfactor=3,viewport=true,dir(42,48));



pair[] ppair={(0,0),(1,-.5),(1.2,1.5),(0,1),(-.5,.5),(-.7,.2)};

real height=3;



guide gbase=graph(ppair, Spline)..cycle;



pen bpen=rgb(0.1, 0.1, 0.8)+opacity(0.5);

material m=material(diffusepen=0.7bpen

,ambientpen=bpen,emissivepen=0.3*bpen,specularpen=0.999white,shininess=1.0);



draw(rotate(-90,Y)*rotate(180,Z)*extrude(gbase,height*Z),m,render(merge=true));



xaxis3("$x$",-3.2,1.2,red  ,Arrow3);

yaxis3("$y$",  -2,2,green,Arrow3);

zaxis3("$z$",  -3,3,blue ,Arrow3);



end{asy}

end{figure}

end{document}

%

% Process:

%

% pdflatex cyl.tex    

% asy cyl-*.asy    

% pdflatex cyl.tex

share|improve this answer

answered Oct 25 '13 at 16:07

g.kovg.kov

17.4k13976

% cyl.tex :

%

documentclass{article}

usepackage[inline]{asymptote}

usepackage{lmodern}

begin{document}

begin{figure}

begin{asy}

settings.outformat="png";

settings.tex="pdflatex";

settings.render=8;

size(5cm);

import graph3;

import fontsize;

defaultpen(fontsize(9pt));



currentprojection=orthographic(camera=(3,3,6),up=Z,target=O,zoom=1);



currentlight=light(gray(0.8),ambient=rgb(0.1,0.099,0.101),specular=gray(0.7),

                     specularfactor=3,viewport=true,dir(42,48));



pair[] ppair={(0,0),(1,-.5),(1.2,1.5),(0,1),(-.5,.5),(-.7,.2)};

real height=3;



guide gbase=graph(ppair, Spline)..cycle;



pen bpen=rgb(0.1, 0.1, 0.8)+opacity(0.5);

material m=material(diffusepen=0.7bpen

,ambientpen=bpen,emissivepen=0.3*bpen,specularpen=0.999white,shininess=1.0);



draw(rotate(-90,Y)*rotate(180,Z)*extrude(gbase,height*Z),m,render(merge=true));



xaxis3("$x$",-3.2,1.2,red  ,Arrow3);

yaxis3("$y$",  -2,2,green,Arrow3);

zaxis3("$z$",  -3,3,blue ,Arrow3);



end{asy}

end{figure}

end{document}

%

% Process:

%

% pdflatex cyl.tex    

% asy cyl-*.asy    

% pdflatex cyl.tex

share|improve this answer

answered Oct 25 '13 at 16:07

g.kovg.kov

17.4k13976

answered Oct 25 '13 at 16:07

g.kovg.kov

17.4k13976

answered Oct 25 '13 at 16:07

g.kovg.kov

17.4k13976

6

It looks like you could use pgfplots for this, e.g.:

Code

documentclass[tikz,border=2mm]{standalone}

usepackage{pgfplots}

pgfplotsset{compat=1.8}



begin{document}



begin{tikzpicture}

    begin{axis}

    [ z buffer=sort,

    ]

        addplot3[domain=0:360,y domain=0:360,surf,shader=faceted,samples=40]

        ( {cos(y)+0.1*sin(7*y)},

            {x},

            {sin(y)+0.1*cos(3*y)}

        );

    end{axis}

end{tikzpicture}



end{document}

Output

share|improve this answer

answered Oct 25 '13 at 15:41

Tom BombadilTom Bombadil

35.1k8114172

add a comment | 

6

It looks like you could use pgfplots for this, e.g.:

Code

documentclass[tikz,border=2mm]{standalone}

usepackage{pgfplots}

pgfplotsset{compat=1.8}



begin{document}



begin{tikzpicture}

    begin{axis}

    [ z buffer=sort,

    ]

        addplot3[domain=0:360,y domain=0:360,surf,shader=faceted,samples=40]

        ( {cos(y)+0.1*sin(7*y)},

            {x},

            {sin(y)+0.1*cos(3*y)}

        );

    end{axis}

end{tikzpicture}



end{document}

Output

share|improve this answer

answered Oct 25 '13 at 15:41

Tom BombadilTom Bombadil

35.1k8114172

add a comment | 

It looks like you could use pgfplots for this, e.g.:

Code

documentclass[tikz,border=2mm]{standalone}

usepackage{pgfplots}

pgfplotsset{compat=1.8}



begin{document}



begin{tikzpicture}

    begin{axis}

    [ z buffer=sort,

    ]

        addplot3[domain=0:360,y domain=0:360,surf,shader=faceted,samples=40]

        ( {cos(y)+0.1*sin(7*y)},

            {x},

            {sin(y)+0.1*cos(3*y)}

        );

    end{axis}

end{tikzpicture}



end{document}

Output

share|improve this answer

answered Oct 25 '13 at 15:41

Tom BombadilTom Bombadil

35.1k8114172

documentclass[tikz,border=2mm]{standalone}

usepackage{pgfplots}

pgfplotsset{compat=1.8}



begin{document}



begin{tikzpicture}

    begin{axis}

    [ z buffer=sort,

    ]

        addplot3[domain=0:360,y domain=0:360,surf,shader=faceted,samples=40]

        ( {cos(y)+0.1*sin(7*y)},

            {x},

            {sin(y)+0.1*cos(3*y)}

        );

    end{axis}

end{tikzpicture}



end{document}

share|improve this answer

answered Oct 25 '13 at 15:41

Tom BombadilTom Bombadil

35.1k8114172

answered Oct 25 '13 at 15:41

Tom BombadilTom Bombadil

35.1k8114172

answered Oct 25 '13 at 15:41

Tom BombadilTom Bombadil

35.1k8114172

3

A function for the base is also possible.

documentclass[pstricks,border=12pt]{standalone}

usepackage{pst-solides3d}

begin{document}



psset{viewpoint=50 -20 40 rtp2xyz, Decran=50,linearc=0.2}

begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

linecolor=red,h=4,action=draw*]

end{pspicture}



begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

hollow,fillcolor=red!30,incolor=blue!30,

linecolor=red,h=4,action=draw**]%

end{pspicture}



end{document}

share|improve this answer

answered Oct 25 '13 at 18:02

HerbertHerbert

275k25418731

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Heart like base should be interesting.
  
  – kiss my armpit
  Oct 25 '13 at 18:40
  

  
  
  
  

add a comment | 

3

A function for the base is also possible.

documentclass[pstricks,border=12pt]{standalone}

usepackage{pst-solides3d}

begin{document}



psset{viewpoint=50 -20 40 rtp2xyz, Decran=50,linearc=0.2}

begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

linecolor=red,h=4,action=draw*]

end{pspicture}



begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

hollow,fillcolor=red!30,incolor=blue!30,

linecolor=red,h=4,action=draw**]%

end{pspicture}



end{document}

share|improve this answer

answered Oct 25 '13 at 18:02

HerbertHerbert

275k25418731

• 
  
  
  

  
  

  
  
  
  
  
  

  
  
  Heart like base should be interesting.
  
  – kiss my armpit
  Oct 25 '13 at 18:40
  

  
  
  
  

add a comment | 

A function for the base is also possible.

documentclass[pstricks,border=12pt]{standalone}

usepackage{pst-solides3d}

begin{document}



psset{viewpoint=50 -20 40 rtp2xyz, Decran=50,linearc=0.2}

begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

linecolor=red,h=4,action=draw*]

end{pspicture}



begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

hollow,fillcolor=red!30,incolor=blue!30,

linecolor=red,h=4,action=draw**]%

end{pspicture}



end{document}

share|improve this answer

answered Oct 25 '13 at 18:02

HerbertHerbert

275k25418731

documentclass[pstricks,border=12pt]{standalone}

usepackage{pst-solides3d}

begin{document}



psset{viewpoint=50 -20 40 rtp2xyz, Decran=50,linearc=0.2}

begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

linecolor=red,h=4,action=draw*]

end{pspicture}



begin{pspicture}(-1,-1)(4,4)

psSolid[object=prisme,axe=0 0.5 1,

base= 0 0 1 -.5 1.2 1.5 0 1 -.5 .5 -.7 .2 ,

hollow,fillcolor=red!30,incolor=blue!30,

linecolor=red,h=4,action=draw**]%

end{pspicture}



end{document}

share|improve this answer

answered Oct 25 '13 at 18:02

HerbertHerbert

275k25418731

answered Oct 25 '13 at 18:02

HerbertHerbert

275k25418731

answered Oct 25 '13 at 18:02

HerbertHerbert

275k25418731