因果图颜色是否可以将颜色信息嵌入因果图表中?如果不是,这可能是功能请求吗?
这对于跟踪根本原因调查的进展非常有用。当存在多个具有相同名称(例如:温度,设置)的文本编辑框时,此功能特别有用。
我正在使用JMP14.3.0
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Ishikawa.jmp" );
dt << Diagram(
Y( :Child ),
X( :Parent ),
SendToReport(
Dispatch( {}, "Solder process", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Splatter", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Flux", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Chain speed", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Temperature", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Setup", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Control", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Wave pump", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Height", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Flow", TextEditBox, {Font Color( 5 )} ),
Dispatch( {}, "Raw card", TextEditBox, {Font Color( 3 )} ),
Dispatch( {}, "Short circuit", TextEditBox, {Font Color( 3 )} ),
Dispatch( {}, "Shroud", TextEditBox, {Font Color( 3 )} ),
Dispatch( {}, "Moisture context", TextEditBox, {Font Color( 3 )} ),
Dispatch( {}, "Time", TextEditBox, {Font Color( 3 )} ),
Dispatch( {}, "Temperature", Text Edit Box( 2 ), {Font Color( 3 )} ),
Dispatch( {}, "Components", TextEditBox, {Font Color( 0 )} ),
Dispatch( {}, "Missing from reel", TextEditBox, {Font Color( 0 )} ),
Dispatch( {}, "Vendor", TextEditBox, {Font Color( 0 )} ),
Dispatch( {}, "Setup", Text Edit Box( 2 ), {Font Color( 0 )} ),
Dispatch( {}, "Wrong part", TextEditBox, {Font Color( 0 )} ),
Dispatch( {}, "Functional failure", TextEditBox, {Font Color( 0 )} )
)
);数据表图形脚本编写回复:因果图颜色我很确定我看到了@ andreacoombs1设置表格模板,以与为鱼骨的分支着色的脚本一起使用。 不幸的是,我没有那个脚本。
回复:因果图颜色可以设置数据表以使用脚本为鱼骨着色。这是三个关键步骤和一些正在发生的事情的注意事项。
1.必须按照创建鱼骨的顺序对数据表进行排序。上一行中有“父级”作为“子级”的任何行都必须在下一行中。 Ishikawa.jmp数据集不是按此顺序。下面的脚本将创建一个名为“ Ishikawa Sorted”的新数据表。注意,例如,在“焊接过程”中有一个称为“温度”的子级,在其他行中是“父级”。焊接工艺,温度在第9行中,温度,设置紧接在第10行中。
2.添加名为“颜色”的列,其中包含一个标准JMP颜色。出于演示目的,下面的脚本添加了此列,还为此颜色添加了行状态列,并为数据表添加了颜色,以使方案更加明显。我已经将5种潜在的根本原因类别分别上色了。 例如,当您得出有关潜在根本原因的结论时,我也将其中一些涂成灰色。
3.最后一步是运行以下脚本:1)创建鱼骨图,2)从数据表中提取颜色,3)为鱼骨中的文本着色。包含这三个步骤的脚本可以保存到数据表中。鱼骨图中的文本字符串存储在文本编辑框中。第一个文本编辑框对应于数据表中的第一个或最高顺序的父级,在这种情况下,其为“电路板上的缺陷”。因此,For循环的文本编辑框包含i + 1,而相应的颜色包含i。
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Ishikawa.jmp" );
//Reorder by defect groups
dt << New Column("Row Order", set values (
{1,5,15,21,27,2,3,4,6,7,8,9,12,10,11,13,14,16,17,
18,19,20,22,25,26,23,24,28,29,30,31,32,33})
);
ndt = Data Table( "Ishikawa" ) << Sort(
By( :Row Order ),
Order( Ascending ),
Output Table( "Ishikawa Sorted" )
);
//Add column for color, color rows by color
ndt << New Column ("Color", set values(
{4,4,4,1,5,5,5,5,1,1,1,5,5,5,3,
3,3,3,3,3,8,8,8,8,8,8,6,6,6,6,6,1,6})
);
ndt << New column ("Color State", "Row State", Formula(Color State( :Color )));
Column(ndt,"Color State")<<COPY to="" row="" states=""></COPY>回复:因果图颜色谢谢@ andreacoombs1 。您知道在dt:Row Order列中自动执行值的方法吗?
回复:因果图颜色该脚本可以帮助您达到目标。我将不得不考虑如何拉相应的父级,但是这里是如何获得子级和行级的方法。
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Ishikawa.jmp" );
fb1 = dt << Diagram(
Y( :Child ),
X( :Parent ))
;
fb1rep = fb1<<REPORT></REPORT>
回复:因果图颜色谢谢@ andreacoombs1 。实际上,您的脚本确实可以实现大部分功能。我认为该脚本会一直进行下去。我尚未进行鲁棒性测试,但似乎工作正常。
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Ishikawa.jmp" );
// Add color column.
dt << New Column( "Color",
Numeric,
"Continuous",
Format( "Best", 12 ),
Value Labels( {3 = "Red", 5 = "Blue"} ),
Use Value Labels( 1 ),
Set Values( [., 5, 3, ., ., ., ., ., 5, 5, 5, 5, 5, 5, 5, 5, 5, 3, 3, 3, 3, 3, ., ., ., ., ., ., ., ., ., ., .] )
);
// Create diagram.
dgram = dt << Diagram( Y( :Child ), X( :Parent ) );
// Get diagram order.
dgramRep = dgram << Report;
dgramRep[Hier Box( 1 )] << Make Into Data Table();
orderDt = Current Data Table();
orderDt << Set Name( "Row Order" );
orderDt << New Column( "Row Order", Numeric, Continuous, Values( Index( 1, N Rows( orderDt ) ) ) );
// Update dt with row order.
dt << Update( With( orderDt ), By Matching Columns( :Parent == :Parent, :Child == :Child ) );
Close( orderDt, No Save );
// Set colors.
orderList = As List( dt:Row Order << Get Values() );
colorList = As List( dt:Color << Get Values() );
For( i = 1, i <= N Rows( dt ), i++,
c = colorList[Loc( orderList, i )][1];
If( !Is Missing( c ),
dgramRep[Text Edit Box( i + 1 )] << Font Color( c )
);
);回复:因果图颜色我刚刚看到了这个帖子,我刚刚提交到JMP愿望清单,添加了其他功能,以使JMP因果关系更像思维导图,这是基于我在2020年JMP Discovery Summit上的主题。
您可以看到我的2020 JMP Discovery Summit演讲:使用JMP因果图,思维导图软件和JSL进行结构化的问题解决(2020-US-30MP-569)
我能够创建一个交互式浮动窗口,该窗口允许用户通过将消息发送到“文本编辑框”来在“标签”列中添加“ E”,“ C”,“ N”,并且每个字母包含不同的字体颜色。 如果缺少,脚本还将创建“标签”列。
我正在尝试为您的任何初始文本加上颜色的问题执行相同的操作,但是在向子父母发送邮件时出现一些问题,它想为下面的所有文本着色。 但是,此发布是一个有趣的概念,我们拥有JMP用户,他们使用相同的因果图,并使用右键单击每个文本编辑框的内置功能为每个问题手动使用颜色编码不同的文本。 交互式浮动窗口概念很不错,因为您可以在团队进行头脑风暴时将其着色或恢复为原始颜色。
我会将您的建议添加到“因果图”的相同愿望清单中,也许开发人员将在以后的版本中进行研究,并添加为第4列选项。 这是JMP愿望清单下的帖子:鱼骨/因果关系图:对当前平台的增强以实现思维导图
回复:因果图颜色@机器人我没有意识到您可以从HierBox(1)制作数据表。 做到了!