Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Beginning syntax problems

  • To: mathgroup at smc.vnet.net
  • Subject: [mg104582] Re: [mg104538] Beginning syntax problems
  • From: Tomas Garza <tgarza10 at msn.com>
  • Date: Wed, 4 Nov 2009 01:36:58 -0500 (EST)
  • References: <200911030755.CAA01540@smc.vnet.net>

Perhaps the following (slightly simpler) code will help:

Manipulate[Row[{Panel@Graphics[{Line[{{-4,-4 m+b},{4,4 m+b}}],{Dashing[{0.005,0.005}],Line[{{1,0},{1,m+b},{0,m+b}}]}},Axes->True,AxesLabel->{x,"y=mx+b"},PlotRange->{{-5,5},{-5,5}}],Grid[Prepend[Table[{x,PaddedForm[m x+b,{3,1}]},{x,-5,5}],{"x","y"}],Frame->All,Alignment->Right]}],{{m,2},-2,2,Appearance->"Labeled"},{{b,1},2,-2,Appearance->"Labeled"}]

Tomas

> Date: Tue, 3 Nov 2009 02:55:53 -0500
> From: mgreene at csumb.edu
> Subject: [mg104538] Beginning syntax problems
> To: mathgroup at smc.vnet.net
>
> I'm coaching a middle school Mathcounts program and am attempting to use
> Mathematica to illustrate some simple ideas.  I've created the following
> script to illustrate slope and intercept.
>
> Grid[{{Manipulate[
>     Graphics[{{Dotted, Line[{{1, 0}, {1, m + b}}]}, {Dotted,
>        Line[{{0, m + b}, {1, m + b}}]},
>       Annotation[Line[t = {Table[{x, m*x + b}, {x, -5, 5}]}], "Line",
>        "Mouse"]
>       }, Axes -> True, AxesLabel -> {x, "y=mx+b"},
>      PlotRange -> {{-5, 5}, {-5, 5}}], {b, 2, -2, -.5,
>      ControlType -> None},
>     Row[{"m",
>       Manipulator[Dynamic[m], {2, -2, -.5}, Appearance -> "Labeled",
>        ImageSize -> Small], "b",
>       Manipulator[Dynamic[b], {2, -2, -.5}, Appearance -> "Labeled",
>        ImageSize -> Small]}]],
>    Grid[{"x", "y",
>      Grid[Table[{x,  Dynamic[m]*x + 2}, {x, -5, 5}],
>       Frame -> {All, False}]}]}}]
>
> My problems with the script are twofold. First, I can't get the table on the
> right side to dynamically update its values as I adjust the slope and
> intercept. The second problem is I'm having a heck of a time placing labels
> on top of their respective columns in the same table. I'm just trying to put
> an x and a y above the two table columns but can't figure out the correct
> Mathematica syntax to make it happen.
>
> Can anyone correct the above script so it exhibits those two features?
>
> Thanks,
>
> Michael green
>
>
 		 	   		  


  • Prev by Date: Re: Re: Wrong Simplify[] Answer for
  • Next by Date: Re: Beginning syntax problems
  • Previous by thread: Re: Beginning syntax problems
  • Next by thread: Re: Beginning syntax problems