User Portlet
| Discussions |
|---|
| ![enter image description here][1] [1]: http://community.wolfram.com//c/portal/getImageAttachment?filename=4047an01.png&userId=447019 |
| Needs["DifferentialEquations`InterpolatingFunctionAnatomy`"] Needs["NDSolve`FEM`"] Needs["NumericalCalculus`"] length = 50; height = 5; \[CapitalOmega] = ImplicitRegion[True, {{x, 0, length}, {y, 0, height}}]; ... |
| The answer was in the 3D+2D graph. |
| ![enter image description here][1] [1]: http://community.wolfram.com//c/portal/getImageAttachment?filename=1812de01.png&userId=447019 |
| Manipulate[PolarPlot[(10 Log[d^(-1 - 2 n) (\[Pi]/2)^(-1 - 2 n) Abs[Sin[\[Theta]]]^(-1 - 2 n) BesselJ[1/2 + n, d \[Pi] Abs[Sin[\[Theta]]]]^2 Gamma[ 3/2 + n]^2])/Log[10], {\[Theta], 0, 2 \[Pi]}], {d, -8, 8}, {n, -8, 8}] ![enter image... |
| [http://demonstrations.wolfram.com/KnotPatternSimilarToALotusKolam/][1] ![enter image description here][2] [1]: http://demonstrations.wolfram.com/KnotPatternSimilarToALotusKolam/ [2]:... |
| boundary differential equation ? |
| ![enter image description here][1] [1]: http://community.wolfram.com//c/portal/getImageAttachment?filename=an01.png&userId=447019 |
| Graphics3D[{Ball[{-1, -1, -1}], Ball[{1, 2, 3}, 2]}] To center 2 balls, that is the way it is. |
| ![enter image description here][1] [1]: http://community.wolfram.com//c/portal/getImageAttachment?filename=9218hyper03.png&userId=447019 |