knotR: Knot Diagrams using Bezier Curves

`k9_48` <-	
structure(list(minsymvec = structure(c(handle_A6 = -32.9943994902594, 
handle_A7 = -48.84687420794, handle_A10 = -6.39059940911921, 
handle_A11 = -188.895375736285, handle_A12 = -355.078776045805, 
handle_A13 = -244.984491813982, handle_A14 = -45.8718839698375, 
handle_A19 = -30.1047801265203, handle_A20 = -74.6603297928216, 
handle_A23 = 1.15358482674083, handle_A24 = -283.717445608977, 
handle_A25 = -311.030317278916, handle_A26 = -269.372050459618, 
handle_A27 = -113.902238730487, handle_A28 = -9.41616621189404, 
handle_A34 = -754.298819540376, handle_A35 = -700.735315183552, 
handle_A38 = -248.662943231217, handle_A39 = -129.352384312708, 
handle_A40 = -247.473606239521, handle_A41 = -411.356860926376, 
handle_A47 = -290.864240053832, handle_A48 = -459.962581484226, 
handle_A51 = -855.143233748577, handle_A52 = -691.556471482107, 
handle_A53 = -601.900277089276, handle_A54 = -393.310342106739, 
handle_A55 = -123.261887540272, node6 = -35.9946631639081, node7 = -32.8086306253666, 
node10 = -67.0402531313083, node11 = -255.415026111124, node12 = -333.020356693871, 
node13 = -178.306712081628, node19 = -50.3797366261277, node20 = -43.561982034844, 
node23 = -120.684451620527, node24 = -288.95643903138, node25 = -302.279366671585, 
node26 = -208.943586375997, node27 = -77.8502089923455, node34 = -744.613741951513, 
node35 = -653.683294434449, node38 = -205.117717678123, node39 = -153.311945680718, 
node40 = -313.664445277368, node41 = -426.242815190334, node42 = -439.049229005257, 
node47 = -343.994557861797, node48 = -523.286317127695, node51 = -837.369929628997, 
node52 = -675.042949176449, node53 = -523.797075976082, node54 = -273.613701285736, 
node55 = -104.433011228593, node56 = -85.0580866863664), class = "minsymvec"), 
    overunderobj = structure(c(18, 3, 6, 21, 9, 10, 27, 13, 14, 
    2, 16, 23, 8, 15, 19, 11, 26, 20), .Dim = c(9L, 2L)), symobj = list(
        Mver = structure(c(27, 11, 12, 10, 26, 19, 13, 25, 24, 
        20, 7, 6, 23, 1, 17, 16, 18, 2, 9, 15, 3, 4, 8, 21, 22, 
        5), .Dim = c(13L, 2L)), xver = c(14, 28), Mhor = NULL, 
        xhor = NULL, Mrot = NULL, exact_h = NULL, exact_v = NULL, 
        mcdonalds = FALSE, celtic = FALSE, reefknot = FALSE, 
        center_crossing = FALSE, indep = c(handle_A1 = FALSE, 
        handle_A2 = FALSE, handle_A3 = FALSE, handle_A4 = FALSE, 
        handle_A5 = FALSE, handle_A6 = TRUE, handle_A7 = TRUE, 
        handle_A8 = FALSE, handle_A9 = FALSE, handle_A10 = TRUE, 
        handle_A11 = TRUE, handle_A12 = TRUE, handle_A13 = TRUE, 
        handle_A14 = TRUE, handle_A15 = FALSE, handle_A16 = FALSE, 
        handle_A17 = FALSE, handle_A18 = FALSE, handle_A19 = TRUE, 
        handle_A20 = TRUE, handle_A21 = FALSE, handle_A22 = FALSE, 
        handle_A23 = TRUE, handle_A24 = TRUE, handle_A25 = TRUE, 
        handle_A26 = TRUE, handle_A27 = TRUE, handle_A28 = TRUE, 
        handle_A29 = FALSE, handle_A30 = FALSE, handle_A31 = FALSE, 
        handle_A32 = FALSE, handle_A33 = FALSE, handle_A34 = TRUE, 
        handle_A35 = TRUE, handle_A36 = FALSE, handle_A37 = FALSE, 
        handle_A38 = TRUE, handle_A39 = TRUE, handle_A40 = TRUE, 
        handle_A41 = TRUE, handle_A42 = FALSE, handle_A43 = FALSE, 
        handle_A44 = FALSE, handle_A45 = FALSE, handle_A46 = FALSE, 
        handle_A47 = TRUE, handle_A48 = TRUE, handle_A49 = FALSE, 
        handle_A50 = FALSE, handle_A51 = TRUE, handle_A52 = TRUE, 
        handle_A53 = TRUE, handle_A54 = TRUE, handle_A55 = TRUE, 
        handle_A56 = FALSE, node1 = FALSE, node2 = FALSE, node3 = FALSE, 
        node4 = FALSE, node5 = FALSE, node6 = TRUE, node7 = TRUE, 
        node8 = FALSE, node9 = FALSE, node10 = TRUE, node11 = TRUE, 
        node12 = TRUE, node13 = TRUE, node14 = FALSE, node15 = FALSE, 
        node16 = FALSE, node17 = FALSE, node18 = FALSE, node19 = TRUE, 
        node20 = TRUE, node21 = FALSE, node22 = FALSE, node23 = TRUE, 
        node24 = TRUE, node25 = TRUE, node26 = TRUE, node27 = TRUE, 
        node28 = FALSE, node29 = FALSE, node30 = FALSE, node31 = FALSE, 
        node32 = FALSE, node33 = FALSE, node34 = TRUE, node35 = TRUE, 
        node36 = FALSE, node37 = FALSE, node38 = TRUE, node39 = TRUE, 
        node40 = TRUE, node41 = TRUE, node42 = TRUE, node43 = FALSE, 
        node44 = FALSE, node45 = FALSE, node46 = FALSE, node47 = TRUE, 
        node48 = TRUE, node49 = FALSE, node50 = FALSE, node51 = TRUE, 
        node52 = TRUE, node53 = TRUE, node54 = TRUE, node55 = TRUE, 
        node56 = TRUE))), class = "knot")