knotR: Knot Diagrams using Bezier Curves

`k9_22` <-	
structure(list(minsymvec = structure(c(handle_A1 = 14.1419416723279, 
handle_A2 = 129.877586522416, handle_A3 = 152.488689902298, handle_A4 = 170.036692700015, 
handle_A5 = 36.4549797750994, handle_A6 = -128.154662434034, 
handle_A7 = -243.796974176291, handle_A8 = -406.997535347213, 
handle_A9 = -534.34341964415, handle_A10 = -361.098560559968, 
handle_A11 = -211.8985174033, handle_A12 = -30.2859288559767, 
handle_A13 = 47.2614719809242, handle_A14 = 64.8105150216603, 
handle_A15 = -12.9099293247621, handle_A16 = -48.6087664573929, 
handle_A17 = -27.8692347942546, handle_A18 = 233.562460380258, 
handle_A19 = 304.70847748242, handle_A20 = 250.674618183431, 
handle_A21 = -52.3562966080849, handle_A22 = -64.951997055257, 
handle_A23 = -62.351536347383, handle_A24 = -47.1081083167203, 
handle_A25 = 7.63223434811817, handle_A26 = 15.5702696748209, 
handle_A27 = -3.84152770415438, handle_A28 = -161.767747534515, 
handle_A29 = -345.117908213776, handle_A30 = -400.296746758278, 
handle_A31 = -333.668918161487, handle_A32 = -209.113860727008, 
handle_A33 = 93.8855925284009, handle_A34 = -85.1998669170775, 
handle_A35 = -168.623372191762, handle_A36 = -378.192926044209, 
handle_A37 = -498.392613476485, handle_A38 = -398.379591722911, 
handle_A39 = -106.590111846403, handle_A40 = 22.3614991105311, 
handle_A41 = -130.667468989813, handle_A42 = -202.533990322389, 
handle_A43 = -111.986118765382, handle_A45 = -42.370732252838, 
handle_A46 = -98.2714783757286, handle_A47 = -179.024574325345, 
handle_A48 = -265.095126641502, handle_A49 = -348.37556045322, 
handle_A50 = -332.629962995658, handle_A51 = -88.0024461327266, 
handle_A52 = 113.110623166255, handle_A53 = 73.2698455887969, 
handle_A54 = 39.6650177369068, handle_A55 = -49.0390784973874, 
handle_A56 = -82.6030085915612, handle_A57 = -183.969023294712, 
handle_A58 = -271.201149344415, handle_A59 = -336.244517942524, 
handle_A60 = -425.06357724892, handle_A61 = -312.576266803499, 
handle_A62 = -195.975040288264, handle_A63 = 41.541787790517, 
handle_A64 = 141.034711454921, node1 = 62.0755101967, node2 = 137.161514164603, 
node3 = 159.041572004027, node4 = 135.508107698685, node5 = -30.1062508905154, 
node6 = -170.696829628884, node7 = -289.943801642025, node8 = -468.950424634543, 
node9 = -482.970994460197, node10 = -307.024451422068, node11 = -148.421073420997, 
node13 = 53.3586574799623, node14 = 39.240421770942, node15 = -32.5576267082211, 
node16 = -46.1386911237675, node17 = 65.2075509633046, node18 = 276.038371550242, 
node19 = 297.036826264654, node20 = 121.231304943411, node21 = -56.0720738088943, 
node22 = -66.5413997669646, node23 = -46.2171638539221, node24 = -27.5221912432791, 
node25 = 14.703144537464, node26 = 12.9976926740457, node27 = -55.5490363893952, 
node28 = -233.739104801407, node29 = -359.152463926868, node30 = -387.61378095631, 
node31 = -299.068162673983, node32 = -131.486925431211, node33 = 36.9952782488944, 
node34 = -111.200842836428, node35 = -246.723630067763, node36 = -425.674301348853, 
node37 = -475.161437279872, node38 = -281.251003042832, node39 = -58.2345508175279, 
node40 = -13.5725362035168, node41 = -173.821072068999, node42 = -174.641928880122, 
node43 = -71.1594963816016, node44 = -21.0701380332786, node45 = -56.6565715281195, 
node46 = -132.370632073636, node47 = -209.174315148284, node48 = -276.161322501585, 
node49 = -355.959040370877, node50 = -252.01325588037, node51 = -55.632126676508, 
node52 = 148.802058280736, node53 = 63.8387548837426, node54 = 15.4923061550244, 
node55 = -84.5647333008447, node56 = -125.728478921726, node57 = -216.164661882227, 
node58 = -280.10761135292, node59 = -371.140965529762, node60 = -399.235760291604, 
node61 = -286.061078011297, node62 = -104.746250969329, node63 = 73.5328946766665, 
node64 = 141.913532283025), class = "minsymvec"), overunderobj = structure(c(1, 
18, 6, 11, 8, 30, 27, 15, 23, 21, 4, 28, 7, 31, 10, 17, 25, 12
), .Dim = c(9L, 2L)), symobj = list(Mver = NULL, xver = 12, 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 = TRUE, handle_A2 = TRUE, handle_A3 = TRUE, 
    handle_A4 = TRUE, handle_A5 = TRUE, handle_A6 = TRUE, handle_A7 = TRUE, 
    handle_A8 = TRUE, handle_A9 = TRUE, handle_A10 = TRUE, handle_A11 = TRUE, 
    handle_A12 = TRUE, handle_A13 = TRUE, handle_A14 = TRUE, 
    handle_A15 = TRUE, handle_A16 = TRUE, handle_A17 = TRUE, 
    handle_A18 = TRUE, handle_A19 = TRUE, handle_A20 = TRUE, 
    handle_A21 = TRUE, handle_A22 = TRUE, handle_A23 = TRUE, 
    handle_A24 = TRUE, handle_A25 = TRUE, handle_A26 = TRUE, 
    handle_A27 = TRUE, handle_A28 = TRUE, handle_A29 = TRUE, 
    handle_A30 = TRUE, handle_A31 = TRUE, handle_A32 = TRUE, 
    handle_A33 = TRUE, handle_A34 = TRUE, handle_A35 = TRUE, 
    handle_A36 = TRUE, handle_A37 = TRUE, handle_A38 = TRUE, 
    handle_A39 = TRUE, handle_A40 = TRUE, handle_A41 = TRUE, 
    handle_A42 = TRUE, handle_A43 = TRUE, handle_A44 = FALSE, 
    handle_A45 = TRUE, handle_A46 = TRUE, handle_A47 = TRUE, 
    handle_A48 = TRUE, handle_A49 = TRUE, handle_A50 = TRUE, 
    handle_A51 = TRUE, handle_A52 = TRUE, handle_A53 = TRUE, 
    handle_A54 = TRUE, handle_A55 = TRUE, handle_A56 = TRUE, 
    handle_A57 = TRUE, handle_A58 = TRUE, handle_A59 = TRUE, 
    handle_A60 = TRUE, handle_A61 = TRUE, handle_A62 = TRUE, 
    handle_A63 = TRUE, handle_A64 = TRUE, node1 = TRUE, node2 = TRUE, 
    node3 = TRUE, node4 = TRUE, node5 = TRUE, node6 = TRUE, node7 = TRUE, 
    node8 = TRUE, node9 = TRUE, node10 = TRUE, node11 = TRUE, 
    node12 = FALSE, node13 = TRUE, node14 = TRUE, node15 = TRUE, 
    node16 = TRUE, node17 = TRUE, node18 = TRUE, node19 = TRUE, 
    node20 = TRUE, node21 = TRUE, node22 = TRUE, node23 = TRUE, 
    node24 = TRUE, node25 = TRUE, node26 = TRUE, node27 = TRUE, 
    node28 = TRUE, node29 = TRUE, node30 = TRUE, node31 = TRUE, 
    node32 = TRUE, node33 = TRUE, node34 = TRUE, node35 = TRUE, 
    node36 = TRUE, node37 = TRUE, node38 = TRUE, node39 = TRUE, 
    node40 = TRUE, node41 = TRUE, node42 = TRUE, node43 = TRUE, 
    node44 = TRUE, node45 = TRUE, node46 = TRUE, node47 = TRUE, 
    node48 = TRUE, node49 = TRUE, node50 = TRUE, node51 = TRUE, 
    node52 = TRUE, node53 = TRUE, node54 = TRUE, node55 = TRUE, 
    node56 = TRUE, node57 = TRUE, node58 = TRUE, node59 = TRUE, 
    node60 = TRUE, node61 = TRUE, node62 = TRUE, node63 = TRUE, 
    node64 = TRUE))), class = "knot")