mermaid.js view of R rpart / partykit

another quick experiment adding to these interactive javascript views of R partykit / rpart recursive partitioning / clustering.

For a couple other experiments see:

/timelyportfolio/58f8fe3e167ef47145d0
/timelyportfolio/d4ff502dc32b5b04eae4
/timelyportfolio/adc2dfee7aef48ce5485

Code here

Live example

<!DOCTYPE html>
<html>
<head>
<meta charset="utf-8"/>
<script src="https://www.sveido.com/mermaid/dist/mermaid.full.min.js"></script>

</head>
<body>
<div>Model formula: hp ~ cyl + disp + mpg + drat + wt + qsec + vs + am + gear + carb</div>
<div id="mermaidChart" class="mermaid">graph LR;A[ root]-->B[ cyl < 7];
A[ root]-->I[ cyl >= 7];
B[ cyl < 7]-->C[ mpg >= 21.45];
B[ cyl < 7]-->F[ mpg < 21.45];
C[ mpg >= 21.45]-->D[ disp < 87.05: 62.250 n = 4, err = 140.8];
C[ mpg >= 21.45]-->E[ disp >= 87.05: 91.833 n = 6, err = 1376.8];
F[ mpg < 21.45]-->G[ qsec >= 15.98: 112.857 n = 7, err = 306.9];
F[ mpg < 21.45]-->H[ qsec < 15.98: 175.000 n = 1, err = 0.0];
I[ cyl >= 7]-->J[ drat < 3.18];
I[ cyl >= 7]-->M[ drat >= 3.18];
J[ drat < 3.18]-->K[ mpg >= 12.8: 170.000 n = 7, err = 1150.0];
J[ drat < 3.18]-->L[ mpg < 12.8: 210.000 n = 2, err = 50.0];
M[ drat >= 3.18]-->N[ carb < 6: 246.000 n = 4, err = 582.0];
M[ drat >= 3.18]-->O[ carb >= 6: 335.000 n = 1, err = 0.0];</div>
<script></script>
</body>
</html>

Modified http://www.sveido.com/mermaid/dist/mermaid.full.min.js to a secure url

https://www.sveido.com/mermaid/dist/mermaid.full.min.js