@@ -34,14 +34,20 @@ function printVariable( io::IO, vert::DFGVariable;
34
34
solk = listSolveKeys (vert) |> collect
35
35
lsolk = length (solk)
36
36
smsk = (rand (1 : lsolk,100 ) |> unique)[1 : minimum ([4 ,lsolk])]
37
- println (ioc, " Nr SolveKeys =$(lsolk) : " , solk[smsk], 4 < lsolk ? " ..." : " " )
38
- printstyled (ioc, " :default" , " \n " , bold= true )
37
+ println (ioc, " Nr solveKeys =$(lsolk) : " , solk[smsk], 4 < lsolk ? " ..." : " " )
38
+ printstyled (ioc, " :default <-- VariableNodeData " , " \n " , bold= true )
39
39
println (ioc, " size marginal samples: " , size (vnd. val))
40
40
println (ioc, " kde bandwidths: " , round .((vnd. bw)[:,1 ], digits= 4 ))
41
- if 0 < length (getPPEDict (vert))
42
- println (ioc, " PPE.suggested: " , round .(getPPE (vert). suggested,digits= 4 ) )
43
- else
44
- println (ioc, " No PPEs yet" )
41
+ if haskey (getPPEDict (vert), :default )
42
+ printstyled (ioc, " :default " , bold= true )
43
+ println (ioc, " <-- PPE.suggested: " , round .(ppe. suggested,digits= 4 ) )
44
+ end
45
+ maxkeys = 3
46
+ for (key, ppe) in getPPEDict (vert)
47
+ maxkeys -= 1
48
+ maxkeys == 0 && break
49
+ printstyled (ioc, " :$key " , bold= true )
50
+ println (ioc, " <-- PPE.suggested: " , round .(ppe. suggested,digits= 4 ) )
45
51
end
46
52
printstyled (ioc, " TYPE: " , bold= true , color= :blue )
47
53
println (ioc, vari)
0 commit comments