`k8_16` <-
structure(list(minsymvec = structure(c(11.810610302569, -48.5444153876388,
-177.954844403729, -322.423788934417, -247.99410418266, -180.028278076215,
-2.76024169138343, -217.338128420932, -390.823192390041, -433.377548012034,
-287.072248400268, -38.5989109793591, -37.1764914459322, -102.065267070661,
-895.381811947854, -816.396224461949, -454.42031865769, -289.881030734742,
-235.285691158858, -694.919345537134, -841.74912038126, -761.494809060911,
-678.614898762482, -509.643610504196, -645.729657145528, -450.624939671112,
-89.8123425723669, -246.360343583281, -305.069272433924, -236.63298140004,
-112.433768190577, -78.9182398749109, -289.386174555022, -397.314204833093,
-397.438784137216, -203.892127241171, -61.5228341844371, -61.3348292503665,
-896.180993410605, -874.619871570915, -670.052713743169, -389.36710180889,
-280.489713047053, -237.609377558285, -751.707884249811, -827.632047113557,
-749.31176021215, -607.357949033476, -492.608224932739, -475.821159118015,
-589.539515912913, -366.367281050854), .Names = c("handle_A4",
"handle_A5", "handle_A6", "handle_A7", "handle_A8", "handle_A9",
"handle_A12", "handle_A13", "handle_A14", "handle_A15", "handle_A16",
"handle_A17", "handle_A23", "handle_A24", "handle_A31", "handle_A32",
"handle_A33", "handle_A34", "handle_A35", "handle_A38", "handle_A39",
"handle_A40", "handle_A41", "handle_A42", "handle_A49", "handle_A50",
"node5", "node6", "node7", "node8", "node9", "node12", "node13",
"node14", "node15", "node16", "node23", "node24", "node30", "node31",
"node32", "node33", "node34", "node35", "node38", "node39", "node40",
"node41", "node42", "node43", "node49", "node50"), class = "minsymvec"),
overunderobj = structure(c(25, 11, 23, 13, 7, 17, 19, 3,
10, 18, 12, 6, 16, 24, 2, 22), .Dim = c(8L, 2L)), symobj = structure(list(
Mver = structure(c(9, 8, 7, 24, 16, 23, 15, 6, 12, 15,
14, 13, 5, 25, 26, 1, 10, 18, 11, 19, 2, 22, 19, 20,
21, 3), .Dim = c(13L, 2L)), xver = c(4, 17), Mhor = NULL,
xhor = NULL, Mrot = NULL, exact_h = NULL, exact_v = NULL,
mcdonalds = FALSE, celtic = FALSE, reefknot = FALSE,
center_crossing = FALSE, indep = structure(c(FALSE, FALSE,
FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE,
TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE,
FALSE, FALSE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE,
FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE,
TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE,
FALSE, FALSE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE,
FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE,
TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE,
FALSE, FALSE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE,
FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE,
TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE,
FALSE, FALSE, TRUE, TRUE, FALSE, FALSE), .Names = c("handle_A1",
"handle_A2", "handle_A3", "handle_A4", "handle_A5", "handle_A6",
"handle_A7", "handle_A8", "handle_A9", "handle_A10",
"handle_A11", "handle_A12", "handle_A13", "handle_A14",
"handle_A15", "handle_A16", "handle_A17", "handle_A18",
"handle_A19", "handle_A20", "handle_A21", "handle_A22",
"handle_A23", "handle_A24", "handle_A25", "handle_A26",
"handle_A27", "handle_A28", "handle_A29", "handle_A30",
"handle_A31", "handle_A32", "handle_A33", "handle_A34",
"handle_A35", "handle_A36", "handle_A37", "handle_A38",
"handle_A39", "handle_A40", "handle_A41", "handle_A42",
"handle_A43", "handle_A44", "handle_A45", "handle_A46",
"handle_A47", "handle_A48", "handle_A49", "handle_A50",
"handle_A51", "handle_A52", "node1", "node2", "node3",
"node4", "node5", "node6", "node7", "node8", "node9",
"node10", "node11", "node12", "node13", "node14", "node15",
"node16", "node17", "node18", "node19", "node20", "node21",
"node22", "node23", "node24", "node25", "node26", "node27",
"node28", "node29", "node30", "node31", "node32", "node33",
"node34", "node35", "node36", "node37", "node38", "node39",
"node40", "node41", "node42", "node43", "node44", "node45",
"node46", "node47", "node48", "node49", "node50", "node51",
"node52"))), .Names = c("Mver", "xver", "Mhor", "xhor",
"Mrot", "exact_h", "exact_v", "mcdonalds", "celtic", "reefknot",
"center_crossing", "indep"))), .Names = c("minsymvec", "overunderobj",
"symobj"), class = "knot")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.