Message Boards Message Boards

Colored 3D Tube

Steffen Muehle
Posted 10 years ago

Hello everyone,

I'm working on a model in which a polymer is both bent and twisted. I want to visualize the results of my simulation using a tube plot:

enter image description here

Manipulate[
 Graphics3D[Tube[solution[[t]]], 
  PlotRange -> {{-1, 1}, {-1, 1}, {-1, 1}}, ImageSize -> 1000],
 {t, 1, Length[solution] - 1, 1}]

..where 'solution' is a list of points in R^3. My idea for visualization of the tube's twist density is to color the tube accordingly. So, given a scalar function on [0,1], I want to map its values to a color and paint the tube with it, meaning e.q. red means a high twist density.

(Alternatively, I could think of painting a grid on the tube which twists around the tangent direction, but I imagine this for more difficult.)

My problem is now that I have no idea how to paint the tube arbitrarily, since afaik 'VertexColor' allows only for linear interpolations between the tube's ends.

Thank you, Steffen
POSTED BY: Steffen Muehle
1 Reply
Sort By:

Perhaps this can help:

ParametricPlot3D[{Cos[2 t], Sin[2 t], Cos[t]}, {t, 0, 2 Pi},   PlotRange -> All, 
  PlotStyle -> Directive[Opacity[0.7], CapForm[None], JoinForm["Miter"], Red], 
  ColorFunction -> Function[{x, y, z, u}, ColorData["Rainbow"][Sin[x^2 + z - u]]], 
  Boxed -> False, MaxRecursion -> 0, PlotPoints -> 100, Axes -> None, 
  Method -> {"TubePoints" -> 30}] /. Line[pts_, rest___] :> Tube[pts, 0.2, rest]

enter image description here
POSTED BY: Vitaliy Kaurov
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Tag limit exceeded
Note: Only the first five people you tag will receive an email notification; the other tagged names will appear as links to their profiles.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract