I'd like to draw a sinusoidal tube with an arrowhead. The piece that is connected to the arrowhead must be a straight tube, but the rest must be sinusoidal tube (for example, from $0$ to $6\pi$ a sinusoidal tube and from $6\pi$ to $7$ a straight tube + arrowhead). I have no idea how to modify the following code to include a sinusoidal part.
Graphics3D[{Red, Arrowheads[0.1],
Arrow[Tube[{{0, 0, 0}, {4, 0, 0}}, 0.09]]}, Boxed -> False]