       Re: How can a sub picture be resized with a Row?

• To: mathgroup at smc.vnet.net
• Subject: [mg129122] Re: How can a sub picture be resized with a Row?
• From: Bob Hanlon <hanlonr357 at gmail.com>
• Date: Mon, 17 Dec 2012 02:54:09 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-newout@smc.vnet.net
• Delivered-to: mathgroup-newsend@smc.vnet.net
• References: <20121216060609.9AA9368DA@smc.vnet.net>

```It would also make more sense to use Column rather than Row and to
post an executable form of the TransferFunctionModel

Manipulate[
Column[{
NicholsPlot[
TransferFunctionModel[(k/(s (s^2 + s + 1))), s],
Mesh -> {{0.45, 0.72, 0.9, 1.0, 1.2}},
MeshStyle -> Directive[PointSize[Large], Red],
PlotRange -> {{-210, -60}, {-24, 18}},
NicholsGridLines -> Automatic,
Frame -> True,
StabilityMargins -> True,
StabilityMarginsStyle -> {Blue, Blue},
ImageSize -> {600, 400}],
BodePlot[
TransferFunctionModel[(k/(s (s^2 + s + 1))), s],
StabilityMargins -> True,
StabilityMarginsStyle -> Red,
GridLines -> Automatic,
PlotLabel -> {"Magnitude", "Phase"},
AxesLabel -> {{"j\[Omega]", "dB"}, {"j\[Omega]", "dB"}},
ImageSize -> {400, 400}
(* or use ImageSize -> {{400, 245}, {400, 245}} *)]}],
{{k, 0.64}, 0, 10, Appearance -> "Labeled"}]

Bob Hanlon

On Sun, Dec 16, 2012 at 5:06 AM, Eduardo M. A. M. Mendes
<emammendes at gmail.com> wrote:
> Hello
>
> I found my mistake.  ImageSize->{400,200}.
>
> Many thanks
>
> Ed
> On Dec 16, 2012, at 4:06 AM, Eduardo MAM Mendes <emammendes at me.com> =
> wrote:
>
>> Hello
>>
>> In the following example the phase plot is smaller when compared to =
> the magnitude plot.   I have tried =
> {ImageSize->{400,200},ImageSize->{400,200}} as argument but it did not =
> work.   How can the two pictures showed at the same size?
>>
>> Manipulate[Row[{NicholsPlot[Subsuperscript[(k/(s (s^2+s+1))
>>
>> ), , =
> \[ScriptCapitalT]],Mesh->{{0.45,0.72,0.9,1.0,1.2}},MeshStyle->Directive[Po=
> intSize[Large],Red],PlotRange->{{-210,-60},{-24,18}},NicholsGridLines->Aut=
> omatic,Frame->True,StabilityMargins->True,StabilityMarginsStyle->{Blue,Blu=
> e},ImageSize->{600,400}],BodePlot[Subsuperscript[(k/(s (s^2+s+1))
>>
>> ), , \[ScriptCapitalT]],StabilityMargins->True,StabilityMarginsStyle =
> ->Red,GridLines->Automatic,PlotLabel->{"Magnitude","Phase" =
> },AxesLabel->{{"j\[Omega]","dB"},{"j\[Omega]","dB"}},ImageSize->{400,200}]=
> }],{{k,0.64},0,10,Appearance->"Labeled"}]
>>
>> Many thanks
>>
>> Ed

```

• Prev by Date: Re: Mathematica 9 does not read mathematica 8 ".mx" files
• Next by Date: Re: Do Plot
• Previous by thread: Re: How can a sub picture be resized with a Row?
• Next by thread: Re: Clustering algorithm Mathematica 7