Take the 2-minute tour ×
Mathematica Stack Exchange is a question and answer site for users of Mathematica. It's 100% free, no registration required.

I just started using Mathematica, and when I entered the following:

Manipulate[
  ContourPlot[x^4 + y^4 + 2*x^2*y^2 - x^2 + y^2 == n, {x, -5, 5}, {y, -5,5}], 
  {n, -.2, 3}]

I got the Plot that I wanted, but it's incredibly small. Is there a way to make it larger?

share|improve this question

2 Answers 2

up vote 1 down vote accepted

It depends on what you mean by size. PlotRange will "zoom", ImageSize produces larger graphic.

For illustration:

Manipulate[
 ContourPlot[
  x^4 + y^4 + 2*x^2*y^2 - x^2 + y^2 == n, {x, -r, r}, {y, -r, r}, 
  ImageSize -> imagesize], {n, -.2, 3}, {r, Range[2, 5]}, {imagesize, 
  Range[200, 500, 100]}]

enter image description here

share|improve this answer

PlotRange is the answer:

Manipulate[
 ContourPlot[
  x^4 + y^4 + 2*x^2*y^2 - x^2 + y^2 == n, {x, -5, 5}, {y, -5, 5}, 
  PlotRange -> {{-1.2, 1.2}, {-1.2, 1.2}}
  ], {n, -.2, 3}]

Try also

PlotRange -> All

and

PlotRange -> Automatic

EDIT: You can also do kind of a zoom with Manipulate[]

Manipulate[
 ContourPlot[
  x^4 + y^4 + 2*x^2*y^2 - x^2 + y^2 == n, {x, -5, 5}, {y, -5, 5},
  PlotRange -> {{-xRange, xRange}, {-xRange, xRange}}]
 , {n, -.2, 3}, {xRange, .5, 5}]

enter image description here

share|improve this answer

Your Answer

 
discard

By posting your answer, you agree to the privacy policy and terms of service.

Not the answer you're looking for? Browse other questions tagged or ask your own question.