403248_ko-KR

liliconcom

두 가지 다른 유형의 그래프를 수평으로 저널에 병합하려면 어떻게 해야 합니까?

 

////////////////////////////////////////Makes 'N' overlay plots. One each for each "Parameter Name"////////////////////////////////////////////////////////

overlayplot = table1 << Overlay Plot(
    X( :column1 ),
    Y( :Name( "Mean(Parameter Value)" ) ),
    Grouping( :GROUP ),
    SendToByGroup(
        {:Parameter Name == Eval( :Parameter Name )},
        Overlay Groups,
        Connect Thru Missing( 1 ),
        Connect Points( 1 ),
        :Name( "Mean(Parameter Value)" )(Overlay Marker( 8 ), Line Width( "Thick" ))
    ),
    By( :Parameter Name ),

);

 

////////////////////////////////////////Makes 'N' Oneway plots. One each for each "Parameter Name"////////////////////////////////////////////////////////

ttest_plot = table1 << Oneway(
    Y( :Name( "Mean(Parameter Value)" ) ),
    X( :GROUP ),
    Plot Quantile by Actual( 1 ),
    Line of Fit( 0 ),
    Box Plots( 1 ),
    Mean Diamonds( 0 ),
    X Axis Proportional( 0 ),
    Points Jittered( 1 ),
    SendToReport(
        Dispatch(
            {},
            "Oneway Plot",
            FrameBox,
            {DispatchSeg(
                Box Plot Seg( 1 ),
                {Box Type( "Outlier" ), Confidence Diamond( 0 ),
                Shortest Half Bracket( 0 ), Line Color( "Red" )}
            ), DispatchSeg(
                Box Plot Seg( 2 ),
                {Box Type( "Outlier" ), Confidence Diamond( 0 ),
                Shortest Half Bracket( 0 ), Line Color( "Red" )}
            )}
        )
    ),
    By( :Parameter Name )
);

 

 

위의 코드는 내 데이터에서 동일한 수의 오버레이 및 단방향 플롯을 만듭니다. 84개의 고유한 "매개변수 이름"이 있으므로 84개의 오버레이 플롯과 84개의 단방향 플롯을 얻습니다.

 

각 매개 변수에 대해 오버레이 플롯 바로 옆에 단방향 플롯을 얻은 다음 수직으로 후속 플롯을 얻을 수 있도록 저널에 결합하려고합니다.

 

어떻게 할 수 있습니까?

 

이것은 내가 필요한 출력입니다

 

 

이것은 내가 얻는 출력입니다

 

@txnelson #JMP

제도법스크립팅Re: 두 가지 다른 유형의 그래프를 수평으로 저널에 병합하려면 어떻게 합니까?

H 목록 상자를 사용하여 나란히 설정할 수 있지만 다른 보고서의 크기 조정과 관련된 몇 가지 문제가 발생할 가능성이 높으며 이를 어떻게든 처리해야 합니다. 다음은 이 작업을 수행하는 방법에 대한 아이디어를 제공할 수 있는 두 가지 옵션이 있는 예제입니다(저는 실제로 저널을 사용하지 않았기 때문에 예제의 일부가 약간 나쁠 수 있음).

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");

/*with by*/
graph1 = Expr(dt << Oneway(Y(:height), X(:age), By(:sex)));
graph2 = Expr(dt << Graph Builder(
 Show Control Panel(0),
 Show Legend(0),
 Variables(X(Transform Column("Row", Formula(Row()))), Y(:height), Group Y(:age)),
 Elements(Points(X, Y, Legend(1))),
 By(:sex)
));
nw = new window("",
 h list box(
  vlistbox(graph1),
  vlistbox(graph2)
 )
);
nw << journal window;
nw << close window;
stop();

/* without by*/
graph1 = Expr(dtTemp << Oneway(Y(:height), X(:age)));
graph2 = Expr(dtTemp << Graph Builder(
 Show Control Panel(0),
 Show Legend(0),
 Variables(X(Transform Column("Row", Formula(Row()))), Y(:height), Group Y(:age)),
 Elements(Points(X, Y, Legend(1)))
));
nw = new window("",
 vlb = v list box();
);

nw << Journal Window;
nw << close window;
byVals = Associative Array(dt:sex) << get keys;

For(i = 1, i <= N Items(byVals), i++,
 dt << Select Where(:sex == byVals[i]);
 dtTemp = dt << Subset(Selected Rows, all columns);
 hlb = V List Box(
  TextBox(byVals[i]),
  Lineup box(N Col(2),
   graph1,
   graph2
  )
 );
 hlb << Journal;
 Close(dtTemp, no save);
);

 

Re: 두 가지 다른 유형의 그래프를 수평으로 저널에 병합하려면 어떻게 합니까?

다음은 스크립트에 대한 좋은 시작을 제공할 것으로 생각되는 스크립트의 재작업입니다.

Names Default To Here( 1 );
dt = Open( "$sample_data/big class.jmp" );
overlayplot = dt << Overlay Plot(invisible,
 X( :height ),
 Y( :Name( "weight" ) ),
 Grouping( :sex ),
 SendToByGroup(
  {:age == Eval( :age )},
  Overlay Groups,
  Connect Thru Missing( 1 ),
  Connect Points( 1 ),
  :Name( "weight" )(Overlay Marker( 8 ), Line Width( "Thick" ))
 ),
 By( :age )
);

////////////////////////////////////////Makes 'N' Oneway plots. One each for each "Parameter Name"////////////////////////////////////////////////////////

ttest_plot = dt << Oneway(invisible,
 Y( :weight ),
 X( :sex ),
 Normal Quantile Label( 0 ),
 Box Plots( 1 ),
 X Axis Proportional( 0 ),
 Points Jittered( 1 ),
 by( :age ),
 SendToReport(
  Dispatch(
   {},
   "Oneway Plot",
   FrameBox,
   {DispatchSeg(
    Box Plot Seg( 1 ),
    {Confidence Diamond( 0 ), Line Color( "Red" )}
   ), DispatchSeg(
    Box Plot Seg( 2 ),
    {Confidence Diamond( 0 ), Line Color( "Red" )}
   )}
  )
 )
);

// Create the output window
nw = new window("The Output", lub = lineup Box( NCol(2)));

// Find the numeber of by groupws
summarize(dt, bygroups = by(:age));
numByGroups = nitems(bygroups);

For(i=1,i<=numByGroups,i++,
 lub<<APPEND></APPEND>

참고: 오버레이 플롯의 크기를 수동으로 줄였습니다. 프레임 크기를 적절하게 설정하려면 JSL을 추가해야 합니다.

 

Re: 두 가지 다른 유형의 그래프를 수평으로 저널에 병합하려면 어떻게 합니까?

감사합니다. 완벽하게 작동했습니다. 프레임 크기를 설정하기만 하면 됩니다.