1
$\begingroup$

I'm trying to plot a Catalan surface with the following code, but nothing happens, it runs but does not display my image. is there anyone who knows what I need to change in the code? Thank you!

catalan[a_][u_,v_]:={a(u-Sin[u]Cosh[v]), a{1-Cos[u]Cosh[v]},-4a Sin[u/2]Sinh[v/2]}
ParametricPlot3D[Evaluate[Append[catalan[1][u,v], FaceForm[Blue,Green]]], {u,0,4*Pi},{v,-2,2}, PlotPoints->{45,20}];
$\endgroup$
1

1 Answer 1

5
$\begingroup$

Don't use {,} as brackets in the definition of catalan:

Try ( I changed Append part to PlotStyle->...)

catalan[a_][u_, v_] := {a (u - Sin[u] Cosh[v]), 
  a (1 - Cos[u] Cosh[v]), -4 a Sin[u/2] Sinh[v/2]}
ParametricPlot3D[
  Evaluate[ catalan[1][u, v]], {u, 0, 
   4*Pi}, {v, -2, 2}, PlotPoints -> {45, 20}, PlotStyle -> FaceForm[Blue, Green]] 

enter image description here

Hope that's what you're looking for!

$\endgroup$
9
  • $\begingroup$ It's still not working, but thanks for the intention. $\endgroup$
    – user981656
    Commented Jun 9, 2022 at 11:12
  • $\begingroup$ @user981656 Without Apppend it works fine! $\endgroup$ Commented Jun 9, 2022 at 11:13
  • $\begingroup$ hello, yes, this is exactly the surface I'm trying to plot, I don't know why it still doesn't work for me, is it possible to plot the image without the Box (Boxed->False) once again if it's not too much trouble? Thank you very much for your help! $\endgroup$
    – user981656
    Commented Jun 9, 2022 at 11:38
  • $\begingroup$ @user981656 Did you try to evaluate my code in a fresh kernel? $\endgroup$ Commented Jun 9, 2022 at 11:40
  • $\begingroup$ @user981656 ...and add the plot options Boxed->False,Axes->False to plot without box $\endgroup$ Commented Jun 9, 2022 at 11:42

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge you have read our privacy policy.

Not the answer you're looking for? Browse other questions tagged or ask your own question.