User Portlet
| Discussions |
|---|
| Comparison between the derivatives of the symbolic function and the interpolated function: ex = Cos[x]; d = Interpolation[Table[ex, {x, 0 \[Degree], 360 \[Degree], 1 \[Degree]}], InterpolationOrder -> 6]; Plot[{d[t], d'[t]}, {t,... |
| Hello, ex = (2*u1 + Sqrt[u2^2 - u3^2])/(u1 - u2 - u3); How do I collect the Strings u1,u2 and u3, from the expression above, in the form of a list? {u1, u2, u3} How to convert this list to the following form: {Subscript[u,... |
| In a physics problem, I came across the following triple integral: exp = (r Sin[\[Alpha]] (Cos[\[Theta]] Cos[\[Phi]] Sin[\[Alpha]] - Cos[\[Alpha]] Sin[\[Theta]]))/( 4 (-2 + Sqrt[2]) \[Pi]^2 (p^2 + r^2 - 2 p r... |
| I use the procedure below to determine the points of intersection between two tables, but it takes a long time. Does anyone know a procedure that accomplishes this task more quickly? Grateful, Sinval ta5 = Table[s5, {y, 0, \[Pi],... |
| &[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/550b770d-3c2f-41ae-9557-2704601a5e5a |
| I have the following set with two associations: set = {F1[ 1, {16, 15, 14} -> 1, {17, 18, 20} -> 2, {20, 19, 18} -> 2|>], F2[ 3, {10, 4, 2, 8} -> 4, {5, 1, 3, 4} -> 1, {10, 11, 7, 9} -> 5, {5, 11, 7, 1}... |
| Hello, People!!! I created a bar that is docked in the Notebook. I would like to insert this bar in a Stylesheet created by me, so that all notebooks created would load this bar automatically. I created the bar for the current notebook using the... |
| &[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/5bdab37f-b285-413d-a85c-e46d10573310 |
| Is it possible to change the number of 3D face markers? I would like to put a different number on each face. Attached is a notebook. Regards, Sinval &[Wolfram Notebook][1] [1]:... |
| I'm trying to convert a ParametricPlot3D into a MeshRegion, but the result isn't perfect. Attached is a notebook. I'm grateful for any help. Sinval &[Wolfram Notebook][1] [1]:... |