Mathematica does have some extra abilities in 3D graphics compared
with Sage. We do have the infrastructure in place to catch up though,
I hope to help with things like this soon.
I think for your example Sage isn't handling the multiple roots
properly; I'm not sure how to really fix that but I did do the
following and got closer:
u, v = var('u,v')
assume(u>0)
p15 = sum([parametric_plot3d((u*cos(v),u*sin(v),imaginary(u^(1/5.0)*exp
(I*v+q*2*I*pi/5))), (u,0,2), (v,0,2*pi), opacity = .5, rgbcolor =
(0,1,0), frame = False) for q in range(5)])
show(p15)
which I think is pretty close to the mathematica plot except it
includes the entire surface by default.
Hope that helps,
M. Hampton
On Dec 2, 7:20 pm, acardh <[EMAIL PROTECTED]> wrote:
> Hi,
>
> I am not sure why I am not getting the same 3D image than the one at
> the bottom of the next
> page:http://reference.wolfram.com/mathematica/ref/ParametricPlot3D.html
>
> I am using these commands:
> u, v = var('u,v')
> parametric_plot3d((u*cos(v),u*sin(v),imaginary(u*exp((I*v)^5)^(1/5))),
> (u,0,2), (v,0,2*pi))
--~--~---------~--~----~------------~-------~--~----~
To post to this group, send email to sage-support@googlegroups.com
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/sage-support
URLs: http://www.sagemath.org
-~----------~----~----~----~------~----~------~--~---
