Date: Dec 7, 2012 1:37 AM
Author: Bob Hanlon
Subject: Re: M9. Error messages when assign ContourPlot graphic to variable

$Version

"9.0 for Mac OS X x86 (64-bit) (November 20, 2012)"

pf[a_, b_] = ParametricNDSolveValue[
{y''[x] == -a y[x], y[0] == a, y'[0] == b},
y, {x, 0, 20}, {a, b}][a, b];

ContourPlot[pf[a, b][5] == 0,
{a, 0, 5}, {b, 0, 5},
ContourStyle -> {Red, Thick}]

ContourPlot[pf[a, b][5],
{a, 0, 5}, {b, 0, 5},
ContourStyle -> {Automatic, Automatic,
{Red, Thick}, Automatic, Automatic}]

cp = ContourPlot[pf[a, b][5],
{a, 0, 5}, {b, 0, 5}];

Manipulate[
Show[
cp,
ContourPlot[
pf[a, b][5] == value,
{a, 0, 5}, {b, 0, 5},
ContourStyle -> Red]],
{{value, 0, "Value"}, Range[-4, 8, 2]}]


Bob Hanlon


On Thu, Dec 6, 2012 at 4:59 AM, Grischika <Grischika@mail.ru> wrote:
> Running this code
> pf = ParametricNDSolveValue[{y''[x] == -a y[x], y[0] == a,
> y'[0] == b}, y, {x, 0, 20}, {a, b}];
> ContourPlot[{pf[a, b][5] == 0}, {a, 0, 5}, {b, 0, 5}]
>
> then copy and past this image to input cell. Execute the cell. The following message appears:
>
> ParametricFunction::argrx: ParametricFunction called with 0 arguments; 6 arguments are expected. >>
>
> Windows XP 32 bit
> Mathematica 9.0.0
>
> Grigory
>