data/three_figure_eights.R

In RobinHankin/knotR: Knot Diagrams using Bezier Curves

`three_figure_eights` <-
structure(list(minsymvec = structure(c(138.741313970754, -48.2616341519668, 
-242.775703913363, -198.489132246543, -58.4350802212198, 92.9329040486433, 
160.030513592257, 62.8745239399715, -75.5231227680759, -217.681214753125, 
-229.19757725757, 185.205597878473, 177.480487472429, 229.793590372209, 
423.350160415194, 173.139077945769, 110.158984007744, 191.485541863949, 
312.226929450345, 303.974643497118, 160.61099898875, 111.082078054602, 
51.7073767450757, -115.865776343292, -251.901464776429, -116.868231574273, 
-7.37491106153919, 111.906724832278, 136.671678326257, 23.3730705976847, 
-137.447179184152, -221.950830870532, -229.663460846657, 193.63284842015, 
181.082230125174, 290.576903701476, 367.818086729006, 127.704980348709, 
127.94643961404, 243.924179557624, 314.55748331441, 262.906253439307, 
145.015625133647, 93.7986885173568), .Names = c("handle_A13", 
"handle_A14", "handle_A15", "handle_A16", "handle_A17", "handle_A18", 
"handle_A19", "handle_A20", "handle_A21", "handle_A22", "handle_A23", 
"handle_A46", "handle_A47", "handle_A48", "handle_A49", "handle_A50", 
"handle_A51", "handle_A52", "handle_A53", "handle_A54", "handle_A55", 
"handle_A56", "node13", "node14", "node15", "node16", "node17", 
"node18", "node19", "node20", "node21", "node22", "node23", "node46", 
"node47", "node48", "node49", "node50", "node51", "node52", "node53", 
"node54", "node55", "node56"), class = "minsymvec"), overunderobj = structure(c(22, 
17, 19, 14, 11, 6, 8, 3, 33, 28, 30, 25, 15, 21, 13, 17, 4, 10, 
2, 6, 26, 32, 24, 28), .Dim = c(12L, 2L)), symobj = structure(list(
    Mver = NULL, xver = 24, Mhor = NULL, xhor = NULL, Mrot = structure(c(23, 
    22, 15, 16, 14, 21, 20, 19, 13, 17, 18, 12, 11, 4, 5, 3, 
    10, 9, 8, 2, 6, 7, 1, 33, 26, 27, 25, 32, 31, 30, 24, 28, 
    29), .Dim = c(11L, 3L)), exact_h = NULL, exact_v = NULL, 
    mcdonalds = FALSE, celtic = FALSE, reefknot = FALSE, center_crossing = FALSE, 
    indep = structure(c(FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, 
    FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, 
    TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, 
    FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, 
    FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, 
    FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, 
    TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, 
    FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, 
    FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TRUE, 
    TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, 
    FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, 
    FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, 
    FALSE, FALSE, FALSE, TRUE, TRUE, TRUE, TRUE, TRUE, TRUE, 
    TRUE, TRUE, TRUE, TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, 
    FALSE, FALSE, FALSE, FALSE, 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", "handle_A53", "handle_A54", "handle_A55", "handle_A56", 
    "handle_A57", "handle_A58", "handle_A59", "handle_A60", "handle_A61", 
    "handle_A62", "handle_A63", "handle_A64", "handle_A65", "handle_A66", 
    "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", "node53", "node54", "node55", 
    "node56", "node57", "node58", "node59", "node60", "node61", 
    "node62", "node63", "node64", "node65", "node66"))), .Names = c("Mver", 
"xver", "Mhor", "xhor", "Mrot", "exact_h", "exact_v", "mcdonalds", 
"celtic", "reefknot", "center_crossing", "indep"))), .Names = c("minsymvec", 
"overunderobj", "symobj"), class = "knot")