Hello everyone. I'm looking for something like this: https://resources.wolframcloud.com/FunctionRepository/resources/TranslationSurface but for 2D.
Does it exist?
Thanks for any help.
If you prefer to not think yourself why don't you try to use the elegant 3D stuff, but confining your curves to, say, the x-y-plane?
Ok. I have a stone-age-old version of Mathematica, and I am afraid the 3D procedure won't run on my system. What is returned by the 3D function? If these were 3D vectors (look at the output ), you might get 2 D vectors by
vecs3D = Flatten[ Table[{i, j, 0}, {i, 1, 3}, {j, 1, 3}], 1] Drop[#, -1] & /@ vecs3D
Yes, exactly what I was looking for!
Thanks a lot!
The output is similar to what I'm looking for, but the 3D function is way more elegant, and I hope a similar solution exists for 2D too.
Do you mean something like this?
c1[v_] := {v, v^2} c2[u_] := {2 + Sin[u], u} f[u_, v_] := c1[v] - c2[0] + c2[u] p1 = ParametricPlot[{c1[t], c2[t]}, {t, 0, 2}] p2 = ParametricPlot[{c1[t], f[t, .5], f[t, 1], f[t, 1.5]}, {t, 0, 2}]
