knotR: Knot Diagrams using Bezier Curves

`k8_19b` <-	
structure(list(minsymvec = structure(c(handle_A2 = -9.86487865064467, 
handle_A9 = -29.2978768184496, handle_A17 = 16.2743734510498, 
handle_A18 = -93.3911743024028, handle_A26 = 124.826042853211, 
handle_A33 = 165.933330395719, handle_A42 = 405.727705898251, 
node2 = -67.3472545444764, node9 = -102.684514197037, node18 = -154.228659692936, 
node26 = 67.3433118529314, node33 = 190.532310634086, node41 = 406.995942525448, 
node42 = 336.942318477948), class = "minsymvec"), overunderobj = structure(c(16, 
9, 3, 4, 22, 15, 10, 21, 1, 2, 20, 13, 7, 8, 19, 14), .Dim = c(8L, 
2L)), symobj = list(Mver = structure(c(18, 9, 2, 16, 1, 8), .Dim = 3:2), 
    xver = c(5, 17), Mhor = NULL, xhor = c(11, 23), Mrot = structure(c(17, 
    16, 18, 1, 9, 2, 23, 22, 24, 7, 15, 8, 5, 4, 6, 13, 21, 14, 
    11, 10, 12, 19, 3, 20), .Dim = c(6L, 4L)), exact_h = NULL, 
    exact_v = NULL, mcdonalds = FALSE, celtic = FALSE, reefknot = FALSE, 
    center_crossing = FALSE, indep = c(handle_A1 = FALSE, handle_A2 = TRUE, 
    handle_A3 = FALSE, handle_A4 = FALSE, handle_A5 = FALSE, 
    handle_A6 = FALSE, handle_A7 = FALSE, handle_A8 = FALSE, 
    handle_A9 = TRUE, handle_A10 = FALSE, handle_A11 = FALSE, 
    handle_A12 = FALSE, handle_A13 = FALSE, handle_A14 = FALSE, 
    handle_A15 = FALSE, handle_A16 = FALSE, handle_A17 = TRUE, 
    handle_A18 = TRUE, handle_A19 = FALSE, handle_A20 = FALSE, 
    handle_A21 = FALSE, handle_A22 = FALSE, handle_A23 = FALSE, 
    handle_A24 = FALSE, handle_A25 = FALSE, handle_A26 = TRUE, 
    handle_A27 = FALSE, handle_A28 = FALSE, handle_A29 = FALSE, 
    handle_A30 = FALSE, handle_A31 = FALSE, handle_A32 = FALSE, 
    handle_A33 = TRUE, handle_A34 = FALSE, handle_A35 = FALSE, 
    handle_A36 = FALSE, handle_A37 = FALSE, handle_A38 = FALSE, 
    handle_A39 = FALSE, handle_A40 = FALSE, handle_A41 = FALSE, 
    handle_A42 = TRUE, handle_A43 = FALSE, handle_A44 = FALSE, 
    handle_A45 = FALSE, handle_A46 = FALSE, handle_A47 = FALSE, 
    handle_A48 = FALSE, node1 = FALSE, node2 = TRUE, node3 = FALSE, 
    node4 = FALSE, node5 = FALSE, node6 = FALSE, node7 = FALSE, 
    node8 = FALSE, node9 = TRUE, node10 = FALSE, node11 = FALSE, 
    node12 = FALSE, node13 = FALSE, node14 = FALSE, node15 = FALSE, 
    node16 = FALSE, node17 = FALSE, node18 = TRUE, node19 = FALSE, 
    node20 = FALSE, node21 = FALSE, node22 = FALSE, node23 = FALSE, 
    node24 = FALSE, node25 = FALSE, node26 = TRUE, node27 = FALSE, 
    node28 = FALSE, node29 = FALSE, node30 = FALSE, node31 = FALSE, 
    node32 = FALSE, node33 = TRUE, node34 = FALSE, node35 = FALSE, 
    node36 = FALSE, node37 = FALSE, node38 = FALSE, node39 = FALSE, 
    node40 = FALSE, node41 = TRUE, node42 = TRUE, node43 = FALSE, 
    node44 = FALSE, node45 = FALSE, node46 = FALSE, node47 = FALSE, 
    node48 = FALSE))), class = "knot")