#install.packages("webshot")
#install.packages("DiagrammeR")
library(nomnoml)
library(DiagrammeR)
## Warning: package 'DiagrammeR' was built under R version 4.3.2
#install.packages("webshot")
webshot::install_phantomjs(force = TRUE)
## phantomjs has been installed to /Users/mschedlb/Library/Application Support/PhantomJS
#stroke: orange
#.box: fill=#8f8 dashed visual=ellipse
[A]-[B]
[B]-[<box>C]
#stroke: orange
#.box: fill=#8f8 dashed visual=ellipse
[A]-[B]
[B]-[<box>C]
DiagrammeR::grViz("
digraph graph2 {
graph [layout = dot, rankdir = LR]
# node definitions with substituted label text
node [shape = oval]
a [label = '@@1']
b [label = '@@2']
c [label = '@@3']
d [label = '@@4']
a -> b -> c -> d
}
[1]: names(iris)[1]
[2]: names(iris)[2]
[3]: names(iris)[3]
[4]: names(iris)[4]
",
height = 100)
Introduction
This lesson is a placeholder…
Conclusion
LS0tCnRpdGxlOiAiSW50cm9kdWN0aW9uIHRvIFVNTCIKcGFyYW1zOgogIGNhdGVnb3J5OiAzMAogIHN0YWNrczogIjAsMCIKICBudW1iZXI6IDE1MAogIHRpbWU6IDQ1CiAgbGV2ZWw6IGJlZ2lubmVyCiAgdGFnczogTHVjaWRDaGFydCxVTUwsRVJELFZpc3VhbCBNb2RlbGluZyxSZXZlcnNlIEVuZ2luZWVyaW5nCiAgZGVzY3JpcHRpb246ICJUaGlzIGxlc3NvbiBwcm92aWRlcyBhbiBvdmVydmlldyBvZiB0aGUKICAgICAgICAgICAgICAgIFVuaWZpZWQgTW9kZWxpbmcgTGFuZ3VhZ2UgKFVNTCkgYW5kIGl0cyB2YXJpb3VzCiAgICAgICAgICAgICAgICBkaWFncmFtcyBhbmQgdXNlcy4iCmRhdGU6ICI8c21hbGw+YHIgU3lzLkRhdGUoKWA8L3NtYWxsPiIKYXV0aG9yOiAiPHNtYWxsPk1hcnRpbiBTY2hlZGxiYXVlcjwvc21hbGw+IgplbWFpbDogIm0uc2NoZWRsYmF1ZXJAbmV1LmVkdSIKYWZmaWxpdGF0aW9uOiAiTm9ydGhlYXN0ZXJuIFVuaXZlcnNpdHkiCm91dHB1dDogCiAgYm9va2Rvd246Omh0bWxfZG9jdW1lbnQyOgogICAgdG9jOiB0cnVlCiAgICB0b2NfZmxvYXQ6IHRydWUKICAgIGNvbGxhcHNlZDogZmFsc2UKICAgIG51bWJlcl9zZWN0aW9uczogZmFsc2UKICAgIGNvZGVfZG93bmxvYWQ6IHRydWUKICAgIHRoZW1lOiBzcGFjZWxhYgogICAgaGlnaGxpZ2h0OiB0YW5nbwotLS0KCi0tLQp0aXRsZTogIjxzbWFsbD5gciBwYXJhbXMkY2F0ZWdvcnlgLmByIHBhcmFtcyRudW1iZXJgPC9zbWFsbD48YnIvPjxzcGFuIHN0eWxlPSdjb2xvcjogIzJFNDA1MzsgZm9udC1zaXplOiAwLjllbSc+YHIgcm1hcmtkb3duOjptZXRhZGF0YSR0aXRsZWA8L3NwYW4+IgotLS0KCmBgYHtyIGNvZGU9eGZ1bjo6cmVhZF91dGY4KHBhc3RlMChoZXJlOjpoZXJlKCksJy9SL19pbnNlcnQyREIuUicpKSwgaW5jbHVkZSA9IEZBTFNFfQpgYGAKCmBgYHtyfQojaW5zdGFsbC5wYWNrYWdlcygid2Vic2hvdCIpCiNpbnN0YWxsLnBhY2thZ2VzKCJEaWFncmFtbWVSIikKbGlicmFyeShub21ub21sKQpsaWJyYXJ5KERpYWdyYW1tZVIpCmBgYAoKYGBge3J9CiNpbnN0YWxsLnBhY2thZ2VzKCJ3ZWJzaG90IikKd2Vic2hvdDo6aW5zdGFsbF9waGFudG9tanMoZm9yY2UgPSBUUlVFKQpgYGAKCmBgYHtub21ub21sfQojc3Ryb2tlOiBvcmFuZ2UKIy5ib3g6IGZpbGw9IzhmOCBkYXNoZWQgdmlzdWFsPWVsbGlwc2UKCltBXS1bQl0KW0JdLVs8Ym94PkNdCmBgYAoKYGBge25vbW5vbWwsIHN2Zz1UUlVFfQojc3Ryb2tlOiBvcmFuZ2UKIy5ib3g6IGZpbGw9IzhmOCBkYXNoZWQgdmlzdWFsPWVsbGlwc2UKCltBXS1bQl0KW0JdLVs8Ym94PkNdCmBgYAoKYGBge3J9CkRpYWdyYW1tZVI6OmdyVml6KCIKICBkaWdyYXBoIGdyYXBoMiB7CiAgCiAgZ3JhcGggW2xheW91dCA9IGRvdCwgcmFua2RpciA9IExSXQogIAogICMgbm9kZSBkZWZpbml0aW9ucyB3aXRoIHN1YnN0aXR1dGVkIGxhYmVsIHRleHQKICBub2RlIFtzaGFwZSA9IG92YWxdCiAgYSBbbGFiZWwgPSAnQEAxJ10KICBiIFtsYWJlbCA9ICdAQDInXQogIGMgW2xhYmVsID0gJ0BAMyddCiAgZCBbbGFiZWwgPSAnQEA0J10KICAKICBhIC0+IGIgLT4gYyAtPiBkCiAgfQogIAogIFsxXTogbmFtZXMoaXJpcylbMV0KICBbMl06IG5hbWVzKGlyaXMpWzJdCiAgWzNdOiBuYW1lcyhpcmlzKVszXQogIFs0XTogbmFtZXMoaXJpcylbNF0KICAiLAogIGhlaWdodCA9IDEwMCkKYGBgCgojIyBJbnRyb2R1Y3Rpb24KClRoaXMgbGVzc29uIGlzIGEgcGxhY2Vob2xkZXIuLi4KCiMjIENvbmNsdXNpb24geyNjb25jbH0KCiMjIFR1dG9yaWFsCgpOb25lIHlldC4KCi0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLQoKIyMgRmlsZXMgJiBSZXNvdXJjZXMKCmBgYHtyIHppcEZpbGVzLCBlY2hvPUZBTFNFfQp6aXBOYW1lID0gc3ByaW50ZigiTGVzc29uRmlsZXMtJXMtJXMuemlwIiwgCiAgICAgICAgICAgICAgICAgcGFyYW1zJGNhdGVnb3J5LAogICAgICAgICAgICAgICAgIHBhcmFtcyRudW1iZXIpCgp0ZXh0QUxpbmsgPSBwYXN0ZTAoIkFsbCBGaWxlcyBmb3IgTGVzc29uICIsIAogICAgICAgICAgICAgICBwYXJhbXMkY2F0ZWdvcnksIi4iLHBhcmFtcyRudW1iZXIpCgojIGRvd25sb2FkRmlsZXNMaW5rKCkgaXMgaW5jbHVkZWQgZnJvbSBfaW5zZXJ0MkRCLlIKa25pdHI6OnJhd19odG1sKGRvd25sb2FkRmlsZXNMaW5rKCIuIiwgemlwTmFtZSwgdGV4dEFMaW5rKSkKYGBgCgotLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0KCiMjIFJlZmVyZW5jZXMKCk5vbmUuCgojIyBFcnJhdGEKCltMZXQgdXMga25vd10oaHR0cHM6Ly9mb3JtLmpvdGZvcm0uY29tLzIxMjE4NzA3Mjc4NDE1Nyl7dGFyZ2V0PSJfYmxhbmsifS4K