NDSolve and error

*To*: mathgroup at smc.vnet.net*Subject*: [mg92545] NDSolve and error*From*: dodatki at poczta.fm*Date*: Sat, 4 Oct 2008 06:16:52 -0400 (EDT)

Hello! Lately I wrote simple code in Mathematica sol[p_] := NDSolve[{Sqrt[ 1 + (y'[t])^2] == (x^(p - 1) + (y[x])^(p - 1)*y'[x])/(x^p + y[x]^p)^(1 - 1/p), y[1] == 6}, y, {x, 1, 4}] but when I typed sol[2] the following kind of error was shown: NDSolve::"ndnum": "Encountered non-numerical value for a derivative at \ \!\(x\) == \!\(4.587812868332132`*^-296\)." May I know what I'm doing wrong? Or how can I improve that code to work correctly? Thank you in advance John