# Search Results

Results tagged with Search options user 18476
38 results

Questions on the Manipulate function of Mathematica, a function that allows the interactive manipulation of certain parameters in a Mathematica expression.

Update: Based on your updated question I guess you want something like Manipulate[{a, b}, {a, 1, 10}, {b, 1, 10}, Button["export", Export[SystemDialogInput["FileSave",".txt"], {{"a", a}, {"b", b … of a Button to get the intended scoping Manipulate[Plot[Sin[x (1 + a*x)], {x, 0, 6}], {a, 0, 100}, Dynamic@Setter[Dynamic@a, ToExpression["a=90"], "a=90"]] One can make the Setter looker like a Button by adding the option Appearance -> "Button". …
answered Jun 25 '15 by Karsten 7.
This issue is due to the fact, that the stand alone CDF Player is still in version 9. Opening the cdf file in a browser with a Mathematica 10 plugin installed works without any problem. Also creating …
answered Sep 19 '14 by Karsten 7.
The Problem The Manipulate and the first Plot of your code don't work because you use a combination of SetDelayed (:=) and ReplaceAll (/.) that doesn't behave like you expected. When you define …
answered Dec 4 '14 by Karsten 7.
One can make c and a stepsize with an If statement interdependent controls of the Manipulate without showing stepsize. However, this only works after making the If statement Dynamic. f[x_ … ] = Piecewise[{{-x, x < 0}, {x^2, x >= 0}}]; g[x_] = Piecewise[{{-1, x < 0}, {2 x, x > 0}}]; Manipulate[ Plot[{f[x], f[c] + g[c] (x - c)}, {x, -3, 3}, Epilog -> Point[{c, f[c]}]], {{stepsize, Dynamic@If[c < 0, .2, .01]}, None}, {c, -2, 2, stepsize, ControlType -> Slider, Appearance -> "Labeled"}] …
answered Jun 29 '15 by Karsten 7.
You could use Manipulate[If[m > n, m = n]; Row[{"(", Column[{n, m}, Center], ") = ", Binomial[n, m]}], {n, 1, 10, 1, Setter}, {{m, 1}, Range[1, n, 1], SetterBar}] To me it seems to be just a … limitation to what kind of input syntax Manipulate is able to interpret correctly. Your {m, 1, n, 1, Setter} is correctly transformed into a SetterBar with a Range, but due to the interconnection n …
answered Jul 18 '15 by Karsten 7.
Manipulate[ r; RandomVariate[BernoulliDistribution[p], 10], {p, 0, 1}, {{r, True}, None}, Button["refresh", r = ! r]] …
answered Aug 28 '16 by Karsten 7.
The option for a Manipulate control, that mimics the functionality of the second argument to Dynamic is TrackingFunction. f[x_] := Sin[x] Manipulate[ Column[{Show[Plot[f[x], {x, 0, 2 Pi}, Axes … -> False, Frame -> True]], p}], {{p, {0, 0}}, Locator, TrackingFunction -> (p = {First@#, f@First@#}; &)}] Using only Manipulate and no Dynamic f[x_] := Sin[x] Manipulate[ Show[Plot[f[x …
answered Jul 3 '15 by Karsten 7.
In your current code the resetting of t is driven by the Control object events. The same Manipulate behavior can be achieved by using a table-driven state model instead of such an event driven model … : Manipulate[ If[{tab1, tab2, x} === {tab1O, tab2O, xO}, t, {tab1O, tab2O, xO} = {tab1, tab2, x}; t = 0], {{tab1, 1, ""}, {1, 2, 3}}, {{tab2, 1, ""}, {"A", "B"}, RadioButton}, {{x, 0}, 0, 10, 1 …
answered Dec 11 '16 by Karsten 7.
replace a with a is an alternative Manipulate[Plot[a Sin[x], {x, -Pi, Pi}], {a, -1, 1}, FrameLabel -> (TraditionalForm[y == a Sin[x]] /. a -> ToString[a, TraditionalForm])] This approach … also works in usage scenarios like Table[ With[{expr = expr}, Manipulate[Plot[expr, {x, -Pi, Pi}], {a, -1, 1}, FrameLabel -> (TraditionalForm[expr] /. a -> ToString[a, TraditionalForm …
answered Aug 23 '16 by Karsten 7.
Manipulate[i, {i, 1, 100, 1, Style[Row[Setter[Dynamic[i], #] & /@ Range @@ #2], LineIndent -> 0] &}] …
answered Aug 19 '16 by Karsten 7.
I think it is a bug that Manipulate fails to interpret the input correctly if the parameter range contains at least one entry that is NumericQ but not NumberQ. In such a situation the default … the following code this workaround is used to fix the behavior of the first Manipulator. Manipulate[ Column[{{a, b, c, d}, {lasta, lastb, lastc, lastd}}], {a, 0, Pi, Manipulator[Dynamic[#, {lasta …
answered Dec 10 '15 by Karsten 7.
Manipulate[ Plot[{Sin[a x + b], Sin[lasta x + lastb]}, {x, -2 Pi, 2 Pi}, PlotLabel -> Style["ai =" <> ToString[a] <> ", bi =" <> ToString[b] <> "\n a(i-1) =" <> ToString[lasta] <> ", b …
answered Dec 9 '15 by Karsten 7.
checkboxToList[rows_] := DynamicModule[{cbb}, cbb = ConstantArray[{0}, rows]; Panel@Column[{ Column[ Table[ With[{pos = alfa + 1}, CheckboxBar[Dynamic[cbb[[pos]]], Range …
answered Sep 19 '16 by Karsten 7.
Using the same logic as Edmund in his answer. Manipulate[ Row[{ LocatorPane[ Dynamic[point], Plot[x, {x, 0, end}, ImageSize -> 400]], "This value should change ONLY when the Locator …
answered May 26 '16 by Karsten 7.
ControlActive doesn't respond to SetterBar, as changing a value using SetterBar doesn't make \$ControlActiveSetting being True. Here is one way to make using the SetterBar reset k: Manipulate
answered Aug 6 '15 by Karsten 7.

15 30 50 per page