User Portlet User Portlet

Discussions
I have made a slight modification to your code to make it work, but I still get the error output. solveEquations3[a_, varCount_] := Module[ {x, vars} , vars = Table[x[i], {i, 0, varCount}]; Values[ FindRoot[...
I am trying to find a numerical solution for a system of nonlinear equations involving forced oscillations. Below are the simplified equations I am trying to solve and the results from NDSolve with certain initial values. Note that some more...
I have encountered a problem with Limit function. ![enter image description here][1] As you can see from the graph, this function is finite in x->+0. However, Table[ Limit[ FullSimplify[D[BesselI[2, 1/x]/BesselI[1, 1/x],...