438466_ko-KR

liliconcom

다른 데이터 테이블의 데이터를 기반으로 열 축 참조선 업데이트

가능한 다른 데이터의 데이터를 기반으로 열 참조 라인을 추가하려고 합니다. 예를 들어 "Big Class"를 사용하면 조회 데이터 테이블의 P50 및 P95 값으로 "체중" 및 "높이" 열이 업데이트됩니다.

 

조회 데이터 테이블의 행은 기본 테이블의 열 이름에 해당합니다. 참조 라인은 조회 테이블 열 이름 "P50" 또는 "P95"의 레이블 값을 할당해야 하며 값은 해당 열의 행에서 가져옵니다.  

 

추가된 열 축 참조선을 보여주는 예:

 

 

조회 데이터 테이블의 예:

 

저는 JSL에 대해 잘 알지 못하므로 이 주제에 대해 도움을 주시면 감사하겠습니다. 스크립트를 만들었지만 원하는 대로 되지 않습니다.

열을 손상시키는 것 같습니다. 때때로 분포를 그릴 때 모든 '0' 값이 표시됩니다. 또한 P50 및 P95 참조 라인을 모두 추가하려고 하면 마지막 하나만 열에 저장되고 두 열 모두에 저장됩니다.

 

dt = Open ("C:\Program Files\SAS\JMP\15\Samples\Data\big class.jmp");
dtLookup = New Table( "Lookup Table",
 Add Rows( 2 ),
 New Column( "Column Name",
  Character,
  Nominal,
  Set Values( {"weight", "height"} )
 ),
 New Column( "P50",
  "Continuous",
  Set Values( [100, 61] )
 ),
 New Column( "P95",
  "Continuous",
  Set Values( [120, 70] )
 )
);

col_name_list = dt << get column names(string);
col_name_list_lookup = dtLookup << get column names(string);
 
numRowsLookup = N Rows( dtLookup );
numColsLookup = N Cols( dtLookup );

for(n=1,n<=numRowsLookup,n++,
 col_name = dtLookup[n,1];
 If(contains(col_name_list,col_name),
  for(j=2,j<=numColsLookup,j++,
  col = Column(dt, col_name);
  col_name_Lookup = col_name_list_lookup[j];
  value = Column(dtLookup,col_name_Lookup)[n];
  col <<
   Set Property("Axis", 
   {
    //Add Ref Line( 63, "Dashed", "Orange", "P50", 2 )
    Add Ref Line( value, "Dashed", "Orange", col_name_Lookup, 2 )
   });
  );
 );
);

감사합니다,

알았다

스크립팅Re: 다른 데이터 테이블의 데이터를 기반으로 열 축 참조선 업데이트

다음은 예제 스크립트입니다. 내 생각에 Axis는 그런 식으로 여러 번 시도하면 재정의되므로 동일한 << Set Property에 추가해야 할 수도 있습니다(이를 수행하기 위해 표현식을 빌드하는 여러 다른 방법).

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Big Class.jmp");
dtLookup = New Table("Lookup Table",
 Add Rows(2),
 New Column("Column Name", Character, Nominal, Set Values({"weight", "height"})),
 New Column("P50", "Continuous", Set Values([100, 61])),
 New Column("P95", "Continuous", Set Values([120, 70]))
);

For Each Row(dtLookup,
 col_name  =:"Column Name"n;
 //because we know we have only two lines to add and they are always added
 Eval(EvalExpr(Column(dt, col_name) << Set Property("Axis", {
  Add Ref Line(Expr(:P50), "Dashed", "Orange", "P50", 2),
  Add Ref Line(Expr(:P95), "Dashed", "Orange", "P95", 2) 
  }))
 );
);

확실하지 않은 경우 평가(EvalExpr()) 여기에 필요하지만 아프지 않을 것입니다.

 

Re: 다른 데이터 테이블의 데이터를 기반으로 열 축 참조선 업데이트

감사합니다. 이 솔루션은 훨씬 간단하지만 기존 축 참조 라인을 덮어쓰는 것 같습니다. 해당 열에 이미 있는 Axis Ref Lines를 보존하는 방법이 있는지 알고 있습니까?  

Re: 다른 데이터 테이블의 데이터를 기반으로 열 축 참조선 업데이트

100% 확신할 수는 없지만 먼저 << Get Propery("Axis") 를 사용하여 이전 Axis 속성을 가져온 다음 추가할 수 있습니다.

 

다음과 같을 수 있습니다(더 간단한 방법도 있을 수 있음).

old_properties = Column(dt, "height") << get property("Axis");
old_with_new = Insert(old_properties, Expr(Add Ref Line(1, "Dashed", "Orange", "P45", 2)));
Eval(EvalExpr(column(dt, "height") << Set Property("Axis",{expr(old_with_new)})));

Re: 다른 데이터 테이블의 데이터를 기반으로 열 축 참조선 업데이트

여기서 Insert() 함수는 무엇을 합니까? 나는 그것이 작동하지 않는 것 같다.

 

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Big Class.jmp");
dtLookup = New Table("Lookup Table",
 Add Rows(2),
 New Column("Column Name", Character, Nominal, Set Values({"weight", "height"})),
 New Column("P50", "Continuous", Set Values([100, 61])),
 New Column("P95", "Continuous", Set Values([120, 70]))
);

col_name_list = dt << get column names(string);
col_name_list_lookup = dtLookup << get column names(string);

For Each Row(dtLookup,
 col_name  =:"Column Names"n;
 If(contains(col_name_list,col_name),
  old_properties = Column(dt, col_name) << get property("Axis");
  old_with_new = Insert(old_properties, 
  {Expr( Add Ref Line(Expr(:P50), "Dashed", "Orange", "P50", 2),
    Add Ref Line(Expr(:P95), "Dashed", "Orange", "P95", 2)
   )
  });
  Eval(EvalExpr(Column(dt, col_name) << Set Property("Axis",{
   Expr(old_with_new) 
  })));
 );
);