2
$\begingroup$

Stan Wagon's Third Edition of Mathematica in Action has this code on page 30:

Manipulate[
  Plot[Sin[x], {x, 0, Pi},
    Method -> {Refinement -> {ControlValue -> (90 - n °)}},
    Mesh -> All,
    MeshStyle -> {Red, PointSize[Large]},
    PlotPoints -> 8],
  {n, 0, 90, 2}]

It does not work. Are Refinement and ControlValue options of the past for Mathematica?

Is there a workaround for this code?

The Cure

Manipulate[
 Plot[Sin[x], {x, 0, Pi},
  Method -> {Refinement -> {ControlValue -> (90 - n) \[Degree]}},
  Mesh -> All,
  MeshStyle -> {Red, PointSize[Large]},
  PlotPoints -> 8],
 {n, 0, 90, 2}
 ]

Folks are correct, the degree symbol was misplaced. However, my real question here is why do Refinement and ControlValue have blue rather than black coloring in my notebook, and why can I not find them in the documentation?

$\endgroup$
4
$\begingroup$

David, replace

Method -> {Refinement -> {ControlValue -> (90 - n °)}} 

with

Method -> {Refinement -> {ControlValue -> (90 - n) °}}`
$\endgroup$
  • $\begingroup$ More detail would be helpful $\endgroup$ – bbgodfrey Jul 25 '15 at 20:41
  • $\begingroup$ @bbgodfrey Misplaced parenthesis in OP's code. See my comment above. $\endgroup$ – Sjoerd C. de Vries Jul 25 '15 at 22:11
  • $\begingroup$ @Willinski . Yes, that is definitely a mistake, but my real question here is why do Refinement and ControlValue remain in blue, and why can I not find them in the documentation? $\endgroup$ – David Jul 26 '15 at 0:53
  • $\begingroup$ @David, MaxBend used to be documented, but stopped being documented since version 6 IIRC. $\endgroup$ – J. M. is in limbo Jul 26 '15 at 1:14

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