538351_ko-KR

liliconcom

분포도에 기준선 추가

안녕,

 

분포도에 참조선을 추가하고 싶습니다.

참조 값은 두 번째 파일 "참조 데이터 테이블"에 저장됩니다.

내 코드는 다음과 같습니다. 히스토그램 플롯에서는 작동하지 않지만 Var 차트에서는 작동합니다. 어떤 조언도 감사하겠습니다.

 

Names Default To Here( 1 );


dt1 = Data table( "Reference data table.jmp");
dt2 = Current Data Table();
Col_List = dt2 << Get Column Group( "Tests" );
        


vc2 = Eval(
 Eval Expr(
  dt2 << distribution(
   Stack( 1 ), 
   
   Column( Expr( Col_List ) ),
   Horizontal Layout( 1 ),
   Normal Quantile Plot( 1 ),
   Vertical( 1 ),
   Process Capability( 0 )
   
  )
 )
);

aa_refs = Associative Array( dt1:Tests << get values, dt1:Mean << get values );

For( i = 1, i <= N Items( Col_List ), i++,
 If( Contains( aa_refs, Col_List[i] ),
  Report( vc2[i] )[Framebox( 1 )] << DispatchSeg( CustomStreamSeg( 3 ), {Line Width( 2 )} );
  Report( vc2[i] )[AxisBox( 1 )] << {Add Ref Line( aa_refs[Col_List[i]], "Solid", "Green", "RTS", 2 )};
 )
);

 

스크립팅Re: 분포도에 참조선 추가

@txnelson 어떤 제안?

Re: 분포도에 참조선 추가

다음은 스크립트의 재작업입니다.문제는 이변량에 대한 표시 트리가 분산 차트의 표시 트리 출력과 다르다는 것입니다.다양한 형태의 출력으로 작업할 수 있도록 디스플레이 트리에 대한 스크립팅 가이드 섹션을 읽어야 합니다.또한 참조 테이블의 평균이 잘못된 것 같습니다.아래 출력을 참조하십시오.Current 1.1에 대한 평균은 166으로 나열되며 나열된 최대값은 2.49에 불과합니다.

Names Default To Here( 1 );

dt1 = Data table( "Reference data table.jmp");
dt2 = Data table("Data table upd");//("Current Data Table();
Col_List = dt2 << Get Column Group( "Tests");       


vc2 = Eval(
 Eval Expr(
  dt2 << distribution(
   Stack( 1 ), 
   
   Column( Expr( Col_List ) ),
   Horizontal Layout( 1 ),
   Normal Quantile Plot( 1 ),
   Vertical( 1 ),
   Process Capability( 0 )
   
  )
 )
);

aa_refs = Associative Array( dt1:Tests << get values, dt1:Mean << get values );

/*For( i = 1, i <= N Items( Col_List ), i++,
 If( Contains( aa_refs, Col_List[i] ),
  Report( vc2[i] )[Framebox( 1 )] << DispatchSeg( CustomStreamSeg( 3 ), {Line Width( 2 )} );
  Report( vc2[i] )[AxisBox( 1 )] << {Add Ref Line( aa_refs[Col_List[i]], "Solid", "Green", "RTS", 2 )};
 )
);*/


For( i = 1, i <= N Items( Col_List ), i++,
 If( Contains( aa_refs, char(Col_List[i]) ),
  Report( vc2 )[char(Col_List[i])][Axisbox( 1 )] << Add Ref Line( aa_refs[char(Col_List[i])], "Solid", "Green", "RTS", 2 );
 )
);