Activity 4.1 - Hierarchical clustering

SUBMISSION INSTRUCTIONS

  1. Render to html
  2. Publish your html to RPubs
  3. Submit a link to your published solutions
#Loading packages needed for this assignment
library(tidyverse)
library(cluster)
library(factoextra)
library(patchwork)

Question 1

Consider three data sets below. Each data set contains three “clusters” in two dimensions. In the first, the clusters are three convex spheres. (A convex cluster is one where all points in the cluster can be connected with a straight line that does not leave the cluster.) In the second, one cluster is a sphere; one is a ring; and one is a half-moon. In the third, two clusters are spirals and one is a sphere. Our goal is to compare the performance of various hierarchical methods in clustering different cluster shapes.

getwd()
[1] "C:/Users/wi7536ul/OneDrive - Minnesota State/DSCI 415/notes"
setwd("C:/Users/wi7536ul/OneDrive - Minnesota State/DSCI 415/Notes")
three_spheres <- read.csv('Data/cluster_data1.csv')
ring_moon_sphere <- read.csv('Data/cluster_data2.csv')
two_spirals_sphere <- read.csv('Data/cluster_data3.csv')
three_spheres_scaled <- scale(three_spheres)
ring_moon_sphere_scaled <- scale(ring_moon_sphere)
two_spirals_sphere_scaled <- scale(two_spirals_sphere)
#scale data
three_spheres_scaled
                  x            y
  [1,] -1.411334052  0.805032889
  [2,] -1.127257595  1.441319079
  [3,] -1.338252155  0.378070758
  [4,] -1.018211868  0.135813907
  [5,] -0.832121890  1.314227035
  [6,] -1.060560073  0.287741076
  [7,] -1.423269150  0.301487068
  [8,] -1.318410610 -0.069372930
  [9,] -1.308836374  0.331022336
 [10,] -1.107870845  0.880431352
 [11,] -0.959095921  0.507387617
 [12,] -1.320732235  1.187631841
 [13,] -0.904145839 -0.200098151
 [14,] -1.463636086  1.820694760
 [15,] -1.159600219  0.478830024
 [16,] -1.443270595 -0.262490581
 [17,] -1.285536570  0.985090571
 [18,] -1.214477321  0.401923230
 [19,] -1.146911086  1.090064454
 [20,] -0.737357278  1.235936920
 [21,] -1.434077385  0.372288976
 [22,] -1.177641621  0.315578785
 [23,] -1.148414403  0.981379186
 [24,] -1.570104024  0.914766961
 [25,] -0.965585300  0.633124418
 [26,] -1.660606193  0.767502235
 [27,] -1.274295837  0.821214083
 [28,] -1.168515378  1.525537323
 [29,] -0.743765844  0.204100082
 [30,] -1.055675408  1.049565122
 [31,] -1.212582455  0.462076360
 [32,] -1.213084907  0.500922264
 [33,] -1.457371374  0.800179329
 [34,] -1.343987578  0.576688584
 [35,] -1.277128574 -0.546937597
 [36,] -1.230933309  0.552644568
 [37,] -1.034898904  0.432132434
 [38,] -1.030639952  0.697709318
 [39,] -1.010870725  0.780243671
 [40,] -1.409393894  0.793732674
 [41,] -1.125321394  0.657786376
 [42,] -1.080786924  0.437805876
 [43,] -0.989196688  0.141595943
 [44,] -0.928451689  0.599442908
 [45,] -1.296687421  0.508185892
 [46,] -0.795681913  0.631750513
 [47,] -1.168380373  0.316703193
 [48,] -0.949127007  1.038905553
 [49,] -1.259757602  1.336575636
 [50,] -1.229998573  0.995429002
 [51,] -1.349950449  0.108737325
 [52,] -1.492328571  0.229934556
 [53,] -1.136693738  1.249479629
 [54,] -1.065444614  0.420312294
 [55,] -1.435278649  0.991925807
 [56,] -1.139911083  1.058138586
 [57,] -1.272984539  1.063478719
 [58,] -1.193654338  1.395617496
 [59,] -1.130471748 -0.063418825
 [60,] -1.326250079  0.783662033
 [61,] -1.149694829  0.929367023
 [62,] -0.774529422  0.253398214
 [63,] -1.286210640 -0.193155004
 [64,] -1.021504525  0.085826155
 [65,] -0.762843640  1.264056988
 [66,] -1.362263182  0.326100345
 [67,] -1.139693736  0.262204566
 [68,] -1.102982696  0.393852619
 [69,] -1.387761744  0.182581255
 [70,] -1.208356446  0.652893456
 [71,] -1.434304438  0.380085869
 [72,] -1.304908432  0.425992896
 [73,] -1.224950568  0.011395061
 [74,] -0.919124515  0.670200623
 [75,] -0.933503626  0.377688983
 [76,] -1.214467871  0.112034009
 [77,] -1.175375870  0.378071541
 [78,] -1.038026634  1.010222479
 [79,] -1.525834636  0.302197316
 [80,] -1.497698027  0.376002663
 [81,] -1.311701537  0.988160993
 [82,] -1.375658062  1.130771159
 [83,] -1.484651321 -0.407079922
 [84,] -0.978065433  0.529387010
 [85,] -1.242475907  0.112858733
 [86,] -1.640657425  1.076660686
 [87,] -1.164383151  0.850416106
 [88,] -1.014346685  0.459098455
 [89,] -1.098861772  0.140854394
 [90,] -1.265844850  0.872692561
 [91,] -0.679899558  1.020280573
 [92,] -1.048489655  0.361556491
 [93,] -1.486777837  0.667180540
 [94,] -1.059538990  0.859952727
 [95,] -0.872772350  1.477486214
 [96,] -1.554952923  0.673623186
 [97,] -1.222876911  0.537936279
 [98,] -1.115395962  0.425231007
 [99,] -0.985368133  0.299560920
[100,] -1.305022013  0.937047000
[101,] -0.252000999 -0.968729051
[102,]  0.144858339 -1.567044631
[103,] -0.343154884 -1.288396899
[104,]  0.103352784 -1.934997793
[105,] -0.153720810 -1.276659043
[106,] -0.276785186 -1.365252714
[107,] -0.221847263 -0.971129745
[108,] -0.130406673 -1.205511925
[109,]  0.075499712 -1.786756833
[110,]  0.176128434 -0.805285871
[111,] -0.060680395 -0.787419745
[112,]  0.184773093 -1.571174248
[113,] -0.003591957 -1.431314280
[114,] -0.598965297 -1.263674977
[115,] -0.018092694 -1.238987184
[116,]  0.217675811 -0.594634558
[117,]  0.101955569 -1.166352434
[118,] -0.382734400 -1.613163986
[119,]  0.097004053 -1.467711695
[120,]  0.310379715 -1.609401660
[121,] -0.322003089 -1.105162315
[122,]  0.169625898 -1.108802946
[123,]  0.054021763 -1.548691553
[124,]  0.060111910 -1.618222030
[125,]  0.072418524 -1.119889862
[126,]  0.021006611 -1.354630737
[127,] -0.184547337 -1.902596024
[128,] -0.121125447 -1.053370892
[129,] -0.225281610 -1.932555926
[130,] -0.061562395 -1.331162211
[131,]  0.090079947 -1.425461689
[132,]  0.074410453 -1.334539298
[133,]  0.371545862 -1.122321978
[134,]  0.069406509 -1.875057324
[135,]  0.502342408 -2.322166405
[136,] -0.393737823 -1.273931254
[137,] -0.011929727 -1.175007936
[138,]  0.180917148 -2.174331832
[139,] -0.340554792 -0.691093569
[140,] -0.265289990 -1.616915663
[141,] -0.139862376 -0.997495684
[142,] -0.186999615 -0.891117709
[143,] -0.071294844 -0.419246027
[144,]  0.089649871 -1.370441473
[145,] -0.037077038 -1.150818580
[146,] -0.212717930 -0.487534233
[147,] -0.252181538 -1.622021731
[148,]  0.198196353 -1.320158105
[149,] -0.222582135 -1.012236547
[150,]  0.250062286 -1.375066995
[151,] -0.370411244 -1.591503281
[152,]  0.147614477 -0.928518793
[153,]  0.443362910 -1.226703183
[154,] -0.332171084 -1.072841423
[155,]  0.095000756 -1.307685426
[156,] -0.135964480 -1.303852134
[157,]  0.300263111 -0.794556394
[158,]  0.639715203 -0.406912162
[159,] -0.027601187 -1.427406553
[160,] -0.226603801 -1.231538968
[161,] -0.522471189 -0.881428858
[162,] -0.416212875 -1.532887118
[163,] -0.100512523 -1.533617295
[164,] -0.282766415 -1.864571263
[165,]  0.119623318 -1.198932187
[166,]  0.479155857 -2.141936495
[167,]  0.419649882 -0.580424802
[168,] -0.108382824 -1.979670925
[169,]  0.031469582 -0.674620483
[170,] -0.202292564 -0.656673276
[171,] -0.007553065 -1.716269172
[172,]  0.143240290 -0.822512317
[173,] -0.089287238 -1.337411976
[174,]  0.357221789 -1.970531025
[175,] -0.158483826 -0.876328021
[176,] -0.107808147 -1.909868330
[177,] -0.034709542 -0.880202025
[178,]  0.262720503 -1.235676612
[179,] -0.089241811 -1.515715747
[180,] -0.169402820 -1.343961028
[181,] -0.302366518 -0.639275109
[182,]  0.257644809 -1.150420111
[183,] -0.099387392 -1.005148541
[184,]  0.413508078 -1.052597478
[185,]  0.119178280 -0.734289926
[186,] -0.186772512 -1.349168040
[187,]  0.386155959 -0.820885204
[188,] -0.102647302 -0.894348159
[189,]  0.065899531 -1.482424777
[190,]  0.193202318 -1.559690403
[191,]  0.316140879 -1.416040997
[192,] -0.076597243 -1.521457315
[193,]  0.330787690 -0.923502217
[194,]  0.182303195 -1.538317800
[195,]  0.349922549 -1.215419621
[196,] -0.023460214 -0.787265273
[197,] -0.231642828 -1.430270514
[198,] -0.062664983 -0.889113799
[199,]  0.406150959 -2.229077798
[200,] -0.223173283 -1.657654775
[201,]  1.007631829  0.219343929
[202,]  1.198731664  0.578656578
[203,]  0.614601122  0.704806258
[204,]  1.261798246  0.464081734
[205,]  1.177115191  0.891151414
[206,]  1.605950469  1.613361738
[207,]  1.294270880  0.805669074
[208,]  1.045808260  0.221639559
[209,]  0.913102817  0.293109773
[210,]  1.044056920 -0.169906184
[211,]  1.145240937  0.274159648
[212,]  1.315436232  0.904016983
[213,]  1.310155624  0.470787822
[214,]  1.038682681  0.898286994
[215,]  1.059676358  0.910460842
[216,]  1.641968636  1.002385986
[217,]  1.471561806  0.639679018
[218,]  1.103185765  0.978989575
[219,]  1.181321855  0.328557571
[220,]  1.227193177  0.905481741
[221,]  0.745108226  0.940911997
[222,]  1.158123130  0.598872214
[223,]  1.253634106  0.431784449
[224,]  0.881587734  0.796582968
[225,]  1.172216106  0.639182304
[226,]  1.644792489  1.103989707
[227,]  1.142013453  1.216358995
[228,]  1.289972940  0.489368699
[229,]  1.571771595  0.725985755
[230,]  1.293379349  0.112039644
[231,]  0.817010004  0.216391891
[232,]  1.348564113  1.400400468
[233,]  1.244766754  0.374068331
[234,]  1.409756572  0.318862829
[235,]  0.969866291  0.611274002
[236,]  0.983717514  0.423892868
[237,]  1.157724604  0.802097782
[238,]  1.283345051  0.844359091
[239,]  1.465806637  1.102689195
[240,]  1.194812161  1.261467584
[241,]  1.054850646  0.715311853
[242,]  0.970821603 -0.026027598
[243,]  1.116015710  0.590801799
[244,]  1.355150936  0.476861680
[245,]  1.391340084  0.905425959
[246,]  1.309577029  0.889800916
[247,]  0.925198552 -0.023888055
[248,]  1.489590299  0.838573509
[249,]  1.333541031  0.338378634
[250,]  1.409121590  0.696612651
[251,]  1.289351172  1.008402587
[252,]  1.168281721  0.704377989
[253,]  1.479188160  0.300078481
[254,]  1.384324710  1.026572842
[255,]  1.221590442  0.147970731
[256,]  1.170107228  0.535392100
[257,]  1.236911810  0.639172274
[258,]  0.905783809  0.084234680
[259,]  1.250517108  0.392236396
[260,]  1.236998153  0.851264341
[261,]  0.997657837  1.002874851
[262,]  0.345776532  0.635943069
[263,]  0.946780707  0.720191962
[264,]  1.501588421  0.472869936
[265,]  0.872904138  1.166638578
[266,]  0.740354056  1.343485457
[267,]  0.902563416  1.775666581
[268,]  1.484517618  0.592374875
[269,]  1.493350966  0.151900108
[270,]  1.329263874  0.618014693
[271,]  0.887249076 -0.029790788
[272,]  0.997679698  1.070510282
[273,]  1.520720520  0.992410431
[274,]  1.308163413  1.449703520
[275,]  1.349584953  0.304817165
[276,]  1.001356752  1.046770967
[277,]  1.331810664  1.732025420
[278,]  0.839206393  0.381771173
[279,]  1.144347501  0.650505835
[280,]  1.529586427  0.600955159
[281,]  1.680315705  0.814657494
[282,]  1.054157460  1.537768370
[283,]  1.213312168  0.657211564
[284,]  1.075201948  0.340567793
[285,]  1.367064974  0.837915855
[286,]  0.855138223  0.605091142
[287,]  1.516783738  0.569582586
[288,]  1.300136350  0.426842834
[289,]  1.536339452  0.402040991
[290,]  1.689460306  0.413954848
[291,]  1.098995359  0.308433873
[292,]  1.067691672  1.025685731
[293,]  0.956178271  0.768165796
[294,]  0.967785831  1.493028680
[295,]  1.281162938  0.152935840
[296,]  1.320755400  0.497173988
[297,]  0.516491265  0.141958597
[298,]  1.132294050  0.660774757
[299,]  1.078624692 -0.005884354
[300,]  1.228482493  0.320439966
attr(,"scaled:center")
       x        y 
1.999322 3.673370 
attr(,"scaled:scale")
        x         y 
0.8404729 0.5111479 
ring_moon_sphere_scaled
                   x             y
  [1,] -0.0820430376  0.3524628761
  [2,] -1.0362391860  0.3347140326
  [3,] -0.3780018454  0.7331806618
  [4,] -0.3144549278  0.7215695800
  [5,] -0.7164977140  0.9166999991
  [6,] -0.7340515883  0.7728938063
  [7,] -0.0201078204  0.1102329545
  [8,] -0.1697089677  0.6045398567
  [9,] -0.7548899323  0.7972152996
 [10,] -0.7962178792  0.7714065086
 [11,] -0.6581908489  0.8519788552
 [12,] -0.5326493805  0.8368526410
 [13,] -0.6539402617  0.7369631364
 [14,] -0.7087296219  0.7973564793
 [15,] -1.1273964770  0.1071425174
 [16,] -1.1036722962  0.2971230754
 [17,] -0.0735640436  0.0897845054
 [18,] -0.9444282787  0.6279114364
 [19,] -1.1257409841  0.0864163852
 [20,] -0.1652378955  0.6527438023
 [21,] -0.1122175298  0.4149469137
 [22,] -0.0170305242 -0.2355802365
 [23,] -0.0462259422  0.1364840209
 [24,]  0.0515315797  0.0610744398
 [25,] -0.1228048202  0.5159922851
 [26,] -1.0676106419  0.5443796104
 [27,] -0.6690496762  0.8517367832
 [28,] -1.1139660796  0.0846610469
 [29,] -0.6512052120  0.8431183005
 [30,] -0.9553379365  0.5015976902
 [31,] -0.3420393808  0.8207845539
 [32,] -0.3366306947  0.8882344706
 [33,] -0.0906526325  0.3435839284
 [34,] -0.5184707758  0.9299725642
 [35,] -0.0904549584  0.6449023629
 [36,] -0.2970058684  0.6868591278
 [37,] -1.0897897370  0.1043331186
 [38,] -0.0656980557  0.3765139809
 [39,] -0.6628115110  0.8447786576
 [40,] -0.0464738609  0.4035303376
 [41,] -0.1738547389  0.5676346572
 [42,] -0.9886095873  0.5282533032
 [43,] -0.0972970065  0.2833865118
 [44,] -0.6752321740  0.8122615094
 [45,] -0.3831282906  0.7859403391
 [46,] -0.1682080165  0.6094567216
 [47,]  0.0011709216 -0.0849692205
 [48,] -0.0036831821  0.1146267372
 [49,] -0.2587552822  0.6592772813
 [50,] -1.0549020459  0.3992015247
 [51,] -0.0914309632  0.4104313785
 [52,] -0.0431582449  0.3688730498
 [53,] -1.1583481357  0.1805332980
 [54,] -1.1981602978 -0.1327919815
 [55,] -1.1130959827  0.2099718988
 [56,] -1.1189161478  0.0493714841
 [57,] -0.5389283134  0.8166917252
 [58,] -0.1080841240  0.5186931076
 [59,] -0.0196338403  0.2876259643
 [60,] -0.2044995741  0.5458547562
 [61,] -1.0724018409  0.3837869621
 [62,] -0.0282640880 -0.0507756812
 [63,] -1.0226135699  0.3741482135
 [64,]  0.0521515557  0.1209589477
 [65,] -1.0130943028  0.4709543632
 [66,] -0.2683656936  0.6612843506
 [67,] -1.0238359707  0.5131998318
 [68,] -0.6212656732  0.9113206622
 [69,] -0.2976707068  0.6835871486
 [70,]  0.0738273967  0.1167015655
 [71,] -1.0325020177  0.4606942678
 [72,] -0.9920030174  0.4261958291
 [73,] -1.1303405343 -0.0682229615
 [74,] -1.1850733174 -0.0887329004
 [75,] -0.6131552399  0.9874943299
 [76,] -0.6953940832  0.8443104789
 [77,] -0.0476332543  0.2027825532
 [78,] -0.0247599312  0.3231512218
 [79,] -1.0724432478  0.3810594956
 [80,] -0.9946933776  0.5897582859
 [81,] -0.9791085925  0.3801522800
 [82,] -0.8876997904  0.7281568155
 [83,] -0.3011169783  0.7930654723
 [84,] -0.0239197485 -0.0449656262
 [85,] -1.1802824087 -0.0922211294
 [86,] -1.0881732809  0.3179405153
 [87,] -0.1335878685  0.4662456438
 [88,] -0.5310870402  0.8323042249
 [89,] -0.8231475157  0.7195294172
 [90,] -1.1121864059  0.1393262985
 [91,]  0.0014913829 -0.1784744355
 [92,] -0.1647106270  0.5524109434
 [93,] -0.3948329680  0.8741868168
 [94,] -1.0267863428  0.4086571879
 [95,] -1.0918478761  0.2448169350
 [96,] -0.1470041778  0.5777693181
 [97,] -0.2093206665  0.6951782790
 [98,] -0.2590223028  0.5975649722
 [99,] -0.0560276896  0.3540860479
[100,] -0.8957063366  0.7968987821
[101,] -0.9289801922  0.4290022482
[102,] -0.8917632648  0.7433616679
[103,] -0.1053418057  0.3910336978
[104,] -0.8991124102  0.4983172224
[105,] -0.7386296082  0.7293451960
[106,] -0.3198273640  0.7181287719
[107,]  0.0062925067 -0.0205840212
[108,] -0.3760132877  0.8559350778
[109,] -0.0473919263  0.0663479489
[110,] -0.2612451530  0.7268987765
[111,] -0.2672212143  0.6671787688
[112,] -0.0269660701  0.1089068541
[113,] -0.0710592963  0.2168840700
[114,] -0.0329603818  0.1822553634
[115,] -1.1394508364  0.0313872868
[116,] -0.9213527617  0.7336025065
[117,] -1.0231638621  0.1992201713
[118,] -0.8478822783  0.7108879779
[119,] -0.0726445915  0.5531906052
[120,] -0.4676104980  0.8280474713
[121,] -0.9150772908  0.6598160210
[122,] -1.0715530723  0.2552645095
[123,] -1.0473705469  0.2776409906
[124,] -0.0777588597  0.3455116621
[125,] -0.6743992309  0.7976648848
[126,] -0.4532967789  0.7113921465
[127,] -0.7709570986  0.6848449613
[128,] -0.4159184038  0.8267030858
[129,] -1.1331175924  0.1668767397
[130,] -0.1978778592  0.6961177385
[131,] -0.2284072859  0.6874494540
[132,] -0.6078933934  0.8206999955
[133,] -0.2958869833  0.7298985134
[134,] -0.1184345057  0.4361789969
[135,] -1.1333054456  0.2454631893
[136,] -0.5845034458  0.8555317414
[137,]  0.0143669719  0.0286734614
[138,] -0.0285353939  0.1114274683
[139,] -0.7142214255  0.7733584352
[140,] -0.6257091983  0.8522260132
[141,] -0.5711808249  0.7389931525
[142,] -0.2662108615  0.7370445607
[143,] -0.8773851164  0.7052123882
[144,] -1.0938625901  0.2549736365
[145,] -1.0508936145  0.3643959515
[146,] -0.1630558988  0.5514306208
[147,] -0.7600462690  0.8027689889
[148,] -1.0818617586  0.2765601803
[149,] -0.6945927727  0.8345080881
[150,] -0.1110640576  0.3661234321
[151,] -0.9917278888  0.5386675337
[152,] -0.0157743356  0.2080487420
[153,] -1.1093509239  0.1225065790
[154,] -0.2085031131  0.6740612412
[155,] -0.8564032530  0.7084401288
[156,] -0.1680474694  0.5657321250
[157,] -0.0595303242  0.2765709939
[158,] -0.0772992721  0.0307942280
[159,] -0.4377413952  0.8484612266
[160,]  0.0632655827 -0.1677281393
[161,] -1.1815109192 -0.1176256130
[162,] -0.5313366390  0.8431531493
[163,] -0.3141627292  0.7531388718
[164,] -1.0693364029  0.1401627826
[165,] -1.0107616837  0.4978372753
[166,] -0.9719583391  0.4514570649
[167,] -1.1335692568  0.1857038010
[168,] -0.0915463243  0.3884142281
[169,] -1.0134288956  0.4465261710
[170,] -0.6140932176  0.8467923772
[171,] -0.5517958553  0.9166724735
[172,] -0.0285512912  0.1404581967
[173,] -0.6866529757  0.7561887920
[174,] -1.1300803693  0.1097770769
[175,] -0.0551146373  0.4522686515
[176,] -0.6576454946  0.8381249848
[177,] -0.8414150115  0.7215617631
[178,] -1.0439396955  0.4399245975
[179,] -0.0900033669  0.3094317694
[180,] -0.7270106691  0.7762123955
[181,]  0.0148780981  0.4366757964
[182,] -0.2680657423  0.7071164408
[183,] -0.0476983218  0.3114191048
[184,] -0.0049285593  0.0144546613
[185,] -0.1872096193  0.4891426950
[186,] -0.2784955094  0.6171354855
[187,] -1.0716482608  0.2659279522
[188,] -0.0013806373  0.1296279812
[189,] -0.3618800267  0.8313248817
[190,] -0.2848599836  0.6784068671
[191,] -0.5188584425  0.7354859688
[192,] -1.0904861407  0.2150744657
[193,] -0.2698045985  0.6592668815
[194,] -0.6568754521  0.8669508325
[195,] -0.9173749402  0.5984731585
[196,] -0.3952344066  0.8028575699
[197,] -1.0375878858  0.2503529763
[198,] -1.1362015254  0.0909690582
[199,] -0.4121222477  0.8839419431
[200,] -0.1288136212  0.6185239204
[201,] -0.9493415467  0.5199701551
[202,] -1.1243874075  0.2240336778
[203,] -0.2962436309  0.7792323159
[204,] -0.5478534109  0.9177914557
[205,] -1.1233147259  0.2548057923
[206,] -0.4190416545  0.7655245422
[207,] -0.9619635275  0.6590695657
[208,] -0.8702633249  0.6623698505
[209,] -1.1107627402  0.2016031897
[210,]  0.0369626207 -0.1234480360
[211,] -0.9063319916  0.6185809128
[212,] -0.5170139800  0.7761564311
[213,] -0.6650191894  0.7365546407
[214,] -0.0914330151  0.4026773521
[215,]  0.0008978103 -0.1246212024
[216,] -1.1539697677 -0.2090707787
[217,] -0.0753289861  0.4383218379
[218,]  0.0104900347  0.1270547620
[219,] -0.8770309126  0.6404982927
[220,] -0.9524478922  0.5317664769
[221,] -0.2524465026  0.6750549424
[222,] -1.0416097104  0.3913293086
[223,] -0.3228242735  0.7464219823
[224,] -0.7217832501  0.7764105443
[225,] -0.2801649831  0.7862524574
[226,] -1.0065186820  0.5835335747
[227,] -1.1419873897 -0.0602207991
[228,]  0.0108092680 -0.0586965316
[229,] -0.1202834056  0.5766757219
[230,] -0.3143741184  0.6721129538
[231,] -0.2567878799  0.6300946463
[232,] -0.4722242675  0.7067879683
[233,] -0.5320814340  0.8189278190
[234,] -0.7663734206  0.8105165728
[235,] -0.7082483846  0.8586506328
[236,] -1.0998064583  0.1027559135
[237,] -0.6902534159  0.8020754970
[238,] -0.2993386988  0.7237281916
[239,] -0.5607690473  0.9041412262
[240,] -0.7078241699  0.7134062493
[241,]  0.0690369464 -0.0586927683
[242,] -0.9745301156  0.5499684079
[243,] -0.8089772567  0.8006040211
[244,]  0.0667073061 -0.0741566635
[245,] -0.9118750127  0.6649421960
[246,] -0.2584410541  0.6944517629
[247,] -0.2577886628  0.7492887791
[248,] -1.1715420118 -0.2239730268
[249,] -0.9852001750  0.5166407983
[250,] -0.9289202335  0.6574921441
[251,] -0.2388841541 -2.3069775268
[252,]  0.5263820800 -0.4676482808
[253,] -0.9190418159 -2.4605216911
[254,]  0.3239774266 -1.9673613554
[255,]  0.5179591314 -0.9657403319
[256,]  0.1061820544  1.3592905940
[257,] -1.6767010291  0.2426831453
[258,] -1.3300187359 -1.8255218160
[259,] -0.9602939819  1.6477148698
[260,] -1.3182301562 -2.0270632648
[261,]  0.5692852757 -0.0427171229
[262,] -1.7684007878  0.2981616808
[263,] -0.6143348169  2.0957551496
[264,] -0.8987615605 -2.4934877152
[265,] -1.7081690313 -0.3002067941
[266,] -1.3517670918  1.2158519387
[267,] -1.7177379568  0.3454738773
[268,] -0.9255077799  1.8987595258
[269,]  0.6007603962  0.1956322819
[270,]  0.5470605397 -0.8770088128
[271,] -1.6799327186  0.3169083588
[272,] -0.9513648631  1.9416607826
[273,] -1.3170503886  1.4190110179
[274,] -1.7830033323  0.2875118191
[275,] -1.7541671391 -0.9240287602
[276,] -1.5194595043  0.9870822355
[277,] -0.8986526696 -2.5946914909
[278,] -1.2983511699 -1.8117247207
[279,] -1.6210228308  0.7344967317
[280,]  0.5662423741 -0.0709131455
[281,]  0.6408122715 -0.6828198748
[282,] -1.6036342468 -1.3343147819
[283,] -1.4461066022 -1.8913387381
[284,] -1.6375265764  1.0180944499
[285,] -0.8014311161 -2.4886260317
[286,] -1.7585918330  0.2360732846
[287,]  0.5555404290  0.8633836293
[288,] -1.5198501028 -1.4919536287
[289,] -1.0547166651  1.6203133215
[290,] -1.4790554554 -1.5392733330
[291,] -0.9994219503  1.8342645667
[292,] -0.2824344646 -2.3861286891
[293,]  0.2367368106 -2.0848211449
[294,] -1.4000007437  1.4924809484
[295,]  0.1557849530  1.6184145387
[296,] -1.2820535173  1.3024495733
[297,] -0.1095315916  1.8093730701
[298,] -0.8437015451  2.0398397231
[299,]  0.0141609051 -1.7727749590
[300,]  0.4042404213 -1.2132148590
[301,]  0.5394818390  0.7134229023
[302,] -1.3072750391  1.6231390815
[303,] -0.8392918956 -2.2818499891
[304,] -1.0481866749 -2.3151827169
[305,]  0.1209927741  1.5000338361
[306,]  0.3740832911  1.0297258938
[307,] -1.6579515446 -0.7369145129
[308,] -0.8218815232 -2.6060712416
[309,] -1.6299022785  0.6143723393
[310,] -1.7372259455 -0.3759309308
[311,] -1.0248328835  1.7153574473
[312,]  0.0634079731  1.4121997505
[313,] -1.7301273560 -0.8524945470
[314,] -1.6842434398  0.1425234393
[315,]  0.1438155972  1.5340781710
[316,]  0.5095321579 -1.3756994332
[317,] -1.1565636056 -2.1875792823
[318,] -1.6892455542 -0.7196456500
[319,]  0.4194019762 -1.0688231268
[320,] -0.4911454902 -2.5610921399
[321,] -1.4537217504  1.1845596747
[322,] -1.0409939881 -2.2921190605
[323,] -0.0779810415 -2.3271856655
[324,] -1.6974680508 -0.5684120246
[325,]  0.3197453340  1.2880006790
[326,]  0.4935874428 -0.7223955031
[327,]  0.4882874461  0.2867835434
[328,]  0.1603492189  1.5055615301
[329,] -0.2085434341  1.5202760474
[330,]  0.3450003470 -1.4728224806
[331,] -0.4441090896 -2.2088181263
[332,]  0.6399820306 -0.5853293035
[333,] -0.3953307621 -2.6912012594
[334,]  0.6634076131 -0.6039670707
[335,]  0.5943289690  0.4115515205
[336,] -1.6599733608 -0.2876228655
[337,] -1.5800423015 -0.9108575709
[338,] -1.2325224637  1.2654425131
[339,] -1.5780153311  0.5143787626
[340,]  0.3863268223 -1.3177787040
[341,]  0.4411645208  0.6134937052
[342,] -1.7416174300 -1.0042540428
[343,] -0.9161167324 -2.4412506793
[344,] -0.2766657615 -2.2679842728
[345,] -1.1325638712  1.4802531398
[346,] -1.6051099832  0.6217725790
[347,] -1.6963220384  0.7782685648
[348,] -0.1865304795  1.8027427468
[349,]  0.5417941766  0.1814826269
[350,] -1.1654374695 -2.2079367955
[351,]  0.1551880292 -2.1331399462
[352,]  0.0878763944 -2.0797951123
[353,] -0.8675761142 -2.3574458946
[354,] -1.6294876707 -1.3052774531
[355,] -1.5187382504 -1.3257907931
[356,] -1.3529701590 -2.0755961955
[357,] -1.1513455185  1.5572236866
[358,] -1.7646554866  0.1294707543
[359,] -1.1785028955  1.3739263083
[360,] -1.1369433412 -2.0335155963
[361,] -1.5169619852 -1.4023921513
[362,] -0.2735034174  1.8378202151
[363,] -0.7313365892  1.9067235701
[364,]  0.3983884884  0.8479253536
[365,] -0.8551630181 -2.3212791079
[366,] -0.5867335149 -2.5678496171
[367,] -0.0261043901 -2.3578274808
[368,]  0.5812579814 -0.9997983141
[369,]  0.4152766694 -1.4074409434
[370,] -1.6572774197 -0.2470274069
[371,] -0.3809126465  1.9600947296
[372,] -0.1707791390 -2.2374864607
[373,] -1.7154435525 -0.2410993501
[374,] -0.7809331152 -2.2713554765
[375,] -1.7520842637 -0.9828679273
[376,]  0.0301075753 -2.3685287960
[377,] -0.0374220869  1.6457164786
[378,] -1.7381125852 -0.7599218697
[379,] -0.8088634652 -2.4242511144
[380,]  0.5114862731 -0.5697234753
[381,] -1.3977449572 -1.9676898938
[382,] -1.4971834895  0.9869673827
[383,] -0.1370204555  1.7537258316
[384,] -0.0848140187  1.7674682518
[385,] -0.2290394784  1.9701361207
[386,] -1.7191820059 -0.4817492712
[387,] -1.0522737166 -2.4521190567
[388,] -0.5113312003  1.8772055411
[389,] -0.8146472825 -2.3909090149
[390,] -1.4839619355  1.1889439961
[391,]  0.4654376700 -1.3264191188
[392,] -1.3821391394  1.2394046949
[393,] -1.6215869320 -0.5080529099
[394,]  0.1932782945  1.5000149343
[395,] -0.7213315014  1.8412620848
[396,] -1.5021247462  0.7371660121
[397,] -1.4459969124 -1.7413081291
[398,] -0.2155550921  1.8519210311
[399,]  0.2012522575 -2.1045712547
[400,] -1.0379554757 -2.4401092410
[401,] -1.5384410329  0.5684782965
[402,] -1.2753768274 -2.0595112084
[403,] -0.6657770841  1.9057691670
[404,] -1.0380251064 -2.4788612424
[405,] -0.8960538721 -2.4243012105
[406,] -1.4688653316  1.1490158041
[407,]  0.2135843174 -1.9563558759
[408,] -0.6752105170  2.0029495847
[409,] -0.9973507641  1.8184393526
[410,] -1.0850413801 -2.2780249253
[411,] -1.1804548004 -2.2177782970
[412,]  0.4314421672  1.0663016299
[413,]  0.1510913182  1.4976271116
[414,]  0.3635450156 -1.2010015258
[415,] -0.7132045206  1.9888500861
[416,] -0.5656835863 -2.5159990105
[417,] -0.2858135948 -2.3136093664
[418,]  0.3965312023  1.2027198051
[419,] -1.6013521147 -0.0809920782
[420,] -1.7230350941 -0.8953867896
[421,] -1.6775894904  0.0774727552
[422,]  0.4155083525 -1.5853615483
[423,] -1.2055583665 -1.9498570720
[424,] -1.5908274688 -1.4006253178
[425,]  0.5020864798  0.9601091878
[426,] -1.2018076759 -2.2644279823
[427,]  0.4272710938  0.7976860522
[428,]  0.5282317730  0.7543633114
[429,] -1.7335500720 -0.9899439610
[430,]  0.3716422294 -1.6021436976
[431,]  0.3531701893 -1.9770927608
[432,] -1.0036078932  1.9248323278
[433,] -1.4251148466  0.9321410979
[434,] -0.6772072425  1.9908845338
[435,] -1.2803913275  1.3550384072
[436,] -1.2266062586 -2.3241069164
[437,]  0.5089542586  0.1205213443
[438,]  0.6153312036  0.1617057087
[439,]  0.5775014938  0.3813859986
[440,]  0.0624051828  1.5196572987
[441,] -1.5286688299  1.1188850878
[442,] -0.8455683641  1.8509391863
[443,]  0.6434059453  0.1531763751
[444,] -0.8230502086  1.9613349244
[445,] -1.5686378610  0.9152325044
[446,] -0.5374785849  1.9848787659
[447,]  0.6353010135 -0.9906934822
[448,] -0.7122764181  1.7462975566
[449,] -1.7238388967  0.7241747571
[450,] -1.7703494706  0.2795094974
[451,] -0.2592451070 -2.4651607207
[452,] -1.3795012454  1.5618773562
[453,]  0.0346198453  1.6305446096
[454,] -1.6652934087 -0.0710003053
[455,]  0.5499230348  0.1268232348
[456,] -1.7190358928 -0.1683652005
[457,]  0.5998202411 -0.8722224902
[458,] -0.7050267312  1.9454368667
[459,]  0.3368851489 -1.5059081424
[460,] -0.2056592537  1.9532485193
[461,]  0.2768697026 -2.0084399893
[462,]  0.6680552379  0.1546513588
[463,]  0.0552641859  1.5578214152
[464,]  0.1569719825 -2.0926340081
[465,] -0.9377988067 -2.2128078359
[466,] -0.1333785600  1.8487789021
[467,] -0.4335404045  1.9356605115
[468,]  0.0590471748  1.7121724904
[469,] -0.9641855415 -2.2562295071
[470,] -1.4616558760 -1.5240957676
[471,] -1.6223204770 -1.0379334845
[472,] -1.0174910189  1.8053217630
[473,]  0.4483158386  0.4496661894
[474,] -1.1688817451  1.7108056547
[475,] -0.3718238193  1.9748053691
[476,] -1.7249230632  0.6754789414
[477,]  0.5514796926 -0.1473404065
[478,]  0.6389662882 -0.3956844227
[479,]  0.0055799546 -2.3558891547
[480,] -0.5143168469  2.0743055126
[481,] -1.5667566687 -1.2827313744
[482,] -0.4495567048  1.9473679212
[483,] -0.1748749279 -2.3831700451
[484,] -0.4740741898  1.9902717137
[485,] -0.8305740295  2.0693182009
[486,] -0.7386294828 -2.5302763096
[487,]  0.2954254939 -1.7068562153
[488,] -0.9712965903 -2.4157207463
[489,]  0.5783715659 -0.8730409354
[490,]  0.6456206030  0.4953204189
[491,] -1.6471723588 -0.0494412256
[492,]  0.5523205371 -1.0054603046
[493,] -0.4351160847 -2.4707310616
[494,] -1.0673843679  1.7693788704
[495,] -1.8201190425  0.0925203473
[496,] -1.5765502885 -1.0676047858
[497,]  0.3261014172 -1.5830297418
[498,] -0.3163760080 -2.5358433456
[499,] -0.3951305804  2.0159814945
[500,] -1.6921532234 -0.4682589012
[501,]  1.1832049991 -0.1721578847
[502,]  1.2815793385 -0.2168870069
[503,]  1.3288021687 -0.5026066398
[504,]  1.1659367709 -0.1102051427
[505,]  1.1176575953 -0.0422921893
[506,]  1.2943394419 -0.1009730903
[507,]  1.2014561264 -0.6097770425
[508,]  1.0639947888 -0.3433177226
[509,]  1.2420752250 -0.2540418567
[510,]  1.4418957920  0.1952570385
[511,]  1.1987360783 -0.2240044205
[512,]  1.1086747601 -0.3523930220
[513,]  1.0672879976 -0.2300445717
[514,]  1.2962265916 -0.3296503143
[515,]  1.1850409441 -0.0890002403
[516,]  1.1634508619 -0.1302200074
[517,]  1.0866363090  0.0155401552
[518,]  1.1518273107 -0.5609018284
[519,]  1.1902566841 -0.1905645862
[520,]  1.1877089007 -0.3238329328
[521,]  1.2022722951 -0.3769415281
[522,]  1.0813560087 -0.4773505475
[523,]  1.2382081706 -0.0003089451
[524,]  1.0732120566 -0.5725218013
[525,]  1.1929086008 -0.4064726941
[526,]  1.0194663461 -0.0297706332
[527,]  0.9583235158  0.1284023205
[528,]  1.0956908822 -0.0800870767
[529,]  1.1086902323 -0.0773510512
[530,]  0.9657380518 -0.6135180879
[531,]  0.9508668851  0.0693048695
[532,]  1.3807907087 -0.4677188201
[533,]  1.2603412979 -0.1124079191
[534,]  1.0953731822 -0.0572361143
[535,]  1.3206019094 -0.5027578592
[536,]  1.1634229393 -0.1936943723
[537,]  1.2628580713 -0.2320952688
[538,]  1.2458213145 -0.0880029720
[539,]  1.2571291786 -0.1139004715
[540,]  1.2209912280 -0.3884336884
[541,]  1.0509306003 -0.4918439811
[542,]  1.0885262929  0.0839090873
[543,]  1.0546147759 -0.5723460247
[544,]  1.3718411090 -0.1051705441
[545,]  1.1580653056 -0.1157680506
[546,]  1.1866865364 -0.3918408837
[547,]  1.1895614631 -0.1844292511
[548,]  1.1857862833 -0.0672547389
[549,]  1.1172611825 -0.4278591509
[550,]  1.1957118965 -0.4946677184
[551,]  1.2588199015 -0.5969026855
[552,]  1.2090159307 -0.5371445039
[553,]  1.3898029119 -0.1821912353
[554,]  1.3358739428  0.2730985291
[555,]  1.2125099404  0.2292175620
[556,]  1.1243282326 -0.3948276354
[557,]  1.1647503249 -0.1683136255
[558,]  1.0588539761 -0.0250633112
[559,]  1.3184860670 -0.2152370590
[560,]  1.2367067478 -0.2436330351
[561,]  1.1112988760 -0.2692890179
[562,]  1.2402391220 -0.1252631871
[563,]  1.1622324306 -0.0080344757
[564,]  1.2235797731 -0.1410214923
[565,]  1.1111382805 -0.3396394638
[566,]  1.2583124444 -0.5897253775
[567,]  1.3235027292 -0.2122184384
[568,]  1.2089903743 -0.4541400867
[569,]  1.0347642207 -0.4206461749
[570,]  0.9954603292 -0.1849057454
[571,]  1.3388986225  0.0278159759
[572,]  1.1783454047 -0.2078218265
[573,]  1.1266466440 -0.4287361557
[574,]  1.3436014428 -0.2428917276
[575,]  1.1690262495  0.0797760046
[576,]  1.2428629675 -0.0600333837
[577,]  1.2688109524 -0.0753934151
[578,]  1.2558702898 -0.5749489018
[579,]  1.1814909891 -0.3594176477
[580,]  1.1428283860  0.0785854707
[581,]  0.9530783808 -0.1051543414
[582,]  1.1384630159 -0.6484972044
[583,]  1.2485371432 -0.4570276229
[584,]  1.0821976723 -0.3028549060
[585,]  1.3550606949 -0.4902187502
[586,]  1.2285971314 -0.0868056983
[587,]  1.2970265039 -0.4142380888
[588,]  1.1341706923 -0.0431224442
[589,]  1.1062394545 -0.2596349164
[590,]  1.1284522491 -0.3886406810
[591,]  1.2244883959 -0.3999948974
[592,]  1.1095890653 -0.3341159208
[593,]  0.9265534862 -0.2722431291
[594,]  1.2263886549 -0.0971123463
[595,]  1.1026539263 -0.6652323411
[596,]  1.2132885504 -0.0074744508
[597,]  1.1816375715 -0.1058713559
[598,]  1.3326837995 -0.1608001803
[599,]  1.3032897828 -0.6087546331
[600,]  1.3729369311 -0.4309185832
[601,]  1.1816955768 -0.4917484379
[602,]  1.2633410918 -0.1003756788
[603,]  1.0741733068  0.1657460967
[604,]  1.2073382904 -0.5786241902
[605,]  1.1428362981 -0.3015931700
[606,]  1.1418324035 -0.0433802939
[607,]  1.2934773373 -0.1270047254
[608,]  0.9969441540 -0.4885012675
[609,]  1.2180281061  0.0698013940
[610,]  1.4317755838 -0.5727254590
[611,]  1.2374417271 -0.4195996110
[612,]  1.1592834251 -0.0193839646
[613,]  1.0484256804 -0.0942268694
[614,]  1.0803128316 -0.4519603716
[615,]  1.1289178202 -0.2568546573
[616,]  1.2708126349  0.0293476577
[617,]  1.3452803149 -0.2265253847
[618,]  1.2230134887 -0.3146883439
[619,]  1.3248050700 -0.1615089002
[620,]  1.3354164581 -0.1418814887
[621,]  1.2751087038 -0.7946017645
[622,]  1.3186206659 -0.4438324998
[623,]  1.3711976335 -0.1683908951
[624,]  0.9759443796  0.1431455234
[625,]  1.1962111364 -0.1428762112
[626,]  0.9395978013 -0.1875193834
[627,]  1.2168708755 -0.1254252106
[628,]  1.1214291973 -0.2998648878
[629,]  1.1825600858 -0.3042290607
[630,]  1.0673314800 -0.0277697213
[631,]  1.1273231480 -0.1904637808
[632,]  1.2026344075 -0.4009945724
[633,]  1.3518199945 -0.2287256100
[634,]  1.2432496546 -0.1202635323
[635,]  0.9483680984 -0.0831094427
[636,]  1.1554077858 -0.3281329860
[637,]  1.0211234473  0.1052608712
[638,]  1.3448793118 -0.3224954565
[639,]  1.3636774225 -0.5739120210
[640,]  1.3684032889 -0.1523517011
[641,]  1.1847118347 -0.0016612660
[642,]  1.2076400406 -0.6867057705
[643,]  1.3097042921 -0.2886695952
[644,]  1.1801986726 -0.7141939515
[645,]  1.4348950636 -0.4773238411
[646,]  1.1970302955 -0.2273992058
[647,]  1.3279982554 -0.5404171561
[648,]  1.2609055039 -0.4570055359
[649,]  1.1536214930 -0.5435597603
[650,]  1.1825021395 -0.2839536897
[651,]  0.9982911513 -0.7636591251
[652,]  1.1986352010 -0.0979499982
[653,]  1.2128036742 -0.5087644567
[654,]  1.1143538690 -0.3302073473
[655,]  1.0900093309 -0.1495718900
[656,]  1.1840416189 -0.5006439444
[657,]  1.1953069571  0.1045435108
[658,]  1.3709609945 -0.2985797572
[659,]  1.2448039034  0.1744974755
[660,]  1.1253965183 -0.4123366952
[661,]  1.1018575547 -0.3221917010
[662,]  1.2510982054 -0.4048407933
[663,]  1.3751724865 -0.0652248076
[664,]  1.4379301646 -0.3183286467
[665,]  1.2890888870 -0.4984887629
[666,]  1.0119721946 -0.2386640460
[667,]  1.3182547765 -0.1730662018
[668,]  1.1872018734 -0.4579554247
[669,]  1.1267508086 -0.1488833081
[670,]  1.0252195072 -0.4829268390
[671,]  1.2006020360 -0.5677225038
[672,]  1.2899045319 -0.1320836891
[673,]  0.9911666741 -0.2496083168
[674,]  1.2240036820 -0.2890830041
[675,]  1.2781654040 -0.6385836676
[676,]  1.0423217074 -0.1725610851
[677,]  1.3240698572 -0.0415103985
[678,]  1.2190313927 -0.4051239761
[679,]  1.1760501726 -0.3398461014
[680,]  1.1257563141 -0.3825750252
[681,]  1.3781165806 -0.4530880598
[682,]  1.1271967449 -0.2112854849
[683,]  1.1828837222 -0.1183536565
[684,]  1.3908593098 -0.0652631683
[685,]  1.3008593451 -0.6720141201
[686,]  1.1462204374 -0.3441658309
[687,]  1.3089523151 -0.3284712226
[688,]  0.9468522840 -0.3464103854
[689,]  1.0961533752 -0.5511268011
[690,]  1.1063309448 -0.4718240064
[691,]  1.1955307109 -0.2232322238
[692,]  1.1262101714  0.2370704926
[693,]  1.1637883596 -0.3605939347
[694,]  1.2777296894 -0.2653261020
[695,]  1.1790717021 -0.1676901925
[696,]  1.1031844555  0.0573931858
[697,]  1.0225580784 -0.2160803909
[698,]  1.1672082765 -0.2688500992
[699,]  1.1649252560 -0.4838517560
[700,]  1.2339475980 -0.2488313738
[701,]  1.2120556924 -0.3784798214
[702,]  1.3662813473 -0.1777560556
[703,]  1.2106555810 -0.2362336802
[704,]  1.3363252599 -0.5654705312
[705,]  1.1000028097 -0.2658339026
[706,]  1.1241752447 -0.3540891226
[707,]  1.2102809731 -0.0904768016
[708,]  1.1718928815 -0.0266753797
[709,]  1.2710471082 -0.0442593306
[710,]  1.2754530979 -0.4195126379
[711,]  1.2471576347 -0.5315249036
[712,]  1.3946117528 -0.1609966174
[713,]  1.4338444088 -0.2567272300
[714,]  1.3652260986 -0.5640311581
[715,]  1.3206961966 -0.1974042794
[716,]  1.0011304341 -0.4612858422
[717,]  1.1333646289 -0.1474022528
[718,]  1.1524111443  0.1112510662
[719,]  1.0059336884  0.0749114127
[720,]  1.2275739451  0.0952041964
[721,]  1.2748127350 -0.4561422127
[722,]  1.3903282335 -0.3089217464
[723,]  1.1181331972 -0.7659765937
[724,]  1.2088741302 -0.6473434718
[725,]  1.0711778036  0.1940109447
[726,]  1.2033371912 -0.0876364346
[727,]  1.0990413663 -0.1852087915
[728,]  1.2720899230 -0.4586782974
[729,]  1.3613403006 -0.3906996285
[730,]  1.1357960773  0.0005320010
[731,]  1.3220471888  0.0860057735
[732,]  1.3184072915 -0.2703851056
[733,]  1.5527375271 -0.3440062427
[734,]  1.1942981791 -0.2128541769
[735,]  1.0988628161 -0.6098914301
[736,]  1.1736812692 -0.0450357881
[737,]  1.2743734109 -0.0793374257
[738,]  0.9961125035 -0.0418246608
[739,]  1.2633415341 -0.3142074758
[740,]  1.2334079693 -0.5747766301
[741,]  0.8578078753 -0.0337786120
[742,]  1.3660336951 -0.1937200289
[743,]  1.0248198251 -0.2119903386
[744,]  1.0265936548 -0.3609052025
[745,]  1.0635029633 -0.2842573514
[746,]  1.1494763811  0.0481158176
[747,]  0.9767516660 -0.1749717790
[748,]  1.2120103828 -0.0630242686
[749,]  1.2301683696 -0.0277978122
[750,]  1.1925138201 -0.4583964416
attr(,"scaled:center")
        x         y 
0.9658076 0.2274776 
attr(,"scaled:scale")
        x         y 
1.7073024 0.9015204 
two_spirals_sphere_scaled
                   x             y
  [1,] -3.608506e-02  4.348549e-01
  [2,] -1.486074e-01  4.086354e-01
  [3,] -8.789134e-02  4.410492e-01
  [4,] -1.696265e-01  4.002043e-01
  [5,] -1.806536e-01  4.618033e-01
  [6,] -2.059754e-01  4.555221e-01
  [7,] -2.731699e-01  4.348481e-01
  [8,] -2.787381e-01  4.826661e-01
  [9,] -1.699636e-01  4.439731e-01
 [10,] -3.106497e-01  3.927759e-01
 [11,] -2.502791e-01  4.758503e-01
 [12,] -3.774516e-01  5.055785e-01
 [13,] -4.413615e-01  4.556474e-01
 [14,] -3.898617e-01  3.397991e-01
 [15,] -3.555670e-01  4.113689e-01
 [16,] -3.686586e-01  3.958189e-01
 [17,] -3.667042e-01  3.554826e-01
 [18,] -5.443017e-01  4.075906e-01
 [19,] -3.936284e-01  3.867325e-01
 [20,] -5.377710e-01  2.889883e-01
 [21,] -5.194514e-01  2.653351e-01
 [22,] -5.237015e-01  1.832338e-01
 [23,] -6.027594e-01  1.976993e-01
 [24,] -6.744984e-01  2.081180e-01
 [25,] -6.239373e-01  2.608009e-01
 [26,] -6.156386e-01  1.691495e-01
 [27,] -6.759857e-01  1.614581e-01
 [28,] -6.924334e-01  1.260856e-01
 [29,] -6.503429e-01  2.125670e-01
 [30,] -6.848595e-01  4.361290e-02
 [31,] -6.710344e-01  1.085618e-01
 [32,] -7.040299e-01  2.135254e-02
 [33,] -7.522479e-01 -3.749811e-02
 [34,] -6.611778e-01 -4.942706e-02
 [35,] -6.923328e-01  4.655174e-02
 [36,] -6.855320e-01 -9.460998e-02
 [37,] -8.009098e-01 -1.002813e-01
 [38,] -6.955288e-01 -1.878261e-01
 [39,] -8.183106e-01 -2.360350e-01
 [40,] -7.659587e-01 -2.299548e-01
 [41,] -8.022134e-01 -3.040485e-01
 [42,] -8.367466e-01 -2.459218e-01
 [43,] -6.504913e-01 -4.136664e-01
 [44,] -7.556719e-01 -3.747249e-01
 [45,] -7.310847e-01 -4.135522e-01
 [46,] -7.260564e-01 -3.828360e-01
 [47,] -6.799011e-01 -4.448809e-01
 [48,] -6.122452e-01 -5.095789e-01
 [49,] -5.939433e-01 -4.913943e-01
 [50,] -7.066479e-01 -5.321587e-01
 [51,] -6.964999e-01 -5.813515e-01
 [52,] -6.837508e-01 -6.601848e-01
 [53,] -6.507017e-01 -6.720572e-01
 [54,] -4.829869e-01 -7.651994e-01
 [55,] -5.462792e-01 -6.997998e-01
 [56,] -5.583510e-01 -7.715969e-01
 [57,] -5.196678e-01 -7.697250e-01
 [58,] -4.148343e-01 -8.503454e-01
 [59,] -4.206357e-01 -9.929175e-01
 [60,] -4.142000e-01 -9.410677e-01
 [61,] -4.000512e-01 -9.577684e-01
 [62,] -3.699795e-01 -9.042988e-01
 [63,] -2.024061e-01 -9.770246e-01
 [64,] -2.145719e-01 -1.019332e+00
 [65,] -1.274538e-01 -1.118976e+00
 [66,] -1.967899e-01 -9.717802e-01
 [67,] -1.523851e-01 -1.040503e+00
 [68,] -1.406074e-01 -1.052259e+00
 [69,] -6.240102e-02 -1.118376e+00
 [70,]  1.423334e-02 -1.069328e+00
 [71,]  9.909239e-02 -1.143858e+00
 [72,]  1.089137e-01 -1.100204e+00
 [73,]  1.503068e-01 -1.159555e+00
 [74,]  2.320421e-01 -1.051511e+00
 [75,]  2.755615e-01 -1.149338e+00
 [76,]  2.763638e-01 -1.029626e+00
 [77,]  2.842405e-01 -1.085116e+00
 [78,]  4.236007e-01 -1.058968e+00
 [79,]  4.222041e-01 -1.142657e+00
 [80,]  5.412733e-01 -1.010372e+00
 [81,]  4.929846e-01 -1.029260e+00
 [82,]  5.133205e-01 -9.896737e-01
 [83,]  6.322599e-01 -9.905373e-01
 [84,]  6.251683e-01 -9.884625e-01
 [85,]  7.309003e-01 -9.556750e-01
 [86,]  6.706570e-01 -1.022589e+00
 [87,]  7.153217e-01 -9.267846e-01
 [88,]  8.695823e-01 -9.686207e-01
 [89,]  8.972099e-01 -9.003350e-01
 [90,]  9.643299e-01 -8.997302e-01
 [91,]  8.759507e-01 -7.578250e-01
 [92,]  1.061887e+00 -7.805599e-01
 [93,]  1.100529e+00 -7.475141e-01
 [94,]  1.130732e+00 -7.238761e-01
 [95,]  1.155967e+00 -6.516431e-01
 [96,]  1.250313e+00 -6.179233e-01
 [97,]  1.122815e+00 -5.922622e-01
 [98,]  1.193321e+00 -6.202166e-01
 [99,]  1.267482e+00 -4.875069e-01
[100,]  1.240179e+00 -4.956691e-01
[101,]  1.305881e+00 -3.576382e-01
[102,]  1.359052e+00 -3.060266e-01
[103,]  1.317237e+00 -2.684397e-01
[104,]  1.395300e+00 -2.384431e-01
[105,]  1.407189e+00 -9.921806e-02
[106,]  1.360433e+00 -1.819869e-01
[107,]  1.363782e+00 -6.500257e-03
[108,]  1.462137e+00  2.761772e-03
[109,]  1.417484e+00  9.331619e-02
[110,]  1.462020e+00  1.424380e-01
[111,]  1.393208e+00  1.716323e-01
[112,]  1.487899e+00  3.519008e-01
[113,]  1.366291e+00  3.302386e-01
[114,]  1.455002e+00  3.827662e-01
[115,]  1.432441e+00  5.646078e-01
[116,]  1.411865e+00  5.634615e-01
[117,]  1.415372e+00  6.052971e-01
[118,]  1.386003e+00  6.571240e-01
[119,]  1.319302e+00  7.266016e-01
[120,]  1.313225e+00  7.714458e-01
[121,]  1.315994e+00  8.134732e-01
[122,]  1.212413e+00  9.479982e-01
[123,]  1.200802e+00  9.868905e-01
[124,]  1.300583e+00  1.043052e+00
[125,]  1.076200e+00  1.076733e+00
[126,]  1.076119e+00  1.195557e+00
[127,]  1.135113e+00  1.128051e+00
[128,]  1.095615e+00  1.314584e+00
[129,]  1.038028e+00  1.361014e+00
[130,]  9.539839e-01  1.386663e+00
[131,]  9.149123e-01  1.331775e+00
[132,]  8.062127e-01  1.449976e+00
[133,]  7.620496e-01  1.444125e+00
[134,]  7.219703e-01  1.504726e+00
[135,]  6.320410e-01  1.533152e+00
[136,]  6.495675e-01  1.486124e+00
[137,]  4.760131e-01  1.607836e+00
[138,]  4.376458e-01  1.613555e+00
[139,]  3.604772e-01  1.697628e+00
[140,]  3.667409e-01  1.676145e+00
[141,]  2.284577e-01  1.736554e+00
[142,]  2.330097e-01  1.833356e+00
[143,]  1.894114e-01  1.722022e+00
[144,]  6.441890e-02  1.714967e+00
[145,]  1.245290e-02  1.805175e+00
[146,] -1.150326e-01  1.766160e+00
[147,] -1.383388e-01  1.770424e+00
[148,] -2.943029e-01  1.854955e+00
[149,] -3.167986e-01  1.820242e+00
[150,] -4.505194e-01  1.866867e+00
[151,] -4.785799e-01  1.748842e+00
[152,] -4.942056e-01  1.804293e+00
[153,] -5.880567e-01  1.769429e+00
[154,] -7.156365e-01  1.693977e+00
[155,] -8.067995e-01  1.686206e+00
[156,] -8.848265e-01  1.694242e+00
[157,] -9.540256e-01  1.680565e+00
[158,] -9.802197e-01  1.620396e+00
[159,] -1.111738e+00  1.633915e+00
[160,] -1.007430e+00  1.533381e+00
[161,] -1.196486e+00  1.497234e+00
[162,] -1.317953e+00  1.488282e+00
[163,] -1.323544e+00  1.486676e+00
[164,] -1.410960e+00  1.342546e+00
[165,] -1.483966e+00  1.378501e+00
[166,] -1.501814e+00  1.212620e+00
[167,] -1.576847e+00  1.271817e+00
[168,] -1.597158e+00  1.072095e+00
[169,] -1.720685e+00  1.081350e+00
[170,] -1.667242e+00  9.347869e-01
[171,] -1.861167e+00  1.034730e+00
[172,] -1.835909e+00  8.749230e-01
[173,] -1.864496e+00  8.059526e-01
[174,] -1.869763e+00  7.909767e-01
[175,] -2.020677e+00  6.568017e-01
[176,] -2.045654e+00  5.452521e-01
[177,] -1.948824e+00  4.994057e-01
[178,] -2.032966e+00  3.839129e-01
[179,] -2.041783e+00  3.278396e-01
[180,] -2.129310e+00  2.211298e-01
[181,] -2.022857e+00  1.198149e-01
[182,] -2.118610e+00  1.838603e-02
[183,] -2.109168e+00 -3.567103e-02
[184,] -2.139096e+00 -1.118159e-01
[185,] -2.095683e+00 -2.494789e-01
[186,] -2.149850e+00 -2.638653e-01
[187,] -2.024450e+00 -4.346503e-01
[188,] -2.044567e+00 -6.245476e-01
[189,] -2.188797e+00 -6.394299e-01
[190,] -2.110058e+00 -6.371172e-01
[191,] -2.060977e+00 -7.538040e-01
[192,] -2.110733e+00 -9.024698e-01
[193,] -2.050276e+00 -1.011605e+00
[194,] -1.994289e+00 -1.007382e+00
[195,] -1.908747e+00 -1.180257e+00
[196,] -1.884268e+00 -1.194691e+00
[197,] -1.869400e+00 -1.307361e+00
[198,] -1.797219e+00 -1.416480e+00
[199,] -1.610381e+00 -1.505239e+00
[200,] -1.631040e+00 -1.620215e+00
[201,] -1.598977e+00 -1.580003e+00
[202,] -1.525076e+00 -1.778608e+00
[203,] -1.518726e+00 -1.780802e+00
[204,] -1.418482e+00 -1.897251e+00
[205,] -1.337149e+00 -1.993928e+00
[206,] -1.294882e+00 -2.065151e+00
[207,] -1.214907e+00 -1.969687e+00
[208,] -1.089653e+00 -2.110650e+00
[209,] -1.045804e+00 -2.155935e+00
[210,] -9.483229e-01 -2.187423e+00
[211,] -8.651154e-01 -2.213363e+00
[212,] -7.208703e-01 -2.329614e+00
[213,] -6.431304e-01 -2.325453e+00
[214,] -5.827133e-01 -2.425951e+00
[215,] -4.842166e-01 -2.336721e+00
[216,] -3.279371e-01 -2.388407e+00
[217,] -2.791095e-01 -2.472018e+00
[218,] -1.089140e-01 -2.464502e+00
[219,] -7.077533e-02 -2.548189e+00
[220,]  2.312904e-02 -2.456328e+00
[221,]  5.608512e-02 -2.591127e+00
[222,]  2.184367e-01 -2.586084e+00
[223,]  2.901400e-01 -2.460955e+00
[224,]  5.459338e-01 -2.395701e+00
[225,]  5.854589e-01 -2.442728e+00
[226,]  6.939284e-01 -2.438809e+00
[227,]  7.735991e-01 -2.480042e+00
[228,]  7.571843e-01 -2.388413e+00
[229,]  9.812579e-01 -2.377274e+00
[230,]  1.086249e+00 -2.371831e+00
[231,]  1.132294e+00 -2.337942e+00
[232,]  1.298856e+00 -2.235428e+00
[233,]  1.458338e+00 -2.293232e+00
[234,]  1.481126e+00 -2.139018e+00
[235,]  1.623831e+00 -2.127787e+00
[236,]  1.652015e+00 -2.031144e+00
[237,]  1.763306e+00 -1.940536e+00
[238,]  1.939707e+00 -1.957102e+00
[239,]  1.962283e+00 -1.828627e+00
[240,]  2.072811e+00 -1.794525e+00
[241,]  2.065995e+00 -1.659039e+00
[242,]  2.231031e+00 -1.611615e+00
[243,]  2.318091e+00 -1.538383e+00
[244,]  2.364594e+00 -1.471767e+00
[245,]  2.377392e+00 -1.350829e+00
[246,]  2.497456e+00 -1.237528e+00
[247,]  2.492034e+00 -1.069832e+00
[248,]  2.498866e+00 -1.065885e+00
[249,]  2.625451e+00 -9.017299e-01
[250,]  2.647958e+00 -8.550522e-01
[251,]  2.673954e+00 -7.089403e-01
[252,]  2.787431e+00 -5.812198e-01
[253,]  2.735781e+00 -5.505056e-01
[254,]  2.797183e+00 -3.220992e-01
[255,]  2.705622e+00 -2.467735e-01
[256,]  2.755271e+00 -1.918176e-01
[257,]  2.798132e+00 -4.857677e-02
[258,] -6.638054e-02 -4.560490e-01
[259,]  6.803604e-03 -4.641955e-01
[260,]  5.512494e-02 -4.582402e-01
[261,]  1.675427e-01 -4.099893e-01
[262,]  9.938772e-02 -4.873689e-01
[263,]  1.904188e-01 -3.946309e-01
[264,]  1.522479e-01 -4.144017e-01
[265,]  1.890026e-01 -4.456762e-01
[266,]  2.972499e-01 -4.667682e-01
[267,]  3.382959e-01 -4.250116e-01
[268,]  3.017161e-01 -4.662808e-01
[269,]  2.575937e-01 -3.267247e-01
[270,]  3.949397e-01 -3.951457e-01
[271,]  3.554646e-01 -3.642259e-01
[272,]  3.561847e-01 -3.882573e-01
[273,]  3.451488e-01 -3.427323e-01
[274,]  3.681501e-01 -4.105339e-01
[275,]  3.949409e-01 -3.523766e-01
[276,]  4.209680e-01 -3.544937e-01
[277,]  5.710591e-01 -3.457519e-01
[278,]  5.807509e-01 -2.924099e-01
[279,]  4.803850e-01 -3.257468e-01
[280,]  5.957221e-01 -3.135881e-01
[281,]  5.361364e-01 -2.876473e-01
[282,]  6.119904e-01 -2.163004e-01
[283,]  5.722862e-01 -2.089073e-01
[284,]  5.414779e-01 -9.644679e-02
[285,]  6.890356e-01 -1.067102e-01
[286,]  5.790525e-01 -6.303865e-02
[287,]  6.783865e-01 -9.357088e-02
[288,]  6.458959e-01 -1.118153e-01
[289,]  7.919437e-01 -1.051434e-01
[290,]  6.980296e-01 -7.523992e-02
[291,]  6.735756e-01 -6.440270e-02
[292,]  6.846406e-01 -5.481681e-02
[293,]  7.281910e-01  8.101732e-02
[294,]  7.088419e-01  1.174403e-01
[295,]  6.565389e-01  1.244909e-01
[296,]  6.649105e-01  2.094629e-01
[297,]  7.498751e-01  1.307079e-01
[298,]  7.459296e-01  2.119242e-01
[299,]  7.107691e-01  2.607615e-01
[300,]  7.076022e-01  2.776722e-01
[301,]  7.484795e-01  3.449457e-01
[302,]  7.020921e-01  3.126434e-01
[303,]  7.022038e-01  4.260182e-01
[304,]  6.872224e-01  4.056226e-01
[305,]  6.834112e-01  4.673076e-01
[306,]  6.879576e-01  4.990241e-01
[307,]  6.291139e-01  5.780648e-01
[308,]  6.950839e-01  6.174558e-01
[309,]  6.120542e-01  7.521189e-01
[310,]  6.191814e-01  6.715692e-01
[311,]  5.934218e-01  7.187458e-01
[312,]  5.340368e-01  6.439353e-01
[313,]  5.239581e-01  7.370477e-01
[314,]  5.506003e-01  7.752372e-01
[315,]  5.182331e-01  7.436852e-01
[316,]  5.161326e-01  8.628314e-01
[317,]  4.399156e-01  9.128286e-01
[318,]  3.829724e-01  8.520701e-01
[319,]  4.309344e-01  9.224508e-01
[320,]  3.313680e-01  9.064558e-01
[321,]  3.518543e-01  9.925610e-01
[322,]  2.622164e-01  9.828785e-01
[323,]  2.107064e-01  9.635773e-01
[324,]  1.365879e-01  1.003879e+00
[325,]  1.458142e-01  1.089423e+00
[326,] -1.034158e-02  1.056131e+00
[327,]  1.013129e-01  1.118001e+00
[328,]  4.475391e-02  1.105044e+00
[329,] -1.254895e-02  1.120093e+00
[330,] -7.510038e-02  1.125487e+00
[331,] -1.077764e-01  1.085302e+00
[332,] -1.366674e-01  1.089258e+00
[333,] -2.589774e-01  1.032779e+00
[334,] -1.892510e-01  1.170203e+00
[335,] -2.595772e-01  1.106826e+00
[336,] -3.654856e-01  1.080314e+00
[337,] -4.019632e-01  1.125270e+00
[338,] -4.011471e-01  1.049774e+00
[339,] -5.712492e-01  1.055983e+00
[340,] -5.949191e-01  1.030746e+00
[341,] -5.718805e-01  1.093673e+00
[342,] -6.624395e-01  9.511798e-01
[343,] -6.481174e-01  1.058180e+00
[344,] -8.722330e-01  1.019911e+00
[345,] -8.375210e-01  1.002309e+00
[346,] -8.094648e-01  9.166196e-01
[347,] -7.908410e-01  9.157830e-01
[348,] -8.773049e-01  9.176555e-01
[349,] -9.526902e-01  8.327170e-01
[350,] -9.602023e-01  8.300585e-01
[351,] -1.020577e+00  7.297927e-01
[352,] -1.103311e+00  6.102556e-01
[353,] -1.201456e+00  7.164632e-01
[354,] -1.072972e+00  6.678347e-01
[355,] -1.206150e+00  6.508721e-01
[356,] -1.213091e+00  4.979166e-01
[357,] -1.173797e+00  4.091857e-01
[358,] -1.235396e+00  3.871951e-01
[359,] -1.279699e+00  3.778566e-01
[360,] -1.344730e+00  2.772169e-01
[361,] -1.369586e+00  2.392843e-01
[362,] -1.386026e+00  1.808666e-01
[363,] -1.302796e+00  1.302052e-01
[364,] -1.361600e+00  1.485163e-01
[365,] -1.396726e+00  5.389881e-02
[366,] -1.402086e+00 -5.502774e-02
[367,] -1.447620e+00 -9.367964e-02
[368,] -1.423131e+00 -1.978060e-01
[369,] -1.504814e+00 -2.849096e-01
[370,] -1.434069e+00 -3.424529e-01
[371,] -1.425036e+00 -3.764817e-01
[372,] -1.461036e+00 -4.171509e-01
[373,] -1.468249e+00 -5.074499e-01
[374,] -1.435231e+00 -5.217745e-01
[375,] -1.388072e+00 -6.362050e-01
[376,] -1.386307e+00 -7.339243e-01
[377,] -1.335545e+00 -7.267017e-01
[378,] -1.345004e+00 -7.246413e-01
[379,] -1.303394e+00 -8.682279e-01
[380,] -1.157145e+00 -9.264750e-01
[381,] -1.213241e+00 -9.152223e-01
[382,] -1.203635e+00 -9.807713e-01
[383,] -1.219819e+00 -1.059158e+00
[384,] -1.147774e+00 -1.131404e+00
[385,] -1.131725e+00 -1.151770e+00
[386,] -9.983662e-01 -1.198080e+00
[387,] -1.013770e+00 -1.283450e+00
[388,] -9.803472e-01 -1.292421e+00
[389,] -8.865970e-01 -1.354962e+00
[390,] -8.755841e-01 -1.474716e+00
[391,] -7.734442e-01 -1.466443e+00
[392,] -8.220630e-01 -1.460915e+00
[393,] -6.678718e-01 -1.556381e+00
[394,] -6.191298e-01 -1.523438e+00
[395,] -6.200946e-01 -1.663286e+00
[396,] -4.874870e-01 -1.601172e+00
[397,] -4.720167e-01 -1.572796e+00
[398,] -3.467363e-01 -1.653454e+00
[399,] -2.666868e-01 -1.686275e+00
[400,] -1.867652e-01 -1.753309e+00
[401,] -1.626520e-01 -1.844363e+00
[402,] -7.845348e-03 -1.825213e+00
[403,]  5.078379e-02 -1.860124e+00
[404,]  7.830491e-02 -1.851412e+00
[405,]  1.758762e-01 -1.800441e+00
[406,]  3.033397e-01 -1.817394e+00
[407,]  3.270742e-01 -1.834428e+00
[408,]  3.362138e-01 -1.852638e+00
[409,]  4.548410e-01 -1.820722e+00
[410,]  5.283790e-01 -1.725773e+00
[411,]  5.991358e-01 -1.819835e+00
[412,]  6.935700e-01 -1.807602e+00
[413,]  7.552554e-01 -1.772201e+00
[414,]  8.958416e-01 -1.715913e+00
[415,]  1.027055e+00 -1.640848e+00
[416,]  9.624005e-01 -1.620883e+00
[417,]  9.604508e-01 -1.656707e+00
[418,]  1.148939e+00 -1.624138e+00
[419,]  1.193807e+00 -1.518596e+00
[420,]  1.270085e+00 -1.506292e+00
[421,]  1.306573e+00 -1.361979e+00
[422,]  1.446188e+00 -1.335306e+00
[423,]  1.573219e+00 -1.350577e+00
[424,]  1.592408e+00 -1.250871e+00
[425,]  1.563314e+00 -1.142871e+00
[426,]  1.613929e+00 -1.185739e+00
[427,]  1.649668e+00 -1.109697e+00
[428,]  1.752490e+00 -1.010910e+00
[429,]  1.717271e+00 -9.702014e-01
[430,]  1.832298e+00 -9.251343e-01
[431,]  1.856510e+00 -7.894062e-01
[432,]  1.836599e+00 -6.522916e-01
[433,]  1.942257e+00 -6.254783e-01
[434,]  2.005117e+00 -5.528820e-01
[435,]  1.961881e+00 -4.710057e-01
[436,]  1.982351e+00 -4.064319e-01
[437,]  2.122802e+00 -2.174523e-01
[438,]  2.145294e+00 -1.136912e-01
[439,]  2.113760e+00 -1.278922e-01
[440,]  2.039484e+00 -5.604549e-02
[441,]  2.139123e+00  4.062165e-02
[442,]  2.139444e+00  1.781611e-01
[443,]  2.064654e+00  1.906330e-01
[444,]  2.121667e+00  3.902815e-01
[445,]  2.221626e+00  5.322546e-01
[446,]  2.127993e+00  5.838777e-01
[447,]  2.184962e+00  6.052965e-01
[448,]  2.053988e+00  7.174312e-01
[449,]  2.080129e+00  8.005109e-01
[450,]  2.074459e+00  9.271981e-01
[451,]  1.982370e+00  9.550097e-01
[452,]  2.017312e+00  1.067393e+00
[453,]  1.890905e+00  1.159556e+00
[454,]  1.904547e+00  1.253888e+00
[455,]  1.859739e+00  1.352219e+00
[456,]  1.880238e+00  1.383120e+00
[457,]  1.781892e+00  1.527479e+00
[458,]  1.726481e+00  1.620424e+00
[459,]  1.533736e+00  1.670975e+00
[460,]  1.579247e+00  1.795327e+00
[461,]  1.469527e+00  1.620863e+00
[462,]  1.412949e+00  1.916144e+00
[463,]  1.347575e+00  1.987911e+00
[464,]  1.165480e+00  2.063485e+00
[465,]  1.176904e+00  2.043508e+00
[466,]  1.058680e+00  2.051835e+00
[467,]  1.013553e+00  2.164881e+00
[468,]  9.735693e-01  2.270306e+00
[469,]  8.146524e-01  2.254771e+00
[470,]  7.828265e-01  2.301021e+00
[471,]  6.432150e-01  2.330716e+00
[472,]  6.630055e-01  2.476270e+00
[473,]  4.475909e-01  2.411563e+00
[474,]  3.082770e-01  2.406557e+00
[475,]  2.996564e-01  2.508279e+00
[476,]  2.063128e-01  2.568402e+00
[477,]  4.579936e-02  2.560628e+00
[478,] -2.163887e-03  2.582611e+00
[479,] -7.693551e-02  2.478531e+00
[480,] -2.942438e-01  2.510274e+00
[481,] -2.828702e-01  2.578767e+00
[482,] -4.833566e-01  2.518608e+00
[483,] -6.169804e-01  2.526007e+00
[484,] -6.731824e-01  2.457943e+00
[485,] -8.475763e-01  2.451993e+00
[486,] -9.152579e-01  2.453279e+00
[487,] -9.428026e-01  2.485346e+00
[488,] -1.092820e+00  2.370742e+00
[489,] -1.172467e+00  2.332424e+00
[490,] -1.309873e+00  2.261067e+00
[491,] -1.390270e+00  2.284397e+00
[492,] -1.469511e+00  2.156442e+00
[493,] -1.597115e+00  2.171006e+00
[494,] -1.704986e+00  2.086028e+00
[495,] -1.738480e+00  1.949737e+00
[496,] -1.823879e+00  1.832915e+00
[497,] -1.859549e+00  1.869182e+00
[498,] -1.983362e+00  1.748943e+00
[499,] -2.094200e+00  1.719387e+00
[500,] -2.236021e+00  1.656118e+00
[501,] -2.221739e+00  1.473356e+00
[502,] -2.344412e+00  1.428743e+00
[503,] -2.353681e+00  1.347445e+00
[504,] -2.347012e+00  1.299640e+00
[505,] -2.539060e+00  1.172271e+00
[506,] -2.552945e+00  1.079971e+00
[507,] -2.597432e+00  9.449932e-01
[508,] -2.695112e+00  7.872574e-01
[509,] -2.721868e+00  6.546452e-01
[510,] -2.705672e+00  5.995487e-01
[511,] -2.777025e+00  4.624230e-01
[512,] -2.766366e+00  3.869972e-01
[513,] -2.766207e+00  2.029368e-01
[514,] -2.806285e+00  1.482808e-01
[515,] -2.838701e+00  2.866334e-02
[516,] -2.204018e-02 -4.428428e-02
[517,]  2.851617e-02  8.214062e-04
[518,]  2.953873e-02  2.239499e-02
[519,] -7.667351e-03  2.715363e-03
[520,] -9.260192e-02  6.762682e-02
[521,] -3.869257e-02 -9.247095e-03
[522,]  1.246928e-04 -2.334827e-03
[523,] -3.725773e-02 -3.689583e-02
[524,] -6.429820e-02  3.752957e-02
[525,] -6.499920e-02 -5.185432e-02
[526,]  3.074171e-02  1.900185e-02
[527,] -6.581377e-02  8.297873e-02
[528,] -8.372787e-04  3.685830e-04
[529,]  4.194355e-03  9.962647e-02
[530,] -2.983077e-03  1.115225e-02
[531,] -1.823952e-02 -5.931957e-02
[532,]  1.576904e-02  4.450306e-02
[533,] -9.804173e-02  4.813376e-02
[534,] -3.931965e-02 -4.896267e-02
[535,] -4.871705e-02  9.388329e-02
[536,] -8.203016e-03  1.158681e-02
[537,] -1.860946e-03  1.766311e-03
[538,] -7.107501e-02 -9.917441e-03
[539,] -2.317141e-03  3.739826e-02
[540,] -9.821109e-02  3.385678e-02
[541,]  9.503201e-03  5.145106e-02
[542,]  1.058925e-02 -6.687111e-02
[543,]  3.757320e-02 -1.036352e-01
[544,] -5.660393e-02 -4.813797e-03
[545,]  9.474846e-02  4.921491e-02
[546,] -1.512039e-03  8.519504e-04
[547,] -1.741892e-02  5.028443e-02
[548,] -3.751749e-02  6.816151e-03
[549,] -2.620624e-03 -1.549555e-03
[550,]  1.931385e-02  2.742436e-02
[551,]  7.190791e-02 -2.054689e-02
[552,]  3.008452e-02  5.573690e-02
[553,] -2.337687e-02 -6.486011e-03
[554,] -1.927548e-02  7.705669e-02
[555,]  4.003775e-02 -8.833271e-02
[556,]  1.542291e-02 -3.337565e-02
[557,] -1.066900e-02 -6.651622e-03
[558,]  8.950651e-02  6.690417e-02
[559,]  1.992461e-02  2.619470e-05
[560,]  7.936724e-03 -3.596092e-02
[561,] -4.132273e-02  1.434767e-02
[562,]  2.730323e-02  6.633084e-02
[563,]  5.963317e-03 -1.683732e-02
[564,]  1.000567e-02 -2.381841e-02
[565,]  7.252968e-02  2.463045e-02
[566,] -3.021491e-02 -2.526360e-03
[567,]  1.464802e-05 -1.092048e-01
[568,] -3.496269e-02 -8.175050e-02
[569,]  5.841810e-02 -9.328294e-02
[570,] -6.000198e-02  3.321319e-02
[571,]  6.119414e-02 -5.756231e-02
[572,] -2.578070e-02 -5.614920e-02
[573,] -1.790194e-02  5.690789e-03
[574,] -1.755824e-02 -3.184519e-02
[575,]  6.076143e-02  4.407522e-03
[576,] -6.698204e-02 -7.828374e-02
[577,] -4.656020e-02 -4.562118e-02
[578,]  1.695939e-02  3.230006e-03
[579,] -3.382131e-02  1.966450e-02
[580,] -3.064510e-02  3.155727e-02
[581,]  6.911255e-02  2.528251e-02
[582,] -3.954235e-04  2.815618e-03
[583,]  5.128235e-02 -7.461119e-02
[584,] -1.147671e-02 -6.374840e-03
[585,]  8.730005e-02 -6.951489e-02
[586,] -4.646723e-03  2.674081e-04
[587,]  4.268862e-03 -8.541280e-02
[588,] -7.656913e-03  8.199179e-03
[589,]  1.486619e-02 -1.703818e-03
[590,]  4.307933e-02 -3.069982e-02
[591,]  5.655659e-03 -9.299674e-04
[592,]  9.394055e-03 -7.776415e-02
[593,] -7.718565e-03  6.375479e-02
[594,]  6.433854e-02  2.895034e-02
[595,] -1.152564e-02 -1.019520e-01
[596,] -2.470195e-02 -4.904435e-06
[597,]  2.651708e-02 -9.127244e-02
[598,]  8.340948e-02  2.505252e-02
[599,] -5.881320e-02 -2.725833e-03
[600,]  5.318950e-02 -6.968009e-02
[601,]  8.017335e-02  6.472301e-02
[602,]  5.425766e-02 -8.915430e-02
[603,] -2.310145e-03 -1.003155e-02
[604,] -3.057683e-02  4.912211e-02
[605,]  5.497726e-03  5.008656e-02
[606,] -6.885464e-02  7.280230e-02
[607,]  5.284728e-03 -5.494716e-03
[608,]  9.045318e-02  1.179564e-02
[609,] -1.504605e-02 -1.328855e-02
[610,]  4.512000e-02 -9.246636e-02
[611,]  3.269305e-02 -8.847793e-03
[612,]  7.079726e-02 -2.896512e-02
[613,] -9.759737e-02 -5.004250e-02
[614,]  9.135609e-03  1.178370e-02
[615,] -1.168634e-02  3.171227e-02
[616,]  2.727967e-02  9.634585e-02
[617,]  1.439143e-02  1.108369e-02
[618,]  6.611220e-02  8.872196e-02
[619,]  1.134110e-02  7.516105e-02
[620,]  3.948844e-02  2.381637e-02
[621,] -2.204128e-02 -3.386684e-03
[622,]  1.311927e-02 -2.758286e-03
[623,] -8.601378e-04 -6.589271e-03
[624,] -2.181890e-02 -6.864693e-02
[625,] -8.226898e-02 -3.273482e-02
[626,] -1.627568e-03  8.446293e-03
[627,]  7.313721e-02 -3.586696e-02
[628,]  1.036122e-01  3.048614e-02
[629,] -2.494388e-02 -1.280585e-02
[630,] -9.138568e-04  1.232059e-02
[631,]  4.531081e-02  5.479521e-03
[632,] -2.068977e-02 -4.635090e-02
[633,]  6.202878e-02  2.699763e-02
[634,]  3.223283e-02  4.261864e-02
[635,] -2.429050e-02  1.825251e-02
[636,] -1.955264e-02 -4.630349e-02
[637,] -7.629113e-02 -7.473761e-02
[638,]  3.858484e-02 -8.871039e-02
[639,]  7.043596e-02 -2.628561e-02
[640,] -1.128718e-02  3.020504e-02
[641,]  6.464897e-03  7.233972e-02
[642,]  8.182253e-02 -1.156486e-02
[643,]  1.518581e-02  5.566806e-02
[644,]  2.181251e-02 -5.163846e-02
[645,]  1.078048e-02  6.690840e-02
[646,]  6.221712e-02  3.654171e-02
[647,]  4.779883e-02  2.629173e-02
[648,]  5.613674e-03 -4.663740e-02
[649,] -7.220886e-02 -1.828911e-02
[650,] -8.785107e-02 -7.242672e-02
[651,] -2.598004e-02 -2.810081e-02
[652,] -7.971175e-02  4.718372e-02
[653,]  5.265843e-05  9.876092e-02
[654,] -2.177326e-02 -1.113191e-01
[655,] -4.359390e-02  1.008602e-01
[656,] -5.605309e-03  4.097655e-03
[657,] -8.183747e-03 -7.742299e-03
[658,] -7.275119e-02 -2.467377e-02
[659,] -2.088351e-02 -6.099322e-02
[660,] -2.704929e-02  2.939132e-03
[661,] -1.518617e-02  7.484215e-02
[662,] -4.350730e-02  3.780873e-02
[663,] -3.768370e-02 -3.903507e-02
[664,]  2.743458e-02 -4.337411e-03
[665,] -4.650767e-02 -9.837690e-02
[666,] -1.621260e-03 -8.599995e-02
[667,]  4.997079e-03 -5.695095e-02
[668,] -3.389695e-02 -1.771791e-02
[669,] -2.969106e-02  2.694498e-02
[670,] -9.578316e-03 -8.134085e-02
[671,]  3.763465e-03 -6.057323e-02
[672,] -2.116959e-02 -4.592015e-02
[673,]  2.763235e-02  9.167711e-03
[674,] -2.239901e-02  1.194510e-02
[675,] -3.393777e-02 -3.315653e-02
[676,]  5.840061e-03 -5.795212e-02
[677,] -4.134587e-02 -7.627555e-02
[678,] -5.556057e-02 -1.524073e-02
[679,] -3.563655e-02 -7.649532e-03
[680,]  9.018553e-02 -4.205837e-03
[681,] -9.571136e-02  1.685900e-02
[682,] -7.598006e-03  5.270347e-02
[683,] -7.311286e-02  6.274068e-02
[684,]  3.504369e-02 -9.484858e-02
[685,] -1.550075e-02  1.983286e-03
[686,] -8.285046e-03 -2.257215e-02
[687,] -1.021603e-01  2.027647e-02
[688,]  2.128483e-02  3.082042e-02
[689,]  8.694506e-02 -5.239242e-02
[690,] -6.681066e-03  1.896820e-02
[691,]  5.631129e-02  2.648218e-02
[692,]  1.862126e-02  1.057166e-01
[693,] -6.204060e-04  9.924534e-02
[694,] -2.968530e-03 -6.794861e-02
[695,] -2.696220e-04 -5.761377e-03
[696,] -2.768524e-02 -8.095802e-02
[697,]  1.230357e-03 -8.312844e-02
[698,]  6.909285e-02  4.481512e-05
[699,]  2.577097e-02 -1.453825e-02
[700,]  5.017606e-02 -9.040178e-03
[701,] -5.169084e-02 -1.509938e-02
[702,] -1.337604e-02 -3.874500e-03
[703,] -3.403585e-02 -3.133055e-02
[704,]  1.200003e-02  3.337625e-02
[705,]  2.911679e-02 -5.371244e-02
[706,]  4.793051e-02  8.089718e-02
[707,]  6.820563e-03 -1.001547e-01
[708,]  6.629002e-02 -1.253356e-02
[709,] -3.546976e-02  6.207883e-04
[710,]  2.653831e-02  2.679405e-02
[711,] -2.133763e-02  4.020497e-02
[712,] -4.652953e-02  5.782701e-02
[713,]  4.439986e-02 -3.324583e-02
[714,] -4.387122e-02  3.951696e-02
[715,]  1.155923e-02 -9.262329e-02
[716,]  6.245666e-02  2.366827e-02
[717,] -5.351712e-03 -1.530952e-02
[718,] -3.236225e-02 -5.393639e-02
[719,]  3.751291e-02 -6.054890e-02
[720,]  4.965627e-02 -8.114384e-02
[721,]  5.234589e-02 -8.048411e-02
[722,] -3.733527e-02 -1.752074e-02
[723,] -3.389213e-02 -8.877666e-02
[724,]  6.383049e-02  3.781322e-02
[725,] -8.227903e-02 -5.279346e-02
[726,]  1.617827e-02 -1.405316e-02
[727,] -2.128723e-04  1.668688e-03
[728,]  2.901334e-02  7.029609e-02
[729,]  3.742011e-02 -6.432343e-02
[730,] -2.946017e-02  3.927809e-02
[731,]  2.770264e-02 -2.116775e-02
[732,]  9.618335e-03 -1.064364e-02
[733,]  1.019948e-02  6.424905e-02
[734,] -1.610360e-02 -4.854723e-02
[735,]  8.914172e-02 -2.142043e-02
[736,]  1.444997e-02  1.564199e-02
[737,] -1.787477e-02 -1.406242e-02
[738,]  9.336194e-02 -4.071147e-02
[739,]  2.395427e-04  6.625841e-03
[740,] -1.267740e-02  3.577363e-02
[741,] -7.917968e-02  1.103549e-02
[742,] -9.130414e-03  5.001062e-02
[743,] -4.451171e-03  1.476681e-02
[744,] -4.719151e-02 -1.632858e-02
[745,]  6.529527e-02  6.954440e-03
[746,] -1.845277e-02 -1.793308e-02
[747,]  2.319125e-02 -2.174103e-02
[748,] -3.397265e-02  6.751096e-02
[749,]  6.418199e-02 -1.622983e-02
[750,]  5.188596e-02 -2.301740e-02
[751,]  1.828507e-02 -3.250967e-02
[752,] -5.716122e-04 -6.471143e-02
[753,] -6.696936e-02  8.290005e-02
[754,] -1.184405e-02  7.250895e-02
[755,]  7.991398e-02 -3.836381e-02
[756,] -5.516533e-02 -9.294419e-03
[757,]  5.578891e-02  9.612605e-03
[758,] -2.580387e-03 -1.132005e-02
[759,] -4.840010e-02  8.225236e-02
[760,] -7.644359e-03 -5.460263e-02
[761,] -5.953758e-02 -1.842407e-03
[762,] -7.350091e-03 -2.482272e-02
[763,]  4.139197e-02  8.007318e-02
[764,] -1.705842e-02 -1.791921e-02
[765,]  1.811498e-02  8.896391e-03
[766,]  7.965428e-04 -1.133085e-01
[767,] -1.735586e-02  6.489684e-02
[768,] -2.323496e-02  1.189134e-02
[769,] -6.408770e-02 -8.774021e-02
[770,] -6.258626e-03 -8.877741e-02
[771,]  5.402936e-03 -9.637091e-04
[772,]  8.663598e-03  1.259484e-02
[773,] -2.259598e-03 -6.794488e-03
[774,] -2.493353e-02  4.707787e-02
[775,]  1.021113e-01 -3.873976e-02
[776,] -9.601582e-04 -9.107193e-03
[777,]  6.915431e-02 -4.117236e-02
[778,] -8.071214e-02 -1.303457e-02
[779,] -4.817715e-02  2.315403e-02
[780,]  3.973054e-02 -4.057686e-02
[781,]  6.077900e-02 -5.879726e-02
[782,] -7.857383e-02 -2.210735e-03
[783,]  2.021609e-03 -1.449581e-02
[784,]  3.752406e-02  6.366500e-02
[785,]  2.656104e-02  3.025401e-02
[786,]  1.191862e-02 -4.673579e-02
[787,] -2.087202e-02  7.063007e-02
[788,]  8.393491e-02  3.815260e-02
[789,]  1.358088e-03  7.105294e-02
[790,] -8.471077e-02 -1.961990e-02
[791,]  1.900730e-02  1.241708e-02
[792,] -1.430925e-02 -3.194717e-03
[793,]  4.308473e-04 -9.298310e-03
[794,]  4.330827e-02  3.670326e-02
[795,]  2.465641e-02  7.188631e-02
[796,] -7.464754e-02 -6.746937e-02
[797,] -6.921999e-02 -6.745324e-02
[798,] -6.834644e-02 -1.570755e-02
[799,] -1.776666e-02  1.032747e-01
[800,]  8.700378e-02  2.669507e-02
[801,] -2.923628e-02  6.684520e-02
[802,] -4.136915e-02  5.114102e-02
[803,]  2.591093e-02 -5.779768e-02
[804,]  4.741458e-02 -4.283423e-02
[805,]  5.168422e-02  5.066737e-02
[806,] -5.656081e-03  1.835145e-02
[807,] -1.078897e-01  7.216991e-03
[808,] -4.303416e-02  4.979131e-02
[809,] -4.005429e-02 -2.999687e-02
[810,]  1.426170e-02  2.879422e-03
[811,] -1.176876e-02  9.206613e-02
[812,]  8.673907e-02 -5.405650e-02
[813,] -9.145230e-02  3.281554e-02
[814,] -1.275330e-02  7.277216e-02
[815,]  7.581885e-03 -1.267000e-03
attr(,"scaled:center")
           x            y 
 0.006450501 -0.002022356 
attr(,"scaled:scale")
       x        y 
4.439757 4.362468 
#agglomerative clustering
cluster_three_s_single <- agnes(three_spheres_scaled, metric='euclidean', method='single')
cluster_three_s_complete <- agnes(three_spheres_scaled, metric='euclidean', method='complete')
cluster_three_s_average <- agnes(three_spheres_scaled, metric='euclidean', method='average')
cluster_three_s_ward <- agnes(three_spheres_scaled, metric='euclidean', method='ward')
#agglomerative clustering
cluster_ring_m_single <- agnes(ring_moon_sphere_scaled, metric='euclidean', method='single')
cluster_ring_m_complete <- agnes(ring_moon_sphere_scaled, metric='euclidean', method='complete')
cluster_ring_m_average <- agnes(ring_moon_sphere_scaled, metric='euclidean', method='average')
cluster_ring_m_ward <- agnes(ring_moon_sphere_scaled, metric='euclidean', method='ward')
#agglomerative clustering
cluster_two_s_single <- agnes(two_spirals_sphere_scaled, metric='euclidean', method='single')
cluster_two_s_complete <- agnes(two_spirals_sphere_scaled, metric='euclidean', method='complete')
cluster_two_s_average <- agnes(two_spirals_sphere_scaled, metric='euclidean', method='average')
cluster_two_s_ward <- agnes(two_spirals_sphere_scaled, metric='euclidean', method='ward')
#cut tree
single_clusters_three_s   <- cutree(cluster_three_s_single,   k = 3)
complete_clusters_three_s <- cutree(cluster_three_s_complete, k = 3)
average_clusters_three_s  <- cutree(cluster_three_s_average,  k = 3)
ward_clusters_three_s     <- cutree(cluster_three_s_ward,     k = 3)
#cut tree
single_clusters_ring_m <- cutree(cluster_ring_m_single, k = 3)
complete_clusters_ring_m <- cutree(cluster_ring_m_complete, k = 3)
average_clusters_ring_m <- cutree(cluster_ring_m_average, k = 3)
ward_clusters_ring_m     <- cutree(cluster_ring_m_ward,     k = 3)
#cut tree
single_clusters_two_s <- cutree(cluster_two_s_single, k = 3)
complete_clusters_two_s <- cutree(cluster_two_s_complete, k = 3)
average_clusters_two_s  <- cutree(cluster_two_s_average,  k = 3)
ward_clusters_two_s     <- cutree(cluster_two_s_ward,     k = 3)
three_spheres_with_clusters <- bind_cols(
  three_spheres,
  sing_clust = factor(single_clusters_three_s),
  comp_clust = factor(complete_clusters_three_s),
  ave_clust  = factor(average_clusters_three_s),
  ward_clust = factor(ward_clusters_three_s)
)
ring_moon_with_clusters <- bind_cols(
  ring_moon_sphere,
  sing_clust = factor(single_clusters_ring_m),
  comp_clust = factor(complete_clusters_ring_m),
  ave_clust  = factor(average_clusters_ring_m),
  ward_clust = factor(ward_clusters_ring_m)
)
two_spirals_with_clusters <- bind_cols(
  two_spirals_sphere,
  sing_clust = factor(single_clusters_two_s),
  comp_clust = factor(complete_clusters_two_s),
  ave_clust  = factor(average_clusters_two_s),
  ward_clust = factor(ward_clusters_two_s)
)
(three_s_single_sils <- silhouette(
  x   = single_clusters_three_s,
  dist = dist(three_spheres_scaled)
))
       cluster neighbor  sil_width
  [1,]       1        2 0.79551757
  [2,]       1        3 0.64028913
  [3,]       1        2 0.77362112
  [4,]       1        2 0.65191128
  [5,]       1        3 0.60057057
  [6,]       1        2 0.73082387
  [7,]       1        2 0.74420373
  [8,]       1        2 0.58242564
  [9,]       1        2 0.76366387
 [10,]       1        3 0.78509079
 [11,]       1        2 0.76022170
 [12,]       1        3 0.73250182
 [13,]       1        2 0.36493927
 [14,]       1        3 0.56058046
 [15,]       1        2 0.79440474
 [16,]       1        2 0.46884733
 [17,]       1        3 0.78120347
 [18,]       1        2 0.78327018
 [19,]       1        3 0.74658443
 [20,]       1        3 0.58230187
 [21,]       1        2 0.76072052
 [22,]       1        2 0.75811315
 [23,]       1        3 0.77247879
 [24,]       1        2 0.76292648
 [25,]       1        2 0.77435993
 [26,]       1        2 0.75080836
 [27,]       1        2 0.80526870
 [28,]       1        3 0.61999927
 [29,]       1        2 0.57262743
 [30,]       1        3 0.74062817
 [31,]       1        2 0.79464839
 [32,]       1        2 0.80005986
 [33,]       1        2 0.78922854
 [34,]       1        2 0.80070130
 [35,]       1        2 0.21458653
 [36,]       1        2 0.80520709
 [37,]       1        2 0.76719074
 [38,]       1        2 0.79038318
 [39,]       1        3 0.77817505
 [40,]       1        2 0.79625818
 [41,]       1        2 0.80385686
 [42,]       1        2 0.77777204
 [43,]       1        2 0.64588992
 [44,]       1        2 0.76173535
 [45,]       1        2 0.79871994
 [46,]       1        3 0.70972474
 [47,]       1        2 0.75773082
 [48,]       1        3 0.71445897
 [49,]       1        3 0.68783004
 [50,]       1        3 0.77713596
 [51,]       1        2 0.67775607
 [52,]       1        2 0.71140185
 [53,]       1        3 0.70031224
 [54,]       1        2 0.77134985
 [55,]       1        3 0.77327161
 [56,]       1        3 0.75375729
 [57,]       1        3 0.76339273
 [58,]       1        3 0.66391770
 [59,]       1        2 0.55908394
 [60,]       1        2 0.80461227
 [61,]       1        3 0.78286825
 [62,]       1        2 0.61163566
 [63,]       1        2 0.49868317
 [64,]       1        2 0.62499701
 [65,]       1        3 0.58644327
 [66,]       1        2 0.75832706
 [67,]       1        2 0.73515419
 [68,]       1        2 0.77179649
 [69,]       1        2 0.70718280
 [70,]       1        2 0.80906659
 [71,]       1        2 0.76234916
 [72,]       1        2 0.78600798
 [73,]       1        2 0.62273966
 [74,]       1        3 0.76015511
 [75,]       1        2 0.72356889
 [76,]       1        2 0.67646283
 [77,]       1        2 0.77586895
 [78,]       1        3 0.74577229
 [79,]       1        2 0.72714844
 [80,]       1        2 0.75023429
 [81,]       1        3 0.78051559
 [82,]       1        3 0.74659519
 [83,]       1        2 0.37629749
 [84,]       1        2 0.76864088
 [85,]       1        2 0.67889310
 [86,]       1        2 0.73443991
 [87,]       1        3 0.79729831
 [88,]       1        2 0.76738705
 [89,]       1        2 0.67436405
 [90,]       1        3 0.80044535
 [91,]       1        3 0.60233274
 [92,]       1        2 0.75259713
 [93,]       1        2 0.78502132
 [94,]       1        3 0.77899481
 [95,]       1        3 0.56533183
 [96,]       1        2 0.77225675
 [97,]       1        2 0.80401416
 [98,]       1        2 0.78061687
 [99,]       1        2 0.71516034
[100,]       1        3 0.79021249
[101,]       2        1 0.70241863
[102,]       2        3 0.79209368
[103,]       2        1 0.74503066
[104,]       2        3 0.73515231
[105,]       2        1 0.79580152
[106,]       2        1 0.77093764
[107,]       2        1 0.71275378
[108,]       2        1 0.79146235
[109,]       2        3 0.76595557
[110,]       2        3 0.65526459
[111,]       2        1 0.66672349
[112,]       2        3 0.78471899
[113,]       2        1 0.81453890
[114,]       2        1 0.63349974
[115,]       2        1 0.80800928
[116,]       2        3 0.51101276
[117,]       2        3 0.79176700
[118,]       2        1 0.73079320
[119,]       2        3 0.80804877
[120,]       2        3 0.75145419
[121,]       2        1 0.72051648
[122,]       2        3 0.76675333
[123,]       2        1 0.80515564
[124,]       2        3 0.79544740
[125,]       2        3 0.78706710
[126,]       2        1 0.81639207
[127,]       2        1 0.72828110
[128,]       2        1 0.76164969
[129,]       2        1 0.71654387
[130,]       2        1 0.81166818
[131,]       2        3 0.81102545
[132,]       2        3 0.81313187
[133,]       2        3 0.70714215
[134,]       2        3 0.74989199
[135,]       2        3 0.60943573
[136,]       2        1 0.72484975
[137,]       2        1 0.79968338
[138,]       2        3 0.68009135
[139,]       2        1 0.51972224
[140,]       2        1 0.76110701
[141,]       2        1 0.74186342
[142,]       2        1 0.69002973
[143,]       2        1 0.41335011
[144,]       2        3 0.81188394
[145,]       2        1 0.79387586
[146,]       2        1 0.41823384
[147,]       2        1 0.76335646
[148,]       2        3 0.78984467
[149,]       2        1 0.72659013
[150,]       2        3 0.77865737
[151,]       2        1 0.73633869
[152,]       2        3 0.71662619
[153,]       2        3 0.69898726
[154,]       2        1 0.70807297
[155,]       2        3 0.80906809
[156,]       2        1 0.80098373
[157,]       2        3 0.60785899
[158,]       2        3 0.08084134
[159,]       2        1 0.81356375
[160,]       2        1 0.77427892
[161,]       2        1 0.54201728
[162,]       2        1 0.72538485
[163,]       2        1 0.79889436
[164,]       2        1 0.71924211
[165,]       2        3 0.79400058
[166,]       2        3 0.64121389
[167,]       2        3 0.40638228
[168,]       2        1 0.72091454
[169,]       2        3 0.61509587
[170,]       2        1 0.55233740
[171,]       2        1 0.77868993
[172,]       2        3 0.67236472
[173,]       2        1 0.80900825
[174,]       2        3 0.69148898
[175,]       2        1 0.69073856
[176,]       2        1 0.73541163
[177,]       2        1 0.71374740
[178,]       2        3 0.76505946
[179,]       2        1 0.80205179
[180,]       2        1 0.79667770
[181,]       2        1 0.50039393
[182,]       2        3 0.75252769
[183,]       2        1 0.75120088
[184,]       2        3 0.67076875
[185,]       2        3 0.63184125
[186,]       2        1 0.79324075
[187,]       2        3 0.58571027
[188,]       2        1 0.71034423
[189,]       2        3 0.81063828
[190,]       2        3 0.78431123
[191,]       2        3 0.75983939
[192,]       2        1 0.80276685
[193,]       2        3 0.65764867
[194,]       2        3 0.78851683
[195,]       2        3 0.73360707
[196,]       2        1 0.67185902
[197,]       2        1 0.78266498
[198,]       2        1 0.71426480
[199,]       2        3 0.64064766
[200,]       2        1 0.76428626
[201,]       3        2 0.67295947
[202,]       3        2 0.81305089
[203,]       3        1 0.61358141
[204,]       3        2 0.79602984
[205,]       3        1 0.80677129
[206,]       3        1 0.63756924
[207,]       3        2 0.81970669
[208,]       3        2 0.68410217
[209,]       3        2 0.67562869
[210,]       3        2 0.42230627
[211,]       3        2 0.72677658
[212,]       3        1 0.81082149
[213,]       3        2 0.79637691
[214,]       3        1 0.78218701
[215,]       3        1 0.78498992
[216,]       3        2 0.75785678
[217,]       3        2 0.79898467
[218,]       3        1 0.78052186
[219,]       3        2 0.75233713
[220,]       3        1 0.80859864
[221,]       3        1 0.66613829
[222,]       3        2 0.81225672
[223,]       3        2 0.78841323
[224,]       3        1 0.74526796
[225,]       3        2 0.81720500
[226,]       3        1 0.74615633
[227,]       3        1 0.72725367
[228,]       3        2 0.80080151
[229,]       3        2 0.78310917
[230,]       3        2 0.66010946
[231,]       3        2 0.60134583
[232,]       3        1 0.69299075
[233,]       3        2 0.77196886
[234,]       3        2 0.74534920
[235,]       3        2 0.77667561
[236,]       3        2 0.74325995
[237,]       3        1 0.81624506
[238,]       3        2 0.81797651
[239,]       3        1 0.76498055
[240,]       3        1 0.72122489
[241,]       3        2 0.80391793
[242,]       3        2 0.51160310
[243,]       3        2 0.80582591
[244,]       3        2 0.79403215
[245,]       3        2 0.80527551
[246,]       3        1 0.81314486
[247,]       3        2 0.49560758
[248,]       3        2 0.79680532
[249,]       3        2 0.75876036
[250,]       3        2 0.81074691
[251,]       3        1 0.79085605
[252,]       3        2 0.81933092
[253,]       3        2 0.72954869
[254,]       3        1 0.78569922
[255,]       3        2 0.67525035
[256,]       3        2 0.80449649
[257,]       3        2 0.81984067
[258,]       3        2 0.56278570
[259,]       3        2 0.77763322
[260,]       3        1 0.81730684
[261,]       3        1 0.75258482
[262,]       3        1 0.40704343
[263,]       3        1 0.77428739
[264,]       3        2 0.77174292
[265,]       3        1 0.67395036
[266,]       3        1 0.57427801
[267,]       3        1 0.50973333
[268,]       3        2 0.79285488
[269,]       3        2 0.66942719
[270,]       3        2 0.81500455
[271,]       3        2 0.47454426
[272,]       3        1 0.73734117
[273,]       3        2 0.77936551
[274,]       3        1 0.67735004
[275,]       3        2 0.74597111
[276,]       3        1 0.74397088
[277,]       3        1 0.59894909
[278,]       3        2 0.68080024
[279,]       3        2 0.81526662
[280,]       3        2 0.78505267
[281,]       3        2 0.75964678
[282,]       3        1 0.61765678
[283,]       3        2 0.82045165
[284,]       3        2 0.73999843
[285,]       3        2 0.81303455
[286,]       3        2 0.73987382
[287,]       3        2 0.78422685
[288,]       3        2 0.78668197
[289,]       3        2 0.74931796
[290,]       3        2 0.71842152
[291,]       3        2 0.73300352
[292,]       3        1 0.76397109
[293,]       3        1 0.77445519
[294,]       3        1 0.61082096
[295,]       3        2 0.68112066
[296,]       3        2 0.80072791
[297,]       3        2 0.39303723
[298,]       3        2 0.81437524
[299,]       3        2 0.55867340
[300,]       3        2 0.75298188
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = single_clusters_three_s, dist = dist(three_spheres_scaled))
attr(,"class")
[1] "silhouette"
avg_three_s_single <- mean(three_s_single_sils[, "sil_width"])

(three_s_complete_sils <- silhouette(
  x   = complete_clusters_three_s,
  dist = dist(three_spheres_scaled)
))
       cluster neighbor   sil_width
  [1,]       1        2  0.79564151
  [2,]       1        3  0.64040841
  [3,]       1        2  0.77364736
  [4,]       1        2  0.65196172
  [5,]       1        3  0.60076331
  [6,]       1        2  0.73093611
  [7,]       1        2  0.74416723
  [8,]       1        2  0.58203934
  [9,]       1        2  0.76368067
 [10,]       1        3  0.78493486
 [11,]       1        2  0.76046504
 [12,]       1        3  0.73243304
 [13,]       1        2  0.36443216
 [14,]       1        3  0.56079735
 [15,]       1        2  0.79452320
 [16,]       1        2  0.46798837
 [17,]       1        3  0.78107344
 [18,]       1        2  0.78334650
 [19,]       1        3  0.74650414
 [20,]       1        3  0.58249447
 [21,]       1        2  0.76071463
 [22,]       1        2  0.75817428
 [23,]       1        3  0.77235721
 [24,]       1        2  0.76304955
 [25,]       1        2  0.77462111
 [26,]       1        2  0.75087560
 [27,]       1        2  0.80542730
 [28,]       1        3  0.62015760
 [29,]       1        2  0.57306601
 [30,]       1        3  0.74054210
 [31,]       1        2  0.79474232
 [32,]       1        2  0.80016342
 [33,]       1        2  0.78934263
 [34,]       1        2  0.80078586
 [35,]       1        2  0.21246097
 [36,]       1        2  0.80531712
 [37,]       1        2  0.76736297
 [38,]       1        2  0.79061345
 [39,]       1        3  0.77797225
 [40,]       1        2  0.79637979
 [41,]       1        2  0.80402981
 [42,]       1        2  0.77791807
 [43,]       1        2  0.64596902
 [44,]       1        2  0.76202064
 [45,]       1        2  0.79879942
 [46,]       1        3  0.70936376
 [47,]       1        2  0.75779655
 [48,]       1        3  0.71438293
 [49,]       1        3  0.68784038
 [50,]       1        3  0.77701353
 [51,]       1        2  0.67760347
 [52,]       1        2  0.71129614
 [53,]       1        3  0.70030993
 [54,]       1        2  0.77150033
 [55,]       1        3  0.77312680
 [56,]       1        3  0.75366498
 [57,]       1        3  0.76328741
 [58,]       1        3  0.66398108
 [59,]       1        2  0.55878978
 [60,]       1        2  0.80474925
 [61,]       1        3  0.78272896
 [62,]       1        2  0.61204056
 [63,]       1        2  0.49803334
 [64,]       1        2  0.62499680
 [65,]       1        3  0.58664322
 [66,]       1        2  0.75832348
 [67,]       1        2  0.73520964
 [68,]       1        2  0.77191938
 [69,]       1        2  0.70708133
 [70,]       1        2  0.80920681
 [71,]       1        2  0.76234654
 [72,]       1        2  0.78606135
 [73,]       1        2  0.62252423
 [74,]       1        3  0.75987608
 [75,]       1        2  0.72380905
 [76,]       1        2  0.67637314
 [77,]       1        2  0.77595336
 [78,]       1        3  0.74566981
 [79,]       1        2  0.72707713
 [80,]       1        2  0.75021034
 [81,]       1        3  0.78038397
 [82,]       1        3  0.74649802
 [83,]       1        2  0.37498886
 [84,]       1        2  0.76887329
 [85,]       1        2  0.67879113
 [86,]       1        3  0.73439192
 [87,]       1        3  0.79713394
 [88,]       1        2  0.76757913
 [89,]       1        2  0.67436290
 [90,]       1        3  0.80028604
 [91,]       1        3  0.60233083
 [92,]       1        2  0.75274257
 [93,]       1        2  0.78509684
 [94,]       1        3  0.77882923
 [95,]       1        3  0.56564964
 [96,]       1        2  0.77231982
 [97,]       1        2  0.80412332
 [98,]       1        2  0.78074181
 [99,]       1        2  0.71533176
[100,]       1        3  0.79006769
[101,]       2        1  0.70516592
[102,]       2        3  0.79415038
[103,]       2        1  0.74885997
[104,]       2        3  0.73716273
[105,]       2        1  0.79925293
[106,]       2        1  0.77477406
[107,]       2        1  0.71542069
[108,]       2        1  0.79467109
[109,]       2        3  0.76814480
[110,]       2        3  0.65290794
[111,]       2        1  0.66777712
[112,]       2        3  0.78664039
[113,]       2        1  0.81783794
[114,]       2        1  0.63752664
[115,]       2        1  0.81095095
[116,]       2        3  0.50542419
[117,]       2        3  0.79288842
[118,]       2        1  0.73483414
[119,]       2        3  0.81016895
[120,]       2        3  0.75288952
[121,]       2        1  0.72391019
[122,]       2        3  0.76717400
[123,]       2        3  0.80751716
[124,]       2        3  0.79774435
[125,]       2        3  0.78806050
[126,]       2        1  0.81948435
[127,]       2        1  0.73192255
[128,]       2        1  0.76431284
[129,]       2        1  0.72020780
[130,]       2        1  0.81497789
[131,]       2        3  0.81310254
[132,]       2        3  0.81505160
[133,]       2        3  0.70628316
[134,]       2        3  0.75202152
[135,]       2        3  0.61035640
[136,]       2        1  0.72872039
[137,]       2        1  0.80239938
[138,]       2        3  0.68172563
[139,]       2        1  0.52139611
[140,]       2        1  0.76503031
[141,]       2        1  0.74436453
[142,]       2        1  0.69220632
[143,]       2        1  0.41200878
[144,]       2        3  0.81384646
[145,]       2        1  0.79660060
[146,]       2        1  0.41808839
[147,]       2        1  0.76726160
[148,]       2        3  0.79118922
[149,]       2        1  0.72942553
[150,]       2        3  0.77992083
[151,]       2        1  0.74037578
[152,]       2        3  0.71575791
[153,]       2        3  0.69833864
[154,]       2        1  0.71139210
[155,]       2        3  0.81082871
[156,]       2        1  0.80444694
[157,]       2        3  0.60412793
[158,]       3        2 -0.08084134
[159,]       2        1  0.81692858
[160,]       2        1  0.77779750
[161,]       2        1  0.54507854
[162,]       2        1  0.72945866
[163,]       2        1  0.80252847
[164,]       2        1  0.72302975
[165,]       2        3  0.79520744
[166,]       2        3  0.64223626
[167,]       2        3  0.39738751
[168,]       2        1  0.72437580
[169,]       2        3  0.61251243
[170,]       2        1  0.55323788
[171,]       2        1  0.78211440
[172,]       2        3  0.67048181
[173,]       2        1  0.81240992
[174,]       2        3  0.69286763
[175,]       2        1  0.69273111
[176,]       2        1  0.73893278
[177,]       2        1  0.71522262
[178,]       2        3  0.76567888
[179,]       2        1  0.80565329
[180,]       2        1  0.80029063
[181,]       2        1  0.50162263
[182,]       2        3  0.75267926
[183,]       2        1  0.75358157
[184,]       2        3  0.66896438
[185,]       2        3  0.62917753
[186,]       2        1  0.79689828
[187,]       2        3  0.58139679
[188,]       2        1  0.71220302
[189,]       2        3  0.81286747
[190,]       2        3  0.78619243
[191,]       2        3  0.76087127
[192,]       2        1  0.80634148
[193,]       2        3  0.65521723
[194,]       2        3  0.79041949
[195,]       2        3  0.73354961
[196,]       2        1  0.67272831
[197,]       2        1  0.78649135
[198,]       2        1  0.71591949
[199,]       2        3  0.64181461
[200,]       2        1  0.76813908
[201,]       3        2  0.67425425
[202,]       3        2  0.81078757
[203,]       3        1  0.61146054
[204,]       3        2  0.79420668
[205,]       3        1  0.80290242
[206,]       3        1  0.63372482
[207,]       3        2  0.81675826
[208,]       3        2  0.68512944
[209,]       3        2  0.67673021
[210,]       3        2  0.42911724
[211,]       3        2  0.72673775
[212,]       3        1  0.80694880
[213,]       3        2  0.79445420
[214,]       3        1  0.77839893
[215,]       3        1  0.78115313
[216,]       3        2  0.75512782
[217,]       3        2  0.79644567
[218,]       3        1  0.77652815
[219,]       3        2  0.75166906
[220,]       3        1  0.80469680
[221,]       3        1  0.66274777
[222,]       3        2  0.80999994
[223,]       3        2  0.78679485
[224,]       3        1  0.74203557
[225,]       3        2  0.81476333
[226,]       3        1  0.74245530
[227,]       3        1  0.72303349
[228,]       3        2  0.79880415
[229,]       3        2  0.78051834
[230,]       3        2  0.66112709
[231,]       3        2  0.60408922
[232,]       3        1  0.68884600
[233,]       3        2  0.77075651
[234,]       3        2  0.74430765
[235,]       3        2  0.77505791
[236,]       3        2  0.74273358
[237,]       3        1  0.81258906
[238,]       3        2  0.81498595
[239,]       3        1  0.76103648
[240,]       3        1  0.71699978
[241,]       3        2  0.80157183
[242,]       3        2  0.51672818
[243,]       3        2  0.80372631
[244,]       3        2  0.79205568
[245,]       3        2  0.80226509
[246,]       3        1  0.80929250
[247,]       3        2  0.50117862
[248,]       3        2  0.79393612
[249,]       3        2  0.75764909
[250,]       3        2  0.80801740
[251,]       3        1  0.78683296
[252,]       3        2  0.81670886
[253,]       3        2  0.72861181
[254,]       3        1  0.78172844
[255,]       3        2  0.67617709
[256,]       3        2  0.80250116
[257,]       3        2  0.81729447
[258,]       3        2  0.56671649
[259,]       3        2  0.77627927
[260,]       3        1  0.81350924
[261,]       3        1  0.74863152
[262,]       3        1  0.40618381
[263,]       3        1  0.77119200
[264,]       3        2  0.76984074
[265,]       3        1  0.66990556
[266,]       3        1  0.57020764
[267,]       3        1  0.50557749
[268,]       3        2  0.79046806
[269,]       3        2  0.66958484
[270,]       3        2  0.81246551
[271,]       3        2  0.48065118
[272,]       3        1  0.73328675
[273,]       3        2  0.77646413
[274,]       3        1  0.67317898
[275,]       3        2  0.74508919
[276,]       3        1  0.73994471
[277,]       3        1  0.59489905
[278,]       3        2  0.68150291
[279,]       3        2  0.81285165
[280,]       3        2  0.78269492
[281,]       3        2  0.75711607
[282,]       3        1  0.61340389
[283,]       3        2  0.81788033
[284,]       3        2  0.73968025
[285,]       3        2  0.81005624
[286,]       3        1  0.73762654
[287,]       3        2  0.78195328
[288,]       3        2  0.78501961
[289,]       3        2  0.74779264
[290,]       3        2  0.71700714
[291,]       3        2  0.73285547
[292,]       3        1  0.75992702
[293,]       3        1  0.77116526
[294,]       3        1  0.60656575
[295,]       3        2  0.68175795
[296,]       3        2  0.79866577
[297,]       3        2  0.39929805
[298,]       3        2  0.81195857
[299,]       3        2  0.56246881
[300,]       3        2  0.75222840
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = complete_clusters_three_s, dist = dist(three_spheres_scaled))
attr(,"class")
[1] "silhouette"
avg_three_s_complete <- mean(three_s_complete_sils[, "sil_width"])

(three_s_average_sils <- silhouette(
  x   = average_clusters_three_s,
  dist = dist(three_spheres_scaled)
))
       cluster neighbor   sil_width
  [1,]       1        2  0.79564151
  [2,]       1        3  0.64040841
  [3,]       1        2  0.77364736
  [4,]       1        2  0.65196172
  [5,]       1        3  0.60076331
  [6,]       1        2  0.73093611
  [7,]       1        2  0.74416723
  [8,]       1        2  0.58203934
  [9,]       1        2  0.76368067
 [10,]       1        3  0.78493486
 [11,]       1        2  0.76046504
 [12,]       1        3  0.73243304
 [13,]       1        2  0.36443216
 [14,]       1        3  0.56079735
 [15,]       1        2  0.79452320
 [16,]       1        2  0.46798837
 [17,]       1        3  0.78107344
 [18,]       1        2  0.78334650
 [19,]       1        3  0.74650414
 [20,]       1        3  0.58249447
 [21,]       1        2  0.76071463
 [22,]       1        2  0.75817428
 [23,]       1        3  0.77235721
 [24,]       1        2  0.76304955
 [25,]       1        2  0.77462111
 [26,]       1        2  0.75087560
 [27,]       1        2  0.80542730
 [28,]       1        3  0.62015760
 [29,]       1        2  0.57306601
 [30,]       1        3  0.74054210
 [31,]       1        2  0.79474232
 [32,]       1        2  0.80016342
 [33,]       1        2  0.78934263
 [34,]       1        2  0.80078586
 [35,]       1        2  0.21246097
 [36,]       1        2  0.80531712
 [37,]       1        2  0.76736297
 [38,]       1        2  0.79061345
 [39,]       1        3  0.77797225
 [40,]       1        2  0.79637979
 [41,]       1        2  0.80402981
 [42,]       1        2  0.77791807
 [43,]       1        2  0.64596902
 [44,]       1        2  0.76202064
 [45,]       1        2  0.79879942
 [46,]       1        3  0.70936376
 [47,]       1        2  0.75779655
 [48,]       1        3  0.71438293
 [49,]       1        3  0.68784038
 [50,]       1        3  0.77701353
 [51,]       1        2  0.67760347
 [52,]       1        2  0.71129614
 [53,]       1        3  0.70030993
 [54,]       1        2  0.77150033
 [55,]       1        3  0.77312680
 [56,]       1        3  0.75366498
 [57,]       1        3  0.76328741
 [58,]       1        3  0.66398108
 [59,]       1        2  0.55878978
 [60,]       1        2  0.80474925
 [61,]       1        3  0.78272896
 [62,]       1        2  0.61204056
 [63,]       1        2  0.49803334
 [64,]       1        2  0.62499680
 [65,]       1        3  0.58664322
 [66,]       1        2  0.75832348
 [67,]       1        2  0.73520964
 [68,]       1        2  0.77191938
 [69,]       1        2  0.70708133
 [70,]       1        2  0.80920681
 [71,]       1        2  0.76234654
 [72,]       1        2  0.78606135
 [73,]       1        2  0.62252423
 [74,]       1        3  0.75987608
 [75,]       1        2  0.72380905
 [76,]       1        2  0.67637314
 [77,]       1        2  0.77595336
 [78,]       1        3  0.74566981
 [79,]       1        2  0.72707713
 [80,]       1        2  0.75021034
 [81,]       1        3  0.78038397
 [82,]       1        3  0.74649802
 [83,]       1        2  0.37498886
 [84,]       1        2  0.76887329
 [85,]       1        2  0.67879113
 [86,]       1        3  0.73439192
 [87,]       1        3  0.79713394
 [88,]       1        2  0.76757913
 [89,]       1        2  0.67436290
 [90,]       1        3  0.80028604
 [91,]       1        3  0.60233083
 [92,]       1        2  0.75274257
 [93,]       1        2  0.78509684
 [94,]       1        3  0.77882923
 [95,]       1        3  0.56564964
 [96,]       1        2  0.77231982
 [97,]       1        2  0.80412332
 [98,]       1        2  0.78074181
 [99,]       1        2  0.71533176
[100,]       1        3  0.79006769
[101,]       2        1  0.70516592
[102,]       2        3  0.79415038
[103,]       2        1  0.74885997
[104,]       2        3  0.73716273
[105,]       2        1  0.79925293
[106,]       2        1  0.77477406
[107,]       2        1  0.71542069
[108,]       2        1  0.79467109
[109,]       2        3  0.76814480
[110,]       2        3  0.65290794
[111,]       2        1  0.66777712
[112,]       2        3  0.78664039
[113,]       2        1  0.81783794
[114,]       2        1  0.63752664
[115,]       2        1  0.81095095
[116,]       2        3  0.50542419
[117,]       2        3  0.79288842
[118,]       2        1  0.73483414
[119,]       2        3  0.81016895
[120,]       2        3  0.75288952
[121,]       2        1  0.72391019
[122,]       2        3  0.76717400
[123,]       2        3  0.80751716
[124,]       2        3  0.79774435
[125,]       2        3  0.78806050
[126,]       2        1  0.81948435
[127,]       2        1  0.73192255
[128,]       2        1  0.76431284
[129,]       2        1  0.72020780
[130,]       2        1  0.81497789
[131,]       2        3  0.81310254
[132,]       2        3  0.81505160
[133,]       2        3  0.70628316
[134,]       2        3  0.75202152
[135,]       2        3  0.61035640
[136,]       2        1  0.72872039
[137,]       2        1  0.80239938
[138,]       2        3  0.68172563
[139,]       2        1  0.52139611
[140,]       2        1  0.76503031
[141,]       2        1  0.74436453
[142,]       2        1  0.69220632
[143,]       2        1  0.41200878
[144,]       2        3  0.81384646
[145,]       2        1  0.79660060
[146,]       2        1  0.41808839
[147,]       2        1  0.76726160
[148,]       2        3  0.79118922
[149,]       2        1  0.72942553
[150,]       2        3  0.77992083
[151,]       2        1  0.74037578
[152,]       2        3  0.71575791
[153,]       2        3  0.69833864
[154,]       2        1  0.71139210
[155,]       2        3  0.81082871
[156,]       2        1  0.80444694
[157,]       2        3  0.60412793
[158,]       3        2 -0.08084134
[159,]       2        1  0.81692858
[160,]       2        1  0.77779750
[161,]       2        1  0.54507854
[162,]       2        1  0.72945866
[163,]       2        1  0.80252847
[164,]       2        1  0.72302975
[165,]       2        3  0.79520744
[166,]       2        3  0.64223626
[167,]       2        3  0.39738751
[168,]       2        1  0.72437580
[169,]       2        3  0.61251243
[170,]       2        1  0.55323788
[171,]       2        1  0.78211440
[172,]       2        3  0.67048181
[173,]       2        1  0.81240992
[174,]       2        3  0.69286763
[175,]       2        1  0.69273111
[176,]       2        1  0.73893278
[177,]       2        1  0.71522262
[178,]       2        3  0.76567888
[179,]       2        1  0.80565329
[180,]       2        1  0.80029063
[181,]       2        1  0.50162263
[182,]       2        3  0.75267926
[183,]       2        1  0.75358157
[184,]       2        3  0.66896438
[185,]       2        3  0.62917753
[186,]       2        1  0.79689828
[187,]       2        3  0.58139679
[188,]       2        1  0.71220302
[189,]       2        3  0.81286747
[190,]       2        3  0.78619243
[191,]       2        3  0.76087127
[192,]       2        1  0.80634148
[193,]       2        3  0.65521723
[194,]       2        3  0.79041949
[195,]       2        3  0.73354961
[196,]       2        1  0.67272831
[197,]       2        1  0.78649135
[198,]       2        1  0.71591949
[199,]       2        3  0.64181461
[200,]       2        1  0.76813908
[201,]       3        2  0.67425425
[202,]       3        2  0.81078757
[203,]       3        1  0.61146054
[204,]       3        2  0.79420668
[205,]       3        1  0.80290242
[206,]       3        1  0.63372482
[207,]       3        2  0.81675826
[208,]       3        2  0.68512944
[209,]       3        2  0.67673021
[210,]       3        2  0.42911724
[211,]       3        2  0.72673775
[212,]       3        1  0.80694880
[213,]       3        2  0.79445420
[214,]       3        1  0.77839893
[215,]       3        1  0.78115313
[216,]       3        2  0.75512782
[217,]       3        2  0.79644567
[218,]       3        1  0.77652815
[219,]       3        2  0.75166906
[220,]       3        1  0.80469680
[221,]       3        1  0.66274777
[222,]       3        2  0.80999994
[223,]       3        2  0.78679485
[224,]       3        1  0.74203557
[225,]       3        2  0.81476333
[226,]       3        1  0.74245530
[227,]       3        1  0.72303349
[228,]       3        2  0.79880415
[229,]       3        2  0.78051834
[230,]       3        2  0.66112709
[231,]       3        2  0.60408922
[232,]       3        1  0.68884600
[233,]       3        2  0.77075651
[234,]       3        2  0.74430765
[235,]       3        2  0.77505791
[236,]       3        2  0.74273358
[237,]       3        1  0.81258906
[238,]       3        2  0.81498595
[239,]       3        1  0.76103648
[240,]       3        1  0.71699978
[241,]       3        2  0.80157183
[242,]       3        2  0.51672818
[243,]       3        2  0.80372631
[244,]       3        2  0.79205568
[245,]       3        2  0.80226509
[246,]       3        1  0.80929250
[247,]       3        2  0.50117862
[248,]       3        2  0.79393612
[249,]       3        2  0.75764909
[250,]       3        2  0.80801740
[251,]       3        1  0.78683296
[252,]       3        2  0.81670886
[253,]       3        2  0.72861181
[254,]       3        1  0.78172844
[255,]       3        2  0.67617709
[256,]       3        2  0.80250116
[257,]       3        2  0.81729447
[258,]       3        2  0.56671649
[259,]       3        2  0.77627927
[260,]       3        1  0.81350924
[261,]       3        1  0.74863152
[262,]       3        1  0.40618381
[263,]       3        1  0.77119200
[264,]       3        2  0.76984074
[265,]       3        1  0.66990556
[266,]       3        1  0.57020764
[267,]       3        1  0.50557749
[268,]       3        2  0.79046806
[269,]       3        2  0.66958484
[270,]       3        2  0.81246551
[271,]       3        2  0.48065118
[272,]       3        1  0.73328675
[273,]       3        2  0.77646413
[274,]       3        1  0.67317898
[275,]       3        2  0.74508919
[276,]       3        1  0.73994471
[277,]       3        1  0.59489905
[278,]       3        2  0.68150291
[279,]       3        2  0.81285165
[280,]       3        2  0.78269492
[281,]       3        2  0.75711607
[282,]       3        1  0.61340389
[283,]       3        2  0.81788033
[284,]       3        2  0.73968025
[285,]       3        2  0.81005624
[286,]       3        1  0.73762654
[287,]       3        2  0.78195328
[288,]       3        2  0.78501961
[289,]       3        2  0.74779264
[290,]       3        2  0.71700714
[291,]       3        2  0.73285547
[292,]       3        1  0.75992702
[293,]       3        1  0.77116526
[294,]       3        1  0.60656575
[295,]       3        2  0.68175795
[296,]       3        2  0.79866577
[297,]       3        2  0.39929805
[298,]       3        2  0.81195857
[299,]       3        2  0.56246881
[300,]       3        2  0.75222840
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = average_clusters_three_s, dist = dist(three_spheres_scaled))
attr(,"class")
[1] "silhouette"
avg_three_s_average <- mean(three_s_average_sils[, "sil_width"])

(three_s_ward_sils <- silhouette(
  x   = ward_clusters_three_s,
  dist = dist(three_spheres_scaled)
))
       cluster neighbor  sil_width
  [1,]       1        2 0.79551757
  [2,]       1        3 0.64028913
  [3,]       1        2 0.77362112
  [4,]       1        2 0.65191128
  [5,]       1        3 0.60057057
  [6,]       1        2 0.73082387
  [7,]       1        2 0.74420373
  [8,]       1        2 0.58242564
  [9,]       1        2 0.76366387
 [10,]       1        3 0.78509079
 [11,]       1        2 0.76022170
 [12,]       1        3 0.73250182
 [13,]       1        2 0.36493927
 [14,]       1        3 0.56058046
 [15,]       1        2 0.79440474
 [16,]       1        2 0.46884733
 [17,]       1        3 0.78120347
 [18,]       1        2 0.78327018
 [19,]       1        3 0.74658443
 [20,]       1        3 0.58230187
 [21,]       1        2 0.76072052
 [22,]       1        2 0.75811315
 [23,]       1        3 0.77247879
 [24,]       1        2 0.76292648
 [25,]       1        2 0.77435993
 [26,]       1        2 0.75080836
 [27,]       1        2 0.80526870
 [28,]       1        3 0.61999927
 [29,]       1        2 0.57262743
 [30,]       1        3 0.74062817
 [31,]       1        2 0.79464839
 [32,]       1        2 0.80005986
 [33,]       1        2 0.78922854
 [34,]       1        2 0.80070130
 [35,]       1        2 0.21458653
 [36,]       1        2 0.80520709
 [37,]       1        2 0.76719074
 [38,]       1        2 0.79038318
 [39,]       1        3 0.77817505
 [40,]       1        2 0.79625818
 [41,]       1        2 0.80385686
 [42,]       1        2 0.77777204
 [43,]       1        2 0.64588992
 [44,]       1        2 0.76173535
 [45,]       1        2 0.79871994
 [46,]       1        3 0.70972474
 [47,]       1        2 0.75773082
 [48,]       1        3 0.71445897
 [49,]       1        3 0.68783004
 [50,]       1        3 0.77713596
 [51,]       1        2 0.67775607
 [52,]       1        2 0.71140185
 [53,]       1        3 0.70031224
 [54,]       1        2 0.77134985
 [55,]       1        3 0.77327161
 [56,]       1        3 0.75375729
 [57,]       1        3 0.76339273
 [58,]       1        3 0.66391770
 [59,]       1        2 0.55908394
 [60,]       1        2 0.80461227
 [61,]       1        3 0.78286825
 [62,]       1        2 0.61163566
 [63,]       1        2 0.49868317
 [64,]       1        2 0.62499701
 [65,]       1        3 0.58644327
 [66,]       1        2 0.75832706
 [67,]       1        2 0.73515419
 [68,]       1        2 0.77179649
 [69,]       1        2 0.70718280
 [70,]       1        2 0.80906659
 [71,]       1        2 0.76234916
 [72,]       1        2 0.78600798
 [73,]       1        2 0.62273966
 [74,]       1        3 0.76015511
 [75,]       1        2 0.72356889
 [76,]       1        2 0.67646283
 [77,]       1        2 0.77586895
 [78,]       1        3 0.74577229
 [79,]       1        2 0.72714844
 [80,]       1        2 0.75023429
 [81,]       1        3 0.78051559
 [82,]       1        3 0.74659519
 [83,]       1        2 0.37629749
 [84,]       1        2 0.76864088
 [85,]       1        2 0.67889310
 [86,]       1        2 0.73443991
 [87,]       1        3 0.79729831
 [88,]       1        2 0.76738705
 [89,]       1        2 0.67436405
 [90,]       1        3 0.80044535
 [91,]       1        3 0.60233274
 [92,]       1        2 0.75259713
 [93,]       1        2 0.78502132
 [94,]       1        3 0.77899481
 [95,]       1        3 0.56533183
 [96,]       1        2 0.77225675
 [97,]       1        2 0.80401416
 [98,]       1        2 0.78061687
 [99,]       1        2 0.71516034
[100,]       1        3 0.79021249
[101,]       2        1 0.70241863
[102,]       2        3 0.79209368
[103,]       2        1 0.74503066
[104,]       2        3 0.73515231
[105,]       2        1 0.79580152
[106,]       2        1 0.77093764
[107,]       2        1 0.71275378
[108,]       2        1 0.79146235
[109,]       2        3 0.76595557
[110,]       2        3 0.65526459
[111,]       2        1 0.66672349
[112,]       2        3 0.78471899
[113,]       2        1 0.81453890
[114,]       2        1 0.63349974
[115,]       2        1 0.80800928
[116,]       2        3 0.51101276
[117,]       2        3 0.79176700
[118,]       2        1 0.73079320
[119,]       2        3 0.80804877
[120,]       2        3 0.75145419
[121,]       2        1 0.72051648
[122,]       2        3 0.76675333
[123,]       2        1 0.80515564
[124,]       2        3 0.79544740
[125,]       2        3 0.78706710
[126,]       2        1 0.81639207
[127,]       2        1 0.72828110
[128,]       2        1 0.76164969
[129,]       2        1 0.71654387
[130,]       2        1 0.81166818
[131,]       2        3 0.81102545
[132,]       2        3 0.81313187
[133,]       2        3 0.70714215
[134,]       2        3 0.74989199
[135,]       2        3 0.60943573
[136,]       2        1 0.72484975
[137,]       2        1 0.79968338
[138,]       2        3 0.68009135
[139,]       2        1 0.51972224
[140,]       2        1 0.76110701
[141,]       2        1 0.74186342
[142,]       2        1 0.69002973
[143,]       2        1 0.41335011
[144,]       2        3 0.81188394
[145,]       2        1 0.79387586
[146,]       2        1 0.41823384
[147,]       2        1 0.76335646
[148,]       2        3 0.78984467
[149,]       2        1 0.72659013
[150,]       2        3 0.77865737
[151,]       2        1 0.73633869
[152,]       2        3 0.71662619
[153,]       2        3 0.69898726
[154,]       2        1 0.70807297
[155,]       2        3 0.80906809
[156,]       2        1 0.80098373
[157,]       2        3 0.60785899
[158,]       2        3 0.08084134
[159,]       2        1 0.81356375
[160,]       2        1 0.77427892
[161,]       2        1 0.54201728
[162,]       2        1 0.72538485
[163,]       2        1 0.79889436
[164,]       2        1 0.71924211
[165,]       2        3 0.79400058
[166,]       2        3 0.64121389
[167,]       2        3 0.40638228
[168,]       2        1 0.72091454
[169,]       2        3 0.61509587
[170,]       2        1 0.55233740
[171,]       2        1 0.77868993
[172,]       2        3 0.67236472
[173,]       2        1 0.80900825
[174,]       2        3 0.69148898
[175,]       2        1 0.69073856
[176,]       2        1 0.73541163
[177,]       2        1 0.71374740
[178,]       2        3 0.76505946
[179,]       2        1 0.80205179
[180,]       2        1 0.79667770
[181,]       2        1 0.50039393
[182,]       2        3 0.75252769
[183,]       2        1 0.75120088
[184,]       2        3 0.67076875
[185,]       2        3 0.63184125
[186,]       2        1 0.79324075
[187,]       2        3 0.58571027
[188,]       2        1 0.71034423
[189,]       2        3 0.81063828
[190,]       2        3 0.78431123
[191,]       2        3 0.75983939
[192,]       2        1 0.80276685
[193,]       2        3 0.65764867
[194,]       2        3 0.78851683
[195,]       2        3 0.73360707
[196,]       2        1 0.67185902
[197,]       2        1 0.78266498
[198,]       2        1 0.71426480
[199,]       2        3 0.64064766
[200,]       2        1 0.76428626
[201,]       3        2 0.67295947
[202,]       3        2 0.81305089
[203,]       3        1 0.61358141
[204,]       3        2 0.79602984
[205,]       3        1 0.80677129
[206,]       3        1 0.63756924
[207,]       3        2 0.81970669
[208,]       3        2 0.68410217
[209,]       3        2 0.67562869
[210,]       3        2 0.42230627
[211,]       3        2 0.72677658
[212,]       3        1 0.81082149
[213,]       3        2 0.79637691
[214,]       3        1 0.78218701
[215,]       3        1 0.78498992
[216,]       3        2 0.75785678
[217,]       3        2 0.79898467
[218,]       3        1 0.78052186
[219,]       3        2 0.75233713
[220,]       3        1 0.80859864
[221,]       3        1 0.66613829
[222,]       3        2 0.81225672
[223,]       3        2 0.78841323
[224,]       3        1 0.74526796
[225,]       3        2 0.81720500
[226,]       3        1 0.74615633
[227,]       3        1 0.72725367
[228,]       3        2 0.80080151
[229,]       3        2 0.78310917
[230,]       3        2 0.66010946
[231,]       3        2 0.60134583
[232,]       3        1 0.69299075
[233,]       3        2 0.77196886
[234,]       3        2 0.74534920
[235,]       3        2 0.77667561
[236,]       3        2 0.74325995
[237,]       3        1 0.81624506
[238,]       3        2 0.81797651
[239,]       3        1 0.76498055
[240,]       3        1 0.72122489
[241,]       3        2 0.80391793
[242,]       3        2 0.51160310
[243,]       3        2 0.80582591
[244,]       3        2 0.79403215
[245,]       3        2 0.80527551
[246,]       3        1 0.81314486
[247,]       3        2 0.49560758
[248,]       3        2 0.79680532
[249,]       3        2 0.75876036
[250,]       3        2 0.81074691
[251,]       3        1 0.79085605
[252,]       3        2 0.81933092
[253,]       3        2 0.72954869
[254,]       3        1 0.78569922
[255,]       3        2 0.67525035
[256,]       3        2 0.80449649
[257,]       3        2 0.81984067
[258,]       3        2 0.56278570
[259,]       3        2 0.77763322
[260,]       3        1 0.81730684
[261,]       3        1 0.75258482
[262,]       3        1 0.40704343
[263,]       3        1 0.77428739
[264,]       3        2 0.77174292
[265,]       3        1 0.67395036
[266,]       3        1 0.57427801
[267,]       3        1 0.50973333
[268,]       3        2 0.79285488
[269,]       3        2 0.66942719
[270,]       3        2 0.81500455
[271,]       3        2 0.47454426
[272,]       3        1 0.73734117
[273,]       3        2 0.77936551
[274,]       3        1 0.67735004
[275,]       3        2 0.74597111
[276,]       3        1 0.74397088
[277,]       3        1 0.59894909
[278,]       3        2 0.68080024
[279,]       3        2 0.81526662
[280,]       3        2 0.78505267
[281,]       3        2 0.75964678
[282,]       3        1 0.61765678
[283,]       3        2 0.82045165
[284,]       3        2 0.73999843
[285,]       3        2 0.81303455
[286,]       3        2 0.73987382
[287,]       3        2 0.78422685
[288,]       3        2 0.78668197
[289,]       3        2 0.74931796
[290,]       3        2 0.71842152
[291,]       3        2 0.73300352
[292,]       3        1 0.76397109
[293,]       3        1 0.77445519
[294,]       3        1 0.61082096
[295,]       3        2 0.68112066
[296,]       3        2 0.80072791
[297,]       3        2 0.39303723
[298,]       3        2 0.81437524
[299,]       3        2 0.55867340
[300,]       3        2 0.75298188
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = ward_clusters_three_s, dist = dist(three_spheres_scaled))
attr(,"class")
[1] "silhouette"
avg_three_s_ward <- mean(three_s_ward_sils[, "sil_width"])
title_three_single   <- paste("Three spheres – single (s =",   round(avg_three_s_single, 3), ")")
title_three_complete <- paste("Three spheres – complete (s =", round(avg_three_s_complete, 3), ")")
title_three_average  <- paste("Three spheres – average (s =",  round(avg_three_s_average, 3), ")")
title_three_ward     <- paste("Three spheres – ward (s =",     round(avg_three_s_ward, 3), ")")
(ring_m_single_sils <- silhouette(
  x   = single_clusters_ring_m,
  dist = dist(ring_moon_sphere_scaled)
))
       cluster neighbor    sil_width
  [1,]       1        2  0.618402319
  [2,]       1        2  0.688924707
  [3,]       1        2  0.726520903
  [4,]       1        2  0.715908828
  [5,]       1        2  0.710009100
  [6,]       1        2  0.739316285
  [7,]       1        2  0.519426237
  [8,]       1        2  0.678698117
  [9,]       1        2  0.733631398
 [10,]       1        2  0.732706612
 [11,]       1        2  0.729636621
 [12,]       1        2  0.729385813
 [13,]       1        2  0.746788228
 [14,]       1        2  0.737645880
 [15,]       1        2  0.623915823
 [16,]       1        2  0.669517618
 [17,]       1        2  0.533968656
 [18,]       1        2  0.722391047
 [19,]       1        2  0.618424009
 [20,]       1        2  0.675474805
 [21,]       1        2  0.641841939
 [22,]       1        2  0.357859660
 [23,]       1        2  0.540533923
 [24,]       1        2  0.463647134
 [25,]       1        2  0.657422416
 [26,]       1        2  0.696849769
 [27,]       1        2  0.729347004
 [28,]       1        2  0.620005672
 [29,]       1        2  0.731697020
 [30,]       1        2  0.720275884
 [31,]       1        2  0.705654282
 [32,]       1        2  0.688244703
 [33,]       1        2  0.619920441
 [34,]       1        2  0.704802786
 [35,]       1        2  0.644540825
 [36,]       1        2  0.714972454
 [37,]       1        2  0.629603677
 [38,]       1        2  0.616154704
 [39,]       1        2  0.731096198
 [40,]       1        2  0.611783224
 [41,]       1        2  0.679593132
 [42,]       1        2  0.715263067
 [43,]       1        2  0.607336885
 [44,]       1        2  0.736913568
 [45,]       1        2  0.720283525
 [46,]       1        2  0.678107360
 [47,]       1        2  0.424882293
 [48,]       1        2  0.513250380
 [49,]       1        2  0.706615763
 [50,]       1        2  0.693431932
 [51,]       1        2  0.632951699
 [52,]       1        2  0.604283580
 [53,]       1        2  0.635137464
 [54,]       1        3  0.525513170
 [55,]       1        2  0.651709885
 [56,]       1        2  0.608535712
 [57,]       1        2  0.733635944
 [58,]       1        2  0.651582439
 [59,]       1        2  0.574547136
 [60,]       1        2  0.688282245
 [61,]       1        2  0.687904215
 [62,]       1        2  0.454451337
 [63,]       1        2  0.696995577
 [64,]       1        2  0.486187484
 [65,]       1        2  0.708006826
 [66,]       1        2  0.709181751
 [67,]       1        2  0.707371268
 [68,]       1        2  0.714818808
 [69,]       1        2  0.715323726
 [70,]       1        2  0.472311974
 [71,]       1        2  0.703264490
 [72,]       1        2  0.708376511
 [73,]       1        3  0.568659868
 [74,]       1        3  0.550096302
 [75,]       1        2  0.692053597
 [76,]       1        2  0.729645922
 [77,]       1        2  0.563306346
 [78,]       1        2  0.585727165
 [79,]       1        2  0.687602806
 [80,]       1        2  0.713478924
 [81,]       1        2  0.704832757
 [82,]       1        2  0.724730346
 [83,]       1        2  0.701668924
 [84,]       1        2  0.455240234
 [85,]       1        3  0.549145724
 [86,]       1        2  0.676041070
 [87,]       1        2  0.656750305
 [88,]       1        2  0.730183263
 [89,]       1        2  0.735524758
 [90,]       1        2  0.635236364
 [91,]       1        2  0.378465855
 [92,]       1        2  0.675690798
 [93,]       1        2  0.703691970
 [94,]       1        2  0.700235765
 [95,]       1        2  0.663151755
 [96,]       1        2  0.669969196
 [97,]       1        2  0.688516907
 [98,]       1        2  0.706357509
 [99,]       1        2  0.607397631
[100,]       1        2  0.712900755
[101,]       1        2  0.717774772
[102,]       1        2  0.722039817
[103,]       1        2  0.635242448
[104,]       1        2  0.727818317
[105,]       1        2  0.743531975
[106,]       1        2  0.717401264
[107,]       1        2  0.452307797
[108,]       1        2  0.704720242
[109,]       1        2  0.513995394
[110,]       1        2  0.701668562
[111,]       1        2  0.708647188
[112,]       1        2  0.522054000
[113,]       1        2  0.577535672
[114,]       1        2  0.550242871
[115,]       1        2  0.599476930
[116,]       1        2  0.717694462
[117,]       1        2  0.664057308
[118,]       1        2  0.733020733
[119,]       1        2  0.637484022
[120,]       1        2  0.724763782
[121,]       1        2  0.726178582
[122,]       1        2  0.669057337
[123,]       1        2  0.677456861
[124,]       1        2  0.615105673
[125,]       1        2  0.739314148
[126,]       1        2  0.738582908
[127,]       1        2  0.743673527
[128,]       1        2  0.718098191
[129,]       1        2  0.637785235
[130,]       1        2  0.684338774
[131,]       1        2  0.695680418
[132,]       1        2  0.735825022
[133,]       1        2  0.710642858
[134,]       1        2  0.647279800
[135,]       1        2  0.654104076
[136,]       1        2  0.728164162
[137,]       1        2  0.469811333
[138,]       1        2  0.523710591
[139,]       1        2  0.740781685
[140,]       1        2  0.729810139
[141,]       1        2  0.745341339
[142,]       1        2  0.701739068
[143,]       1        2  0.728996136
[144,]       1        2  0.664669255
[145,]       1        2  0.690309078
[146,]       1        2  0.675044114
[147,]       1        2  0.732123124
[148,]       1        2  0.670944694
[149,]       1        2  0.731764590
[150,]       1        2  0.632559485
[151,]       1        2  0.714760940
[152,]       1        2  0.550277427
[153,]       1        2  0.631382530
[154,]       1        2  0.689986382
[155,]       1        2  0.732000863
[156,]       1        2  0.677489475
[157,]       1        2  0.590123565
[158,]       1        2  0.511061296
[159,]       1        2  0.716613186
[160,]       1        2  0.352955178
[161,]       1        3  0.536002758
[162,]       1        2  0.727963593
[163,]       1        2  0.711758965
[164,]       1        2  0.642531771
[165,]       1        2  0.709793902
[166,]       1        2  0.714060658
[167,]       1        2  0.641998779
[168,]       1        2  0.629342949
[169,]       1        2  0.706278466
[170,]       1        2  0.730859208
[171,]       1        2  0.711134654
[172,]       1        2  0.534216267
[173,]       1        2  0.744198065
[174,]       1        2  0.624100724
[175,]       1        2  0.622252626
[176,]       1        2  0.732609942
[177,]       1        2  0.732866915
[178,]       1        2  0.699335168
[179,]       1        2  0.611420260
[180,]       1        2  0.739473474
[181,]       1        2  0.584877498
[182,]       1        2  0.705918013
[183,]       1        2  0.593897074
[184,]       1        2  0.473114188
[185,]       1        2  0.677606230
[186,]       1        2  0.711804341
[187,]       1        2  0.671050559
[188,]       1        2  0.517574881
[189,]       1        2  0.707568461
[190,]       1        2  0.712588862
[191,]       1        2  0.742724870
[192,]       1        2  0.657268075
[193,]       1        2  0.709617025
[194,]       1        2  0.726127660
[195,]       1        2  0.728077240
[196,]       1        2  0.719406446
[197,]       1        2  0.673668497
[198,]       1        2  0.617714685
[199,]       1        2  0.704105428
[200,]       1        2  0.662379518
[201,]       1        2  0.722085908
[202,]       1        2  0.652138240
[203,]       1        2  0.703046918
[204,]       1        2  0.710571713
[205,]       1        2  0.658127137
[206,]       1        2  0.728910897
[207,]       1        2  0.716902774
[208,]       1        2  0.733290999
[209,]       1        2  0.650373678
[210,]       1        2  0.388611241
[211,]       1        2  0.729488543
[212,]       1        2  0.738198434
[213,]       1        2  0.746651788
[214,]       1        2  0.631735156
[215,]       1        2  0.405695866
[216,]       1        3  0.488799400
[217,]       1        2  0.629882243
[218,]       1        2  0.510688672
[219,]       1        2  0.733278939
[220,]       1        2  0.721952601
[221,]       1        2  0.704062378
[222,]       1        2  0.695439287
[223,]       1        2  0.714646593
[224,]       1        2  0.739854066
[225,]       1        2  0.697411483
[226,]       1        2  0.711024976
[227,]       1        2  0.569953829
[228,]       1        2  0.432700201
[229,]       1        2  0.659116714
[230,]       1        2  0.719418093
[231,]       1        2  0.706442481
[232,]       1        2  0.740838229
[233,]       1        2  0.732768834
[234,]       1        2  0.729998349
[235,]       1        2  0.725499389
[236,]       1        2  0.627584206
[237,]       1        2  0.737970575
[238,]       1        2  0.712224118
[239,]       1        2  0.715076168
[240,]       1        2  0.746684375
[241,]       1        2  0.402334429
[242,]       1        2  0.718241872
[243,]       1        2  0.726282982
[244,]       1        2  0.396465981
[245,]       1        2  0.726405200
[246,]       1        2  0.704378943
[247,]       1        2  0.697400865
[248,]       1        3  0.478034952
[249,]       1        2  0.715640907
[250,]       1        2  0.723749459
[251,]       2        3 -0.759586896
[252,]       2        3  0.015572361
[253,]       2        3 -0.581553657
[254,]       2        3 -0.830357511
[255,]       2        3 -0.384173656
[256,]       2        1 -0.443246419
[257,]       2        1 -0.510442911
[258,]       2        3 -0.480476440
[259,]       2        1 -0.495340506
[260,]       2        3 -0.495708020
[261,]       2        1 -0.064349523
[262,]       2        1 -0.494347076
[263,]       2        1 -0.395926750
[264,]       2        3 -0.582650558
[265,]       2        1 -0.407770539
[266,]       2        1 -0.547235820
[267,]       2        1 -0.510356454
[268,]       2        1 -0.441677356
[269,]       2        1 -0.135149146
[270,]       2        3 -0.306232174
[271,]       2        1 -0.517148149
[272,]       2        1 -0.433337388
[273,]       2        1 -0.515669677
[274,]       2        1 -0.490040233
[275,]       2        1 -0.255468927
[276,]       2        1 -0.547531826
[277,]       2        3 -0.571342524
[278,]       2        3 -0.487902192
[279,]       2        1 -0.542744508
[280,]       2        1 -0.054956988
[281,]       2        3 -0.112427220
[282,]       2        3 -0.342910076
[283,]       2        3 -0.455987853
[284,]       2        1 -0.520344295
[285,]       2        3 -0.604871796
[286,]       2        1 -0.490452457
[287,]       2        1 -0.303187951
[288,]       2        3 -0.389658510
[289,]       2        1 -0.497434335
[290,]       2        3 -0.406945794
[291,]       2        1 -0.453872324
[292,]       2        3 -0.730329240
[293,]       2        3 -0.829140390
[294,]       2        1 -0.492969558
[295,]       2        1 -0.383018491
[296,]       2        1 -0.542255695
[297,]       2        1 -0.400246695
[298,]       2        1 -0.414139445
[299,]       3        2  0.000000000
[300,]       2        3 -0.593757093
[301,]       2        1 -0.300100382
[302,]       2        1 -0.479171113
[303,]       2        3 -0.619680481
[304,]       2        3 -0.562281266
[305,]       2        1 -0.412144945
[306,]       2        1 -0.389050787
[307,]       2        1 -0.305688781
[308,]       2        3 -0.585173221
[309,]       2        1 -0.542845557
[310,]       2        1 -0.386534686
[311,]       2        1 -0.477991476
[312,]       2        1 -0.444805197
[313,]       2        1 -0.273243752
[314,]       2        1 -0.496035427
[315,]       2        1 -0.400161814
[316,]       2        3 -0.640283851
[317,]       2        3 -0.539345290
[318,]       2        1 -0.308076683
[319,]       2        3 -0.493890554
[320,]       2        3 -0.654381030
[321,]       2        1 -0.534824490
[322,]       2        3 -0.565430240
[323,]       2        3 -0.770541359
[324,]       2        1 -0.345186586
[325,]       2        1 -0.385248816
[326,]       2        3 -0.204664298
[327,]       2        1 -0.247711181
[328,]       2        1 -0.400826827
[329,]       2        1 -0.481807014
[330,]       2        3 -0.755980642
[331,]       2        3 -0.740326921
[332,]       2        3 -0.031437195
[333,]       2        3 -0.640173866
[334,]       2        3 -0.036798810
[335,]       2        1 -0.209759193
[336,]       2        1 -0.418012809
[337,]       2        1 -0.263906922
[338,]       2        1 -0.556723655
[339,]       2        1 -0.555062813
[340,]       2        3 -0.661654083
[341,]       2        1 -0.347311610
[342,]       2        3 -0.247753157
[343,]       2        3 -0.584182318
[344,]       2        3 -0.764408657
[345,]       2        1 -0.522892330
[346,]       2        1 -0.549053663
[347,]       2        1 -0.523639113
[348,]       2        1 -0.413153134
[349,]       2        1 -0.173554439
[350,]       2        3 -0.536653401
[351,]       2        3 -0.830461242
[352,]       2        3 -0.859606032
[353,]       2        3 -0.604568151
[354,]       2        3 -0.332101323
[355,]       2        3 -0.359098610
[356,]       2        3 -0.488572803
[357,]       2        1 -0.504743490
[358,]       2        1 -0.476264340
[359,]       2        1 -0.541257346
[360,]       2        3 -0.545143971
[361,]       2        3 -0.374432522
[362,]       2        1 -0.417552208
[363,]       2        1 -0.437187103
[364,]       2        1 -0.383916087
[365,]       2        3 -0.611476494
[366,]       2        3 -0.636262332
[367,]       2        3 -0.762308595
[368,]       2        3 -0.383870963
[369,]       2        3 -0.696332465
[370,]       2        1 -0.427857059
[371,]       2        1 -0.404388175
[372,]       2        3 -0.791259801
[373,]       2        1 -0.419711229
[374,]       2        3 -0.636825834
[375,]       2        1 -0.241938265
[376,]       2        3 -0.758792051
[377,]       2        1 -0.420089737
[378,]       2        1 -0.295163897
[379,]       2        3 -0.611387162
[380,]       2        3 -0.073067574
[381,]       2        3 -0.472890624
[382,]       2        1 -0.552267316
[383,]       2        1 -0.415688675
[384,]       2        1 -0.404368239
[385,]       2        1 -0.386564221
[386,]       2        1 -0.364012133
[387,]       2        3 -0.552119726
[388,]       2        1 -0.432333295
[389,]       2        3 -0.614063400
[390,]       2        1 -0.528945167
[391,]       2        3 -0.634584596
[392,]       2        1 -0.538268957
[393,]       2        1 -0.368204411
[394,]       2        1 -0.393015328
[395,]       2        1 -0.450997435
[396,]       2        1 -0.572065514
[397,]       2        3 -0.442213970
[398,]       2        1 -0.407239160
[399,]       2        3 -0.831387227
[400,]       2        3 -0.556251863
[401,]       2        1 -0.566438133
[402,]       2        3 -0.507795299
[403,]       2        1 -0.434990402
[404,]       2        3 -0.553226765
[405,]       2        3 -0.590635277
[406,]       2        1 -0.537251007
[407,]       2        3 -0.874067515
[408,]       2        1 -0.415811663
[409,]       2        1 -0.457113229
[410,]       2        3 -0.554919925
[411,]       2        3 -0.532630743
[412,]       2        1 -0.361469275
[413,]       2        1 -0.404659923
[414,]       2        3 -0.600523694
[415,]       2        1 -0.420033074
[416,]       2        3 -0.649978088
[417,]       2        3 -0.749886587
[418,]       2        1 -0.366123115
[419,]       2        1 -0.474932573
[420,]       2        1 -0.263219466
[421,]       2        1 -0.487860586
[422,]       2        3 -0.766411644
[423,]       2        3 -0.523090298
[424,]       2        3 -0.358040340
[425,]       2        1 -0.332014388
[426,]       2        3 -0.526323432
[427,]       2        1 -0.367940788
[428,]       2        1 -0.310222861
[429,]       2        3 -0.245563003
[430,]       2        3 -0.792423331
[431,]       2        3 -0.817066308
[432,]       2        1 -0.436231833
[433,]       2        1 -0.574353871
[434,]       2        1 -0.418217822
[435,]       2        1 -0.532377821
[436,]       2        3 -0.518855648
[437,]       2        1 -0.175740774
[438,]       2        1 -0.111543406
[439,]       2        1 -0.212750234
[440,]       2        1 -0.423282368
[441,]       2        1 -0.530290221
[442,]       2        1 -0.451251764
[443,]       2        1 -0.087446325
[444,]       2        1 -0.428453205
[445,]       2        1 -0.543855581
[446,]       2        1 -0.411945433
[447,]       2        3 -0.355368580
[448,]       2        1 -0.472654090
[449,]       2        1 -0.519035035
[450,]       2        1 -0.492159454
[451,]       2        3 -0.711878343
[452,]       2        1 -0.483317329
[453,]       2        1 -0.408148742
[454,]       2        1 -0.464058021
[455,]       2        1 -0.147194005
[456,]       2        1 -0.434455401
[457,]       2        3 -0.281550578
[458,]       2        1 -0.428321557
[459,]       2        3 -0.773701603
[460,]       2        1 -0.386795170
[461,]       2        3 -0.838605554
[462,]       2        1 -0.069903538
[463,]       2        1 -0.417519286
[464,]       2        3 -0.844497419
[465,]       2        3 -0.597936048
[466,]       2        1 -0.396361096
[467,]       2        1 -0.413905838
[468,]       2        1 -0.388141478
[469,]       2        3 -0.587842491
[470,]       2        3 -0.408704938
[471,]       2        3 -0.274364579
[472,]       2        1 -0.459362279
[473,]       2        1 -0.316761768
[474,]       2        1 -0.472355247
[475,]       2        1 -0.400719376
[476,]       2        1 -0.519605105
[477,]       2        1 -0.034564631
[478,]       2        3  0.109478224
[479,]       2        3 -0.763201867
[480,]       2        1 -0.393765889
[481,]       2        3 -0.340114960
[482,]       2        1 -0.412885306
[483,]       2        3 -0.744977704
[484,]       2        1 -0.406407233
[485,]       2        1 -0.408611687
[486,]       2        3 -0.612620274
[487,]       2        3 -0.854087036
[488,]       2        3 -0.573667476
[489,]       2        3 -0.290777338
[490,]       2        1 -0.198394925
[491,]       2        1 -0.471942100
[492,]       2        3 -0.399465175
[493,]       2        3 -0.683725363
[494,]       2        1 -0.465241579
[495,]       2        1 -0.459654630
[496,]       2        3 -0.289530465
[497,]       2        3 -0.807701711
[498,]       2        3 -0.686276063
[499,]       2        1 -0.395135583
[500,]       2        1 -0.370333846
[501,]       2        1  0.292957360
[502,]       2        1  0.310404545
[503,]       2        3  0.210508155
[504,]       2        1  0.276066442
[505,]       2        1  0.245748980
[506,]       2        1  0.289187875
[507,]       2        3  0.141846742
[508,]       2        3  0.263110104
[509,]       2        3  0.308845133
[510,]       2        1  0.215850333
[511,]       2        1  0.304364679
[512,]       2        3  0.266968860
[513,]       2        1  0.276350106
[514,]       2        3  0.283256160
[515,]       2        1  0.274340590
[516,]       2        1  0.280348712
[517,]       2        1  0.217884049
[518,]       2        3  0.164991665
[519,]       2        1  0.297538533
[520,]       2        3  0.285723337
[521,]       2        3  0.266013619
[522,]       2        3  0.201156361
[523,]       2        1  0.256920637
[524,]       2        3  0.140950513
[525,]       2        3  0.252788113
[526,]       2        1  0.209033840
[527,]       2        1  0.125357652
[528,]       2        1  0.250470144
[529,]       2        1  0.253463688
[530,]       2        3  0.079877598
[531,]       2        1  0.144498988
[532,]       2        3  0.224584259
[533,]       2        1  0.289717452
[534,]       2        1  0.243812619
[535,]       2        3  0.210527746
[536,]       2        1  0.293515353
[537,]       2        1  0.311618443
[538,]       2        1  0.282567643
[539,]       2        1  0.289796601
[540,]       2        3  0.262020518
[541,]       2        3  0.186026398
[542,]       2        1  0.194333511
[543,]       2        3  0.136297468
[544,]       2        1  0.291425045
[545,]       2        1  0.275790515
[546,]       2        3  0.258782949
[547,]       2        1  0.296309868
[548,]       2        1  0.268588671
[549,]       2        3  0.233939026
[550,]       2        3  0.209511903
[551,]       2        3  0.156601006
[552,]       2        3  0.187182197
[553,]       2        1  0.305227231
[554,]       2        1  0.181615834
[555,]       2        1  0.174129928
[556,]       2        3  0.250767159
[557,]       2        1  0.288877025
[558,]       2        1  0.222073387
[559,]       2        1  0.311219697
[560,]       2        1  0.311328246
[561,]       2        1  0.294587369
[562,]       2        1  0.290772039
[563,]       2        1  0.246129192
[564,]       2        1  0.292311178
[565,]       2        3  0.272515123
[566,]       2        3  0.160887652
[567,]       2        1  0.310838227
[568,]       2        3  0.231507037
[569,]       2        3  0.221176996
[570,]       2        1  0.242453747
[571,]       2        1  0.257529683
[572,]       2        1  0.298664091
[573,]       2        3  0.234959415
[574,]       2        3  0.305601630
[575,]       2        1  0.218043333
[576,]       2        1  0.274888818
[577,]       2        1  0.281401034
[578,]       2        3  0.169452618
[579,]       2        3  0.271897542
[580,]       2        1  0.212084434
[581,]       2        1  0.204113804
[582,]       2        3  0.103943472
[583,]       2        3  0.232086916
[584,]       2        3  0.282082816
[585,]       2        3  0.215713344
[586,]       2        1  0.280350318
[587,]       2        3  0.251200297
[588,]       2        1  0.250364118
[589,]       2        1  0.291946836
[590,]       2        3  0.254147853
[591,]       2        3  0.257254611
[592,]       2        3  0.274476591
[593,]       2        1  0.232022462
[594,]       2        1  0.282671418
[595,]       2        3  0.083106178
[596,]       2        1  0.255554616
[597,]       2        1  0.278025581
[598,]       2        1  0.302540783
[599,]       2        3  0.152640701
[600,]       2        3  0.240536174
[601,]       2        3  0.209586726
[602,]       2        1  0.287154447
[603,]       2        1  0.158674947
[604,]       2        3  0.162319824
[605,]       2        3  0.290336193
[606,]       2        1  0.252341922
[607,]       2        1  0.294908124
[608,]       2        3  0.173961036
[609,]       2        1  0.231249926
[610,]       2        3  0.173260776
[611,]       2        3  0.249057362
[612,]       2        1  0.249066941
[613,]       2        1  0.239089341
[614,]       2        3  0.214815399
[615,]       2        1  0.296820711
[616,]       2        1  0.251649887
[617,]       2        3  0.309529694
[618,]       2        3  0.289948004
[619,]       2        1  0.302588902
[620,]       2        1  0.298986530
[621,]       2        3  0.026075209
[622,]       2        3  0.237903342
[623,]       2        1  0.303548415
[624,]       2        1  0.127802507
[625,]       2        1  0.288998032
[626,]       2        1  0.219802501
[627,]       2        1  0.288110892
[628,]       2        3  0.288658931
[629,]       2        3  0.292323792
[630,]       2        1  0.225836200
[631,]       2        1  0.285182232
[632,]       2        3  0.255845900
[633,]       2        3  0.308307173
[634,]       2        1  0.289969967
[635,]       2        1  0.195469917
[636,]       2        3  0.281963601
[637,]       2        1  0.161918001
[638,]       2        3  0.282317429
[639,]       2        3  0.173851895
[640,]       2        1  0.300776132
[641,]       2        1  0.248730859
[642,]       2        3  0.090845362
[643,]       2        3  0.295649410
[644,]       2        3  0.065502348
[645,]       2        3  0.216730135
[646,]       2        1  0.304649356
[647,]       2        3  0.191426670
[648,]       2        3  0.232416590
[649,]       2        3  0.175936536
[650,]       2        3  0.299017236
[651,]       2        3 -0.030659690
[652,]       2        1  0.278961355
[653,]       2        3  0.203453093
[654,]       2        3  0.276650244
[655,]       2        1  0.266560775
[656,]       2        3  0.205001622
[657,]       2        1  0.215015324
[658,]       2        3  0.287297409
[659,]       2        1  0.199958691
[660,]       2        3  0.242739832
[661,]       2        3  0.277941217
[662,]       2        3  0.255677123
[663,]       2        1  0.282575835
[664,]       2        3  0.273625449
[665,]       2        3  0.212564697
[666,]       2        1  0.259656117
[667,]       2        1  0.304534404
[668,]       2        3  0.227813585
[669,]       2        1  0.276340426
[670,]       2        3  0.184858782
[671,]       2        3  0.168130111
[672,]       2        1  0.295806053
[673,]       2        1  0.253975217
[674,]       2        3  0.298428095
[675,]       2        3  0.132561860
[676,]       2        1  0.256726327
[677,]       2        1  0.275737545
[678,]       2        3  0.254842048
[679,]       2        3  0.279149331
[680,]       2        3  0.256480749
[681,]       2        3  0.231021823
[682,]       2        1  0.289021136
[683,]       2        1  0.281271812
[684,]       2        1  0.282521102
[685,]       2        3  0.113518453
[686,]       2        3  0.274974088
[687,]       2        3  0.282957998
[688,]       2        3  0.234833947
[689,]       2        3  0.160199155
[690,]       2        3  0.209111074
[691,]       2        1  0.303806169
[692,]       2        1  0.148352118
[693,]       2        3  0.270068125
[694,]       2        3  0.304396709
[695,]       2        1  0.291373545
[696,]       2        1  0.208485139
[697,]       2        1  0.259135411
[698,]       2        3  0.302930948
[699,]       2        3  0.211783066
[700,]       2        3  0.310440433
[701,]       2        3  0.265809982
[702,]       2        1  0.305216031
[703,]       2        1  0.307661498
[704,]       2        3  0.178220492
[705,]       2        1  0.291294268
[706,]       2        3  0.268431050
[707,]       2        1  0.278846821
[708,]       2        1  0.254024452
[709,]       2        1  0.273264123
[710,]       2        3  0.249387924
[711,]       2        3  0.193544318
[712,]       2        1  0.301580225
[713,]       2        3  0.291170993
[714,]       2        3  0.179047098
[715,]       2        1  0.308580969
[716,]       2        3  0.190944103
[717,]       2        1  0.277617098
[718,]       2        1  0.202770439
[719,]       2        1  0.167079170
[720,]       2        1  0.224282438
[721,]       2        3  0.232996728
[722,]       2        3  0.282099313
[723,]       2        3  0.008957763
[724,]       2        3  0.118170788
[725,]       2        1  0.146663450
[726,]       2        1  0.277069700
[727,]       2        1  0.276897458
[728,]       2        3  0.231788230
[729,]       2        3  0.257074258
[730,]       2        1  0.237033461
[731,]       2        1  0.239171899
[732,]       2        3  0.300379984
[733,]       2        3  0.251074938
[734,]       2        1  0.301971056
[735,]       2        3  0.121839903
[736,]       2        1  0.259899919
[737,]       2        1  0.282813813
[738,]       2        1  0.203482852
[739,]       2        3  0.289744552
[740,]       2        3  0.167579812
[741,]       2        1  0.133398515
[742,]       2        1  0.307727310
[743,]       2        1  0.259115296
[744,]       2        3  0.247827786
[745,]       2        1  0.283849260
[746,]       2        1  0.224436866
[747,]       2        1  0.232677131
[748,]       2        1  0.271740535
[749,]       2        1  0.264155040
[750,]       2        3  0.228086814
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = single_clusters_ring_m, dist = dist(ring_moon_sphere_scaled))
attr(,"class")
[1] "silhouette"
avg_ring_m_single <- mean(ring_m_single_sils[, "sil_width"])


(ring_m_complete_sils <- silhouette(
  x   = complete_clusters_ring_m,
  dist = dist(ring_moon_sphere_scaled)
))
       cluster neighbor    sil_width
  [1,]       1        2 -0.172320718
  [2,]       2        3  0.463302128
  [3,]       2        1  0.602758201
  [4,]       2        1  0.572213385
  [5,]       2        1  0.700347770
  [6,]       2        1  0.691097972
  [7,]       1        2  0.103740047
  [8,]       2        1  0.432311025
  [9,]       2        1  0.695213893
 [10,]       2        1  0.692255225
 [11,]       2        1  0.694544896
 [12,]       2        1  0.671565877
 [13,]       2        1  0.676025605
 [14,]       2        1  0.693218651
 [15,]       3        2 -0.266137142
 [16,]       3        2 -0.420824640
 [17,]       1        2  0.060072141
 [18,]       2        3  0.640395720
 [19,]       3        2 -0.250021516
 [20,]       2        1  0.453209515
 [21,]       1        2 -0.254851891
 [22,]       1        2  0.271707113
 [23,]       1        2  0.055354144
 [24,]       1        2  0.205503616
 [25,]       2        1  0.337885004
 [26,]       2        3  0.574071805
 [27,]       2        1  0.695606549
 [28,]       3        2 -0.251941725
 [29,]       2        1  0.693067914
 [30,]       2        3  0.585297489
 [31,]       2        1  0.607327193
 [32,]       2        1  0.613024056
 [33,]       1        2 -0.173774696
 [34,]       2        1  0.673671298
 [35,]       2        1  0.388811335
 [36,]       2        1  0.551747942
 [37,]       3        2 -0.274853080
 [38,]       1        2 -0.175884237
 [39,]       2        1  0.694506588
 [40,]       1        2 -0.179130163
 [41,]       2        1  0.414259802
 [42,]       2        3  0.590016775
 [43,]       1        2 -0.129719548
 [44,]       2        1  0.692375664
 [45,]       2        1  0.617751560
 [46,]       2        1  0.433825758
 [47,]       1        2  0.232977908
 [48,]       1        2  0.117882626
 [49,]       2        1  0.519547434
 [50,]       2        3  0.501296206
 [51,]       1        2 -0.230780246
 [52,]       1        2 -0.145401882
 [53,]       3        2 -0.316167990
 [54,]       3        2 -0.050861226
 [55,]       3        2 -0.351637404
 [56,]       3        2 -0.222349788
 [57,]       2        1  0.670324627
 [58,]       2        1  0.326599006
 [59,]       1        2 -0.046244462
 [60,]       2        1  0.423344887
 [61,]       2        3  0.486016902
 [62,]       1        2  0.191117979
 [63,]       2        3  0.494472487
 [64,]       1        2  0.169537840
 [65,]       2        3  0.555063503
 [66,]       2        1  0.526031575
 [67,]       2        3  0.573266584
 [68,]       2        1  0.692107780
 [69,]       2        1  0.550840045
 [70,]       1        2  0.192968238
 [71,]       2        3  0.544010102
 [72,]       2        3  0.535390552
 [73,]       3        2 -0.122453071
 [74,]       3        2 -0.090903592
 [75,]       2        1  0.689732685
 [76,]       2        1  0.697148249
 [77,]       1        2 -0.002369977
 [78,]       1        2 -0.084421424
 [79,]       2        3  0.484223711
 [80,]       2        3  0.613937743
 [81,]       2        3  0.509839038
 [82,]       2        3  0.681637416
 [83,]       2        1  0.583552362
 [84,]       1        2  0.192270649
 [85,]       3        2 -0.089144642
 [86,]       3        2 -0.440801594
 [87,]       2        1  0.310516594
 [88,]       2        1  0.670658346
 [89,]       2        1  0.683890130
 [90,]       3        2 -0.296268515
 [91,]       1        2  0.268339243
 [92,]       2        1  0.397706945
 [93,]       2        1  0.634747463
 [94,]       2        3  0.515444334
 [95,]       3        2 -0.384818989
 [96,]       2        1  0.399160731
 [97,]       2        1  0.502680918
 [98,]       2        1  0.489299967
 [99,]       1        2 -0.146225753
[100,]       2        1  0.691825177
[101,]       2        3  0.551442885
[102,]       2        3  0.684099625
[103,]       1        2 -0.228475118
[104,]       2        3  0.594969743
[105,]       2        1  0.683009460
[106,]       2        1  0.573634892
[107,]       1        2  0.207772325
[108,]       2        1  0.625948427
[109,]       1        2  0.104865031
[110,]       2        1  0.545960894
[111,]       2        1  0.527889785
[112,]       1        2  0.097366990
[113,]       1        2 -0.042752491
[114,]       1        2  0.033071750
[115,]       3        2 -0.202233213
[116,]       2        3  0.675450193
[117,]       3        2 -0.370701470
[118,]       2        1  0.682296025
[119,]       2        1  0.317802563
[120,]       2        1  0.653241624
[121,]       2        3  0.657511037
[122,]       3        2 -0.398964077
[123,]       3        2 -0.423359598
[124,]       1        2 -0.161882429
[125,]       2        1  0.690291795
[126,]       2        1  0.622885431
[127,]       2        1  0.674524981
[128,]       2        1  0.636745284
[129,]       3        2 -0.312249625
[130,]       2        1  0.495207855
[131,]       2        1  0.512314056
[132,]       2        1  0.684333074
[133,]       2        1  0.565634992
[134,]       1        2 -0.277922019
[135,]       3        2 -0.373221563
[136,]       2        1  0.683973385
[137,]       1        2  0.189224214
[138,]       1        2  0.093872259
[139,]       2        1  0.689998176
[140,]       2        1  0.690414762
[141,]       2        1  0.661744731
[142,]       2        1  0.551787415
[143,]       2        3  0.678150708
[144,]       3        2 -0.391980701
[145,]       2        3  0.479711819
[146,]       2        1  0.395767742
[147,]       2        1  0.695950838
[148,]       3        2 -0.412010328
[149,]       2        1  0.696331986
[150,]       1        2 -0.213554953
[151,]       2        3  0.593865940
[152,]       1        2  0.030863751
[153,]       3        2 -0.283590093
[154,]       2        1  0.493714069
[155,]       2        1  0.681741296
[156,]       2        1  0.408644344
[157,]       1        2 -0.082115528
[158,]       1        2  0.096713943
[159,]       2        1  0.646709474
[160,]       1        2  0.312879774
[161,]       3        2 -0.067548452
[162,]       2        1  0.671944982
[163,]       2        1  0.580939442
[164,]       3        2 -0.309876041
[165,]       2        3  0.569536013
[166,]       2        3  0.554898219
[167,]       3        2 -0.326911461
[168,]       1        2 -0.212502257
[169,]       2        3  0.541562701
[170,]       2        1  0.688221838
[171,]       2        1  0.680737079
[172,]       1        2  0.072098198
[173,]       2        1  0.684329113
[174,]       3        2 -0.267523106
[175,]       1        2 -0.229174466
[176,]       2        1  0.693371011
[177,]       2        1  0.684278686
[178,]       2        3  0.529012006
[179,]       1        2 -0.144086559
[180,]       2        1  0.691281736
[181,]       1        2 -0.142036101
[182,]       2        1  0.543479621
[183,]       1        2 -0.099635645
[184,]       1        2  0.178906473
[185,]       2        1  0.372471509
[186,]       2        1  0.510849170
[187,]       3        2 -0.407049152
[188,]       1        2  0.109597297
[189,]       2        1  0.617248422
[190,]       2        1  0.542168306
[191,]       2        1  0.648629074
[192,]       3        2 -0.362335011
[193,]       2        1  0.525963017
[194,]       2        1  0.695217594
[195,]       2        3  0.635734292
[196,]       2        1  0.625557058
[197,]       3        2 -0.405662553
[198,]       3        2 -0.250838786
[199,]       2        1  0.641543188
[200,]       2        1  0.407360515
[201,]       2        3  0.595552640
[202,]       3        2 -0.359292468
[203,]       2        1  0.578293257
[204,]       2        1  0.679957941
[205,]       3        2 -0.383204613
[206,]       2        1  0.626238617
[207,]       2        3  0.646107686
[208,]       2        3  0.667210427
[209,]       3        2 -0.345816530
[210,]       1        2  0.277824983
[211,]       2        3  0.645500942
[212,]       2        1  0.657768568
[213,]       2        1  0.677469412
[214,]       1        2 -0.224315078
[215,]       1        2  0.248713707
[216,]       3        2  0.002685784
[217,]       1        2 -0.237945442
[218,]       1        2  0.123783483
[219,]       2        3  0.658822817
[220,]       2        3  0.600332943
[221,]       2        1  0.522432691
[222,]       2        3  0.500289268
[223,]       2        1  0.583230675
[224,]       2        1  0.691011780
[225,]       2        1  0.571477591
[226,]       2        3  0.608321579
[227,]       3        2 -0.125975918
[228,]       1        2  0.229880416
[229,]       2        1  0.376070164
[230,]       2        1  0.554477089
[231,]       2        1  0.504714617
[232,]       2        1  0.627359862
[233,]       2        1  0.669081059
[234,]       2        1  0.696821262
[235,]       2        1  0.698710504
[236,]       3        2 -0.270553559
[237,]       2        1  0.692447183
[238,]       2        1  0.565524725
[239,]       2        1  0.682193250
[240,]       2        1  0.676798503
[241,]       1        2  0.278955463
[242,]       2        3  0.603158881
[243,]       2        1  0.695635541
[244,]       1        2  0.283275990
[245,]       2        3  0.659764359
[246,]       2        1  0.533473174
[247,]       2        1  0.550346317
[248,]       3        2  0.019310669
[249,]       2        3  0.585483094
[250,]       2        3  0.653679000
[251,]       3        1  0.362584171
[252,]       1        2  0.612345476
[253,]       3        1  0.477003291
[254,]       3        1  0.118769580
[255,]       3        1 -0.419265281
[256,]       2        1  0.431206556
[257,]       3        2 -0.222753894
[258,]       3        1  0.521677175
[259,]       2        1  0.643414610
[260,]       3        1  0.518075911
[261,]       1        2  0.599572469
[262,]       3        2 -0.233624357
[263,]       2        1  0.559712676
[264,]       3        1  0.471993479
[265,]       3        2  0.139730138
[266,]       2        3  0.623186091
[267,]       3        2 -0.272686574
[268,]       2        1  0.608267204
[269,]       1        2  0.537372105
[270,]       3        1 -0.474189373
[271,]       3        2 -0.266292157
[272,]       2        1  0.601234366
[273,]       2        3  0.632485229
[274,]       3        2 -0.224327345
[275,]       3        2  0.377776480
[276,]       2        3  0.555689190
[277,]       3        1  0.460640126
[278,]       3        1  0.520613826
[279,]       2        3  0.466205423
[280,]       1        2  0.604202699
[281,]       1        3  0.592339270
[282,]       3        2  0.468416766
[283,]       3        1  0.521720376
[284,]       2        3  0.525413685
[285,]       3        1  0.462337974
[286,]       3        2 -0.199924120
[287,]       1        2  0.095888626
[288,]       3        2  0.494322986
[289,]       2        1  0.644161246
[290,]       3        2  0.502190818
[291,]       2        1  0.617471560
[292,]       3        1  0.373463708
[293,]       3        1  0.181954898
[294,]       2        3  0.612782288
[295,]       2        1  0.420413911
[296,]       2        3  0.641136835
[297,]       2        1  0.507525663
[298,]       2        1  0.583467112
[299,]       3        1  0.212613277
[300,]       3        1 -0.239034978
[301,]       1        2  0.189046279
[302,]       2        1  0.625270300
[303,]       3        1  0.480022211
[304,]       3        1  0.496842044
[305,]       2        1  0.433852676
[306,]       2        1  0.165020932
[307,]       3        2  0.330296299
[308,]       3        1  0.452228736
[309,]       2        3  0.421475185
[310,]       3        2  0.179565934
[311,]       2        1  0.633403422
[312,]       2        1  0.456348497
[313,]       3        2  0.361071080
[314,]       3        2 -0.157416825
[315,]       2        1  0.424450353
[316,]       3        1 -0.214846871
[317,]       3        1  0.508460541
[318,]       3        2  0.323004260
[319,]       3        1 -0.319947913
[320,]       3        1  0.409191174
[321,]       2        3  0.595807665
[322,]       3        1  0.497849315
[323,]       3        1  0.317213420
[324,]       3        2  0.266754076
[325,]       2        1  0.295008940
[326,]       1        3  0.513017620
[327,]       1        2  0.428823587
[328,]       2        1  0.415378273
[329,]       2        1  0.559519155
[330,]       3        1 -0.076604628
[331,]       3        1  0.410418764
[332,]       1        3  0.626859386
[333,]       3        1  0.380628565
[334,]       1        3  0.629560921
[335,]       1        2  0.423819895
[336,]       3        2  0.130891729
[337,]       3        2  0.385850793
[338,]       2        3  0.651359461
[339,]       2        3  0.394409730
[340,]       3        1 -0.176435845
[341,]       1        2  0.180084478
[342,]       3        2  0.397628400
[343,]       3        1  0.478529909
[344,]       3        1  0.371660602
[345,]       2        1  0.654957548
[346,]       2        3  0.432101236
[347,]       2        3  0.455692011
[348,]       2        1  0.529696979
[349,]       1        2  0.511861649
[350,]       3        1  0.507847673
[351,]       3        1  0.222107446
[352,]       3        1  0.240841659
[353,]       3        1  0.479917663
[354,]       3        2  0.461861603
[355,]       3        2  0.473852641
[356,]       3        1  0.516275745
[357,]       2        1  0.645832518
[358,]       3        2 -0.133582713
[359,]       2        1  0.660594155
[360,]       3        1  0.511598230
[361,]       3        2  0.484384273
[362,]       2        1  0.546750185
[363,]       2        1  0.601420347
[364,]       1        2 -0.040573077
[365,]       3        1  0.480406923
[366,]       3        1  0.424927616
[367,]       3        1  0.302154300
[368,]       3        1 -0.431905807
[369,]       3        1 -0.148582300
[370,]       3        2  0.106623533
[371,]       2        1  0.551517092
[372,]       3        1  0.341431791
[373,]       3        2  0.106039384
[374,]       3        1  0.472422355
[375,]       3        2  0.391894607
[376,]       3        1  0.284576805
[377,]       2        1  0.496672539
[378,]       3        2  0.332950658
[379,]       3        1  0.468637383
[380,]       1        3  0.578039371
[381,]       3        1  0.520052755
[382,]       2        3  0.562183939
[383,]       2        1  0.520882264
[384,]       2        1  0.503921870
[385,]       2        1  0.518974405
[386,]       3        2  0.229660025
[387,]       3        1  0.485879469
[388,]       2        1  0.584263584
[389,]       3        1  0.471674961
[390,]       2        3  0.588055847
[391,]       3        1 -0.215561236
[392,]       2        3  0.616728368
[393,]       3        2  0.242250355
[394,]       2        1  0.398634957
[395,]       2        1  0.610767829
[396,]       2        3  0.504113410
[397,]       3        2  0.520271339
[398,]       2        1  0.531422698
[399,]       3        1  0.199864461
[400,]       3        1  0.486422762
[401,]       2        3  0.431147910
[402,]       3        1  0.516403662
[403,]       2        1  0.596887995
[404,]       3        1  0.482540881
[405,]       3        1  0.478162442
[406,]       2        3  0.589173316
[407,]       3        1  0.167238689
[408,]       2        1  0.581616734
[409,]       2        1  0.619867633
[410,]       3        1  0.500915954
[411,]       3        1  0.507749827
[412,]       2        1  0.135395749
[413,]       2        1  0.419449347
[414,]       3        1 -0.222625688
[415,]       2        1  0.586738901
[416,]       3        1  0.425629922
[417,]       3        1  0.374695259
[418,]       2        1  0.218499817
[419,]       3        2 -0.014046012
[420,]       3        2  0.373291778
[421,]       3        2 -0.115296717
[422,]       3        1 -0.066233781
[423,]       3        1  0.516193367
[424,]       3        2  0.478035185
[425,]       1        2 -0.018778565
[426,]       3        1  0.505312067
[427,]       1        2  0.026886484
[428,]       1        2  0.150955218
[429,]       3        2  0.395305088
[430,]       3        1 -0.033189737
[431,]       3        1  0.107076388
[432,]       2        1  0.603236378
[433,]       2        3  0.573912069
[434,]       2        1  0.583870457
[435,]       2        3  0.641313829
[436,]       3        1  0.501130928
[437,]       1        2  0.517940469
[438,]       1        2  0.558688167
[439,]       1        2  0.431440811
[440,]       2        1  0.460600030
[441,]       2        3  0.569904482
[442,]       2        1  0.614704264
[443,]       1        2  0.575422118
[444,]       2        1  0.596471633
[445,]       2        3  0.528014919
[446,]       2        1  0.570884646
[447,]       3        1 -0.459437895
[448,]       2        1  0.623535902
[449,]       2        3  0.431083361
[450,]       3        2 -0.222555719
[451,]       3        1  0.365748573
[452,]       2        3  0.614545536
[453,]       2        1  0.470706357
[454,]       3        2 -0.011981565
[455,]       1        2  0.538403480
[456,]       3        2  0.061029677
[457,]       3        1 -0.499391794
[458,]       2        1  0.593526705
[459,]       3        1 -0.056132951
[460,]       2        1  0.515859448
[461,]       3        1  0.150050066
[462,]       1        2  0.586037945
[463,]       2        1  0.463790096
[464,]       3        1  0.215977547
[465,]       3        1  0.492878829
[466,]       2        1  0.510190000
[467,]       2        1  0.564164627
[468,]       2        1  0.458007180
[469,]       3        1  0.493992661
[470,]       3        2  0.501960017
[471,]       3        2  0.414607418
[472,]       2        1  0.621267937
[473,]       1        2  0.302356169
[474,]       2        1  0.626543855
[475,]       2        1  0.547610693
[476,]       2        3  0.414619576
[477,]       1        2  0.610366032
[478,]       1        2  0.661437125
[479,]       3        1  0.292122266
[480,]       2        1  0.552598427
[481,]       3        2  0.463939926
[482,]       2        1  0.564897556
[483,]       3        1  0.345716185
[484,]       2        1  0.561651713
[485,]       2        1  0.577841578
[486,]       3        1  0.450502654
[487,]       3        1  0.054013489
[488,]       3        1  0.484826562
[489,]       3        1 -0.489806637
[490,]       1        2  0.402659107
[491,]       3        2 -0.030379649
[492,]       3        1 -0.416184740
[493,]       3        1  0.404245957
[494,]       2        1  0.624520693
[495,]       3        2 -0.101665631
[496,]       3        2  0.423767215
[497,]       3        1 -0.014403988
[498,]       3        1  0.375712870
[499,]       2        1  0.545082320
[500,]       3        2  0.224155955
[501,]       1        2  0.795715201
[502,]       1        2  0.791392844
[503,]       1        2  0.763997119
[504,]       1        2  0.787675418
[505,]       1        2  0.771395281
[506,]       1        2  0.777360209
[507,]       1        3  0.743522954
[508,]       1        2  0.788013257
[509,]       1        2  0.796772805
[510,]       1        2  0.677185007
[511,]       1        2  0.798776658
[512,]       1        2  0.792843148
[513,]       1        2  0.790794067
[514,]       1        2  0.788463555
[515,]       1        2  0.784118344
[516,]       1        2  0.790639346
[517,]       1        2  0.753007256
[518,]       1        3  0.758281141
[519,]       1        2  0.797143088
[520,]       1        2  0.797893454
[521,]       1        2  0.793338876
[522,]       1        2  0.772937433
[523,]       1        2  0.760871742
[524,]       1        3  0.747542775
[525,]       1        2  0.790145137
[526,]       1        2  0.754763322
[527,]       1        2  0.693762363
[528,]       1        2  0.777347207
[529,]       1        2  0.778179335
[530,]       1        3  0.715480909
[531,]       1        2  0.712230726
[532,]       1        2  0.761046334
[533,]       1        2  0.783691095
[534,]       1        2  0.772611538
[535,]       1        2  0.765063967
[536,]       1        2  0.797275309
[537,]       1        2  0.794258437
[538,]       1        2  0.780938486
[539,]       1        2  0.784274704
[540,]       1        2  0.791308956
[541,]       1        2  0.766410078
[542,]       1        2  0.731547351
[543,]       1        3  0.745109406
[544,]       1        2  0.764214424
[545,]       1        2  0.788331377
[546,]       1        2  0.792025209
[547,]       1        2  0.796691106
[548,]       1        2  0.779699544
[549,]       1        2  0.784619242
[550,]       1        2  0.775887269
[551,]       1        3  0.746662577
[552,]       1        3  0.766786485
[553,]       1        2  0.769549396
[554,]       1        2  0.661200842
[555,]       1        2  0.682341924
[556,]       1        2  0.789692385
[557,]       1        2  0.795190698
[558,]       1        2  0.760309875
[559,]       1        2  0.785826164
[560,]       1        2  0.797108396
[561,]       1        2  0.796757431
[562,]       1        2  0.787569675
[563,]       1        2  0.765017177
[564,]       1        2  0.790867722
[565,]       1        2  0.794108396
[566,]       1        3  0.748998411
[567,]       1        2  0.784832411
[568,]       1        2  0.782767829
[569,]       1        2  0.775181585
[570,]       1        2  0.774930534
[571,]       1        2  0.741524745
[572,]       1        2  0.798333155
[573,]       1        2  0.785188207
[574,]       1        2  0.782230953
[575,]       1        2  0.738034626
[576,]       1        2  0.775428643
[577,]       1        2  0.776044607
[578,]       1        3  0.753770275
[579,]       1        2  0.795402659
[580,]       1        2  0.737595650
[581,]       1        2  0.755117488
[582,]       1        3  0.727314688
[583,]       1        2  0.780205513
[584,]       1        2  0.792848763
[585,]       1        2  0.762116877
[586,]       1        2  0.782094723
[587,]       1        2  0.781007616
[588,]       1        2  0.772806193
[589,]       1        2  0.796260214
[590,]       1        2  0.790733876
[591,]       1        2  0.789798724
[592,]       1        2  0.794355097
[593,]       1        2  0.761319398
[594,]       1        2  0.784146245
[595,]       1        3  0.718053984
[596,]       1        2  0.764285364
[597,]       1        2  0.787148459
[598,]       1        2  0.779255182
[599,]       1        3  0.739905761
[600,]       1        2  0.767022754
[601,]       1        2  0.776473278
[602,]       1        2  0.781368193
[603,]       1        2  0.699721177
[604,]       1        3  0.753928408
[605,]       1        2  0.798285172
[606,]       1        2  0.773304424
[607,]       1        2  0.781530564
[608,]       1        2  0.758083574
[609,]       1        2  0.740827062
[610,]       1        3  0.734100671
[611,]       1        2  0.786475213
[612,]       1        2  0.768000090
[613,]       1        2  0.773318357
[614,]       1        2  0.777135746
[615,]       1        2  0.798095014
[616,]       1        2  0.749676521
[617,]       1        2  0.781467801
[618,]       1        2  0.796895254
[619,]       1        2  0.780726963
[620,]       1        2  0.776564940
[621,]       1        3  0.675360531
[622,]       1        2  0.774318040
[623,]       1        2  0.772425483
[624,]       1        2  0.692160242
[625,]       1        2  0.792320705
[626,]       1        2  0.761528076
[627,]       1        2  0.789211674
[628,]       1        2  0.797038798
[629,]       1        2  0.798892574
[630,]       1        2  0.762209067
[631,]       1        2  0.795252707
[632,]       1        2  0.790634742
[633,]       1        2  0.780266281
[634,]       1        2  0.786593178
[635,]       1        2  0.750139116
[636,]       1        2  0.797487703
[637,]       1        2  0.714669510
[638,]       1        2  0.780898525
[639,]       1        3  0.743898097
[640,]       1        2  0.771332037
[641,]       1        2  0.763406759
[642,]       1        3  0.716064300
[643,]       1        2  0.788060408
[644,]       1        3  0.704909947
[645,]       1        2  0.749485520
[646,]       1        2  0.798941754
[647,]       1        2  0.757307665
[648,]       1        2  0.779211782
[649,]       1        3  0.763823992
[650,]       1        2  0.799480193
[651,]       1        3  0.664535970
[652,]       1        2  0.785569337
[653,]       1        2  0.772810623
[654,]       1        2  0.795036722
[655,]       1        2  0.787554876
[656,]       1        2  0.774772782
[657,]       1        2  0.729585661
[658,]       1        2  0.776682704
[659,]       1        2  0.702995556
[660,]       1        2  0.787470066
[661,]       1        2  0.794298241
[662,]       1        2  0.787228394
[663,]       1        2  0.756613545
[664,]       1        2  0.761468495
[665,]       1        2  0.769508217
[666,]       1        2  0.781375052
[667,]       1        2  0.782960947
[668,]       1        2  0.782512083
[669,]       1        2  0.791158518
[670,]       1        2  0.764054266
[671,]       1        3  0.757424240
[672,]       1        2  0.782741319
[673,]       1        2  0.777156505
[674,]       1        2  0.797782145
[675,]       1        3  0.731818356
[676,]       1        2  0.782998297
[677,]       1        2  0.760927508
[678,]       1        2  0.789472441
[679,]       1        2  0.796992459
[680,]       1        2  0.791246628
[681,]       1        2  0.763439826
[682,]       1        2  0.796569260
[683,]       1        2  0.789144232
[684,]       1        2  0.753439327
[685,]       1        3  0.719069095
[686,]       1        2  0.796070142
[687,]       1        2  0.786657341
[688,]       1        2  0.764133159
[689,]       1        3  0.757070952
[690,]       1        2  0.776464898
[691,]       1        2  0.798839501
[692,]       1        2  0.675617363
[693,]       1        2  0.795196323
[694,]       1        2  0.792905987
[695,]       1        2  0.795301964
[696,]       1        2  0.741865622
[697,]       1        2  0.782627146
[698,]       1        2  0.799640600
[699,]       1        2  0.777664572
[700,]       1        2  0.797407099
[701,]       1        2  0.792802560
[702,]       1        2  0.774306811
[703,]       1        2  0.798648572
[704,]       1        3  0.749685499
[705,]       1        2  0.795642204
[706,]       1        2  0.793999490
[707,]       1        2  0.783814464
[708,]       1        2  0.770123430
[709,]       1        2  0.768976875
[710,]       1        2  0.783006377
[711,]       1        2  0.766713672
[712,]       1        2  0.766534705
[713,]       1        2  0.762784443
[714,]       1        3  0.746439804
[715,]       1        2  0.784451496
[716,]       1        2  0.763314340
[717,]       1        2  0.791458668
[718,]       1        2  0.726540629
[719,]       1        2  0.722268377
[720,]       1        2  0.731993828
[721,]       1        2  0.778018649
[722,]       1        2  0.772371104
[723,]       1        3  0.680228738
[724,]       1        3  0.730431554
[725,]       1        2  0.688027027
[726,]       1        2  0.783536179
[727,]       1        2  0.792217020
[728,]       1        2  0.777905675
[729,]       1        2  0.773207926
[730,]       1        2  0.761553595
[731,]       1        2  0.727050919
[732,]       1        2  0.786903216
[733,]       1        2  0.733130810
[734,]       1        2  0.798412220
[735,]       1        3  0.737740492
[736,]       1        2  0.774660861
[737,]       1        2  0.776150192
[738,]       1        2  0.752878403
[739,]       1        2  0.793385480
[740,]       1        3  0.754736127
[741,]       1        2  0.714151426
[742,]       1        2  0.775575288
[743,]       1        2  0.782844579
[744,]       1        2  0.780326562
[745,]       1        2  0.790708357
[746,]       1        2  0.747902919
[747,]       1        2  0.769795655
[748,]       1        2  0.778104695
[749,]       1        2  0.768711240
[750,]       1        2  0.782407522
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = complete_clusters_ring_m, dist = dist(ring_moon_sphere_scaled))
attr(,"class")
[1] "silhouette"
avg_ring_m_complete <- mean(ring_m_complete_sils[, "sil_width"])

(ring_m_average_sils <- silhouette(
  x   = average_clusters_ring_m,
  dist = dist(ring_moon_sphere_scaled)
))
       cluster neighbor   sil_width
  [1,]       1        3  0.36933575
  [2,]       1        3  0.61593703
  [3,]       1        3  0.59860619
  [4,]       1        3  0.57843727
  [5,]       1        3  0.65400971
  [6,]       1        3  0.65985982
  [7,]       1        3  0.19215536
  [8,]       1        3  0.50021672
  [9,]       1        3  0.66094244
 [10,]       1        3  0.66200009
 [11,]       1        3  0.65375494
 [12,]       1        3  0.63700048
 [13,]       1        3  0.65169923
 [14,]       1        3  0.65861670
 [15,]       1        2  0.53746781
 [16,]       1        3  0.60736113
 [17,]       1        3  0.22578124
 [18,]       1        3  0.65612433
 [19,]       1        2  0.52836523
 [20,]       1        3  0.50659892
 [21,]       1        3  0.41375835
 [22,]       1        3 -0.04572026
 [23,]       1        3  0.23098413
 [24,]       1        3  0.08649430
 [25,]       1        3  0.45284897
 [26,]       1        3  0.64395401
 [27,]       1        3  0.65473291
 [28,]       1        2  0.52965257
 [29,]       1        3  0.65335236
 [30,]       1        3  0.64357081
 [31,]       1        3  0.59145933
 [32,]       1        3  0.58856464
 [33,]       1        3  0.37132387
 [34,]       1        3  0.63015874
 [35,]       1        3  0.46368817
 [36,]       1        3  0.56884584
 [37,]       1        2  0.54269833
 [38,]       1        3  0.36803630
 [39,]       1        3  0.65442929
 [40,]       1        3  0.36496468
 [41,]       1        3  0.49427143
 [42,]       1        3  0.64639987
 [43,]       1        3  0.34816334
 [44,]       1        3  0.65605518
 [45,]       1        3  0.60291340
 [46,]       1        3  0.50042900
 [47,]       1        3  0.03896181
 [48,]       1        3  0.17947321
 [49,]       1        3  0.55064563
 [50,]       1        3  0.62700971
 [51,]       1        3  0.39893532
 [52,]       1        3  0.34824688
 [53,]       1        2  0.56168775
 [54,]       1        2  0.39552035
 [55,]       1        2  0.58163489
 [56,]       1        2  0.51184110
 [57,]       1        3  0.63816228
 [58,]       1        3  0.44484506
 [59,]       1        3  0.29142090
 [60,]       1        3  0.50381318
 [61,]       1        3  0.62387353
 [62,]       1        3  0.09368945
 [63,]       1        3  0.62342143
 [64,]       1        3  0.12652622
 [65,]       1        3  0.63878138
 [66,]       1        3  0.55477167
 [67,]       1        3  0.64348684
 [68,]       1        3  0.64652833
 [69,]       1        3  0.56867298
 [70,]       1        3  0.09964102
 [71,]       1        3  0.63678068
 [72,]       1        3  0.63245374
 [73,]       1        2  0.44697890
 [74,]       1        2  0.42496175
 [75,]       1        3  0.63898091
 [76,]       1        3  0.65698588
 [77,]       1        3  0.26970851
 [78,]       1        3  0.31311637
 [79,]       1        3  0.62342949
 [80,]       1        3  0.65172913
 [81,]       1        3  0.62421244
 [82,]       1        3  0.66171922
 [83,]       1        3  0.57761057
 [84,]       1        3  0.09333609
 [85,]       1        2  0.42381755
 [86,]       1        3  0.61179906
 [87,]       1        3  0.44398222
 [88,]       1        3  0.63677503
 [89,]       1        3  0.66134203
 [90,]       1        2  0.55408251
 [91,]       1        3 -0.02786675
 [92,]       1        3  0.48586941
 [93,]       1        3  0.60584213
 [94,]       1        3  0.62927597
 [95,]       1        3  0.59704213
 [96,]       1        3  0.48248911
 [97,]       1        3  0.53398845
 [98,]       1        3  0.53943426
 [99,]       1        3  0.35148088
[100,]       1        3  0.66146930
[101,]       1        3  0.63179464
[102,]       1        3  0.66185517
[103,]       1        3  0.40048159
[104,]       1        3  0.64200553
[105,]       1        3  0.65849507
[106,]       1        3  0.57989529
[107,]       1        3  0.07896170
[108,]       1        3  0.60121344
[109,]       1        3  0.18908749
[110,]       1        3  0.55943076
[111,]       1        3  0.55519211
[112,]       1        3  0.19758623
[113,]       1        3  0.29567894
[114,]       1        3  0.24608137
[115,]       1        2  0.49915754
[116,]       1        3  0.66096288
[117,]       1        3  0.58509431
[118,]       1        3  0.66139016
[119,]       1        3  0.43204767
[120,]       1        3  0.62420311
[121,]       1        3  0.65871817
[122,]       1        3  0.59951162
[123,]       1        3  0.60429830
[124,]       1        3  0.36334254
[125,]       1        3  0.65593447
[126,]       1        3  0.61574909
[127,]       1        3  0.65746181
[128,]       1        3  0.61216704
[129,]       1        2  0.56142705
[130,]       1        3  0.52873859
[131,]       1        3  0.54167504
[132,]       1        3  0.64857140
[133,]       1        3  0.57273206
[134,]       1        3  0.42506333
[135,]       1        2  0.59014452
[136,]       1        3  0.64477965
[137,]       1        3  0.10453500
[138,]       1        3  0.20055625
[139,]       1        3  0.65869197
[140,]       1        3  0.65026289
[141,]       1        3  0.64062948
[142,]       1        3  0.56215630
[143,]       1        3  0.66120697
[144,]       1        3  0.59920190
[145,]       1        3  0.62127981
[146,]       1        3  0.48475539
[147,]       1        3  0.66107951
[148,]       1        3  0.60392025
[149,]       1        3  0.65722930
[150,]       1        3  0.39411252
[151,]       1        3  0.64739422
[152,]       1        3  0.24568529
[153,]       1        2  0.54743980
[154,]       1        3  0.53092568
[155,]       1        3  0.66135306
[156,]       1        3  0.49086045
[157,]       1        3  0.31761539
[158,]       1        3  0.19245498
[159,]       1        3  0.61724528
[160,]       1        3 -0.08827638
[161,]       1        2  0.40818306
[162,]       1        3  0.63665944
[163,]       1        3  0.58055504
[164,]       1        2  0.56145556
[165,]       1        3  0.64225221
[166,]       1        3  0.63641607
[167,]       1        2  0.56867418
[168,]       1        3  0.39056363
[169,]       1        3  0.63536640
[170,]       1        3  0.64900796
[171,]       1        3  0.63677600
[172,]       1        3  0.21808113
[173,]       1        3  0.65596899
[174,]       1        2  0.53812990
[175,]       1        3  0.38926057
[176,]       1        3  0.65411666
[177,]       1        3  0.66170010
[178,]       1        3  0.63348796
[179,]       1        3  0.35546070
[180,]       1        3  0.65954621
[181,]       1        3  0.33022528
[182,]       1        3  0.56034623
[183,]       1        3  0.32562373
[184,]       1        3  0.11476848
[185,]       1        3  0.47978220
[186,]       1        3  0.55097024
[187,]       1        3  0.60182152
[188,]       1        3  0.18660937
[189,]       1        3  0.59746747
[190,]       1        3  0.56340423
[191,]       1        3  0.63137196
[192,]       1        2  0.58748200
[193,]       1        3  0.55501864
[194,]       1        3  0.65296059
[195,]       1        3  0.65418424
[196,]       1        3  0.60662211
[197,]       1        3  0.59806845
[198,]       1        2  0.52850340
[199,]       1        3  0.60992868
[200,]       1        3  0.48100280
[201,]       1        3  0.64591125
[202,]       1        2  0.58454257
[203,]       1        3  0.57551214
[204,]       1        3  0.63606796
[205,]       1        2  0.59521785
[206,]       1        3  0.61147188
[207,]       1        3  0.65728653
[208,]       1        3  0.65902178
[209,]       1        2  0.57897310
[210,]       1        3 -0.02942564
[211,]       1        3  0.65593716
[212,]       1        3  0.63327909
[213,]       1        3  0.65288131
[214,]       1        3  0.39602200
[215,]       1        3  0.01080206
[216,]       1        2  0.35319397
[217,]       1        3  0.39831751
[218,]       1        3  0.17350202
[219,]       1        3  0.65753375
[220,]       1        3  0.64731099
[221,]       1        3  0.55034222
[222,]       1        3  0.62613104
[223,]       1        3  0.58301787
[224,]       1        3  0.65924387
[225,]       1        3  0.56987060
[226,]       1        3  0.65072754
[227,]       1        2  0.44952846
[228,]       1        3  0.04716389
[229,]       1        3  0.46717256
[230,]       1        3  0.57282278
[231,]       1        3  0.54490835
[232,]       1        3  0.61953127
[233,]       1        3  0.63698078
[234,]       1        3  0.66115854
[235,]       1        3  0.65718306
[236,]       1        2  0.54035769
[237,]       1        3  0.65730478
[238,]       1        3  0.57345861
[239,]       1        3  0.63898363
[240,]       1        3  0.65534397
[241,]       1        3 -0.02096095
[242,]       1        3  0.64897080
[243,]       1        3  0.66208627
[244,]       1        3 -0.02925747
[245,]       1        3  0.65904319
[246,]       1        3  0.55518255
[247,]       1        3  0.55959606
[248,]       1        2  0.33956317
[249,]       1        3  0.64517567
[250,]       1        3  0.65830527
[251,]       2        3  0.61359871
[252,]       3        1  0.58003604
[253,]       2        3  0.73444794
[254,]       2        3  0.27035419
[255,]       3        2  0.50489322
[256,]       1        3  0.40399242
[257,]       1        2  0.45791003
[258,]       2        1  0.68069751
[259,]       1        3  0.57576283
[260,]       2        1  0.71215636
[261,]       1        3 -0.51725016
[262,]       1        2  0.45178411
[263,]       1        3  0.49028937
[264,]       2        3  0.73008508
[265,]       1        2  0.17670951
[266,]       1        3  0.60879100
[267,]       1        2  0.47836312
[268,]       1        3  0.53956812
[269,]       1        3 -0.42819231
[270,]       3        2  0.55953104
[271,]       1        2  0.48004381
[272,]       1        3  0.53367341
[273,]       1        3  0.59300956
[274,]       1        2  0.44478523
[275,]       2        1  0.30131153
[276,]       1        3  0.60359391
[277,]       2        3  0.71604061
[278,]       2        1  0.68108461
[279,]       1        2  0.57655468
[280,]       1        3 -0.52565528
[281,]       3        1  0.63884162
[282,]       2        1  0.51383568
[283,]       2        1  0.67595843
[284,]       1        3  0.58791520
[285,]       2        3  0.72389567
[286,]       1        2  0.43474985
[287,]       1        3  0.01519654
[288,]       2        1  0.57712685
[289,]       1        3  0.57958889
[290,]       2        1  0.59577500
[291,]       1        3  0.55029091
[292,]       2        3  0.62956022
[293,]       2        3  0.36736502
[294,]       1        3  0.57928848
[295,]       1        3  0.37876729
[296,]       1        3  0.60693792
[297,]       1        3  0.44551144
[298,]       1        3  0.51509046
[299,]       2        3  0.36662785
[300,]       3        2  0.30026368
[301,]       1        3 -0.05383027
[302,]       1        3  0.57061375
[303,]       2        3  0.73525376
[304,]       2        3  0.74323648
[305,]       1        3  0.39614411
[306,]       1        3  0.22326538
[307,]       2        1  0.17258037
[308,]       2        3  0.71026483
[309,]       1        2  0.55824800
[310,]       1        2  0.11555624
[311,]       1        3  0.56705852
[312,]       1        3  0.42064304
[313,]       2        1  0.25714564
[314,]       1        2  0.42003740
[315,]       1        3  0.38633955
[316,]       3        2  0.25953094
[317,]       2        3  0.73951963
[318,]       2        1  0.15991630
[319,]       3        2  0.39625847
[320,]       2        3  0.67128753
[321,]       1        3  0.60139732
[322,]       2        3  0.74374753
[323,]       2        3  0.55872328
[324,]       1        2 -0.04392000
[325,]       1        3  0.29772038
[326,]       3        1  0.56262081
[327,]       1        3 -0.27352093
[328,]       1        3  0.38044902
[329,]       1        3  0.50001770
[330,]       3        2  0.06848524
[331,]       2        3  0.66087015
[332,]       3        1  0.64613937
[333,]       2        3  0.63658655
[334,]       3        1  0.65658828
[335,]       1        3 -0.29392311
[336,]       1        2  0.19509791
[337,]       2        1  0.29819860
[338,]       1        3  0.61360069
[339,]       1        2  0.55349497
[340,]       3        2  0.21754579
[341,]       1        3 -0.01160586
[342,]       2        1  0.34822904
[343,]       2        3  0.73613697
[344,]       2        3  0.62195946
[345,]       1        3  0.59550467
[346,]       1        2  0.56549260
[347,]       1        2  0.56334375
[348,]       1        3  0.46461633
[349,]       1        3 -0.38578268
[350,]       2        3  0.73959476
[351,]       2        3  0.42456778
[352,]       2        3  0.44433545
[353,]       2        3  0.73795404
[354,]       2        1  0.49927844
[355,]       2        1  0.51930400
[356,]       2        1  0.71138629
[357,]       1        3  0.58559960
[358,]       1        2  0.39459329
[359,]       1        3  0.60576837
[360,]       2        3  0.73003075
[361,]       2        1  0.54826221
[362,]       1        3  0.47869367
[363,]       1        3  0.52934749
[364,]       1        3  0.14959471
[365,]       2        3  0.73736560
[366,]       2        3  0.68754594
[367,]       2        3  0.54067795
[368,]       3        2  0.51971391
[369,]       3        2  0.17358931
[370,]       1        2  0.22355999
[371,]       1        3  0.48144782
[372,]       2        3  0.58379546
[373,]       1        2  0.21540193
[374,]       2        3  0.72821058
[375,]       2        1  0.33558861
[376,]       2        3  0.51817455
[377,]       1        3  0.44151894
[378,]       2        1  0.19138567
[379,]       2        3  0.72997197
[380,]       3        1  0.57527461
[381,]       2        1  0.69384834
[382,]       1        3  0.60623898
[383,]       1        3  0.45832950
[384,]       1        3  0.44353829
[385,]       1        3  0.45276820
[386,]       1        2  0.03167051
[387,]       2        3  0.73458892
[388,]       1        3  0.51186937
[389,]       2        3  0.73227911
[390,]       1        3  0.59794777
[391,]       3        2  0.26527618
[392,]       1        3  0.60429569
[393,]       1        2  0.02192119
[394,]       1        3  0.36690627
[395,]       1        3  0.53822354
[396,]       1        2  0.60450078
[397,]       2        1  0.64921669
[398,]       1        3  0.46510419
[399,]       2        3  0.39295728
[400,]       2        3  0.73622637
[401,]       1        2  0.57312835
[402,]       2        1  0.72084572
[403,]       1        3  0.52433757
[404,]       2        3  0.73218401
[405,]       2        3  0.73658657
[406,]       1        3  0.60204917
[407,]       2        3  0.33421327
[408,]       1        3  0.51039044
[409,]       1        3  0.55256135
[410,]       2        3  0.74291675
[411,]       2        3  0.73883081
[412,]       1        3  0.19175719
[413,]       1        3  0.38431668
[414,]       3        2  0.28070395
[415,]       1        3  0.51554971
[416,]       2        3  0.68902105
[417,]       2        3  0.62815223
[418,]       1        3  0.24274003
[419,]       1        2  0.33662829
[420,]       2        1  0.28563187
[421,]       1        2  0.39510802
[422,]       3        2  0.03536777
[423,]       2        1  0.71382328
[424,]       2        1  0.53898615
[425,]       1        3  0.10487137
[426,]       2        3  0.73687613
[427,]       1        3  0.10323277
[428,]       1        3 -0.01841517
[429,]       2        1  0.34124327
[430,]       3        2 -0.01561141
[431,]       2        3  0.25548009
[432,]       1        3  0.53693645
[433,]       1        3  0.61594890
[434,]       1        3  0.51243895
[435,]       1        3  0.60200739
[436,]       2        3  0.73250766
[437,]       1        3 -0.38991114
[438,]       1        3 -0.45836866
[439,]       1        3 -0.29799542
[440,]       1        3  0.41727515
[441,]       1        3  0.59707927
[442,]       1        3  0.54394629
[443,]       1        3 -0.48481026
[444,]       1        3  0.52636835
[445,]       1        3  0.59906046
[446,]       1        3  0.49935600
[447,]       3        2  0.54851107
[448,]       1        3  0.55101636
[449,]       1        2  0.55051148
[450,]       1        2  0.44563848
[451,]       2        3  0.62189025
[452,]       1        3  0.57326615
[453,]       1        3  0.42031441
[454,]       1        2  0.32707319
[455,]       1        3 -0.42261996
[456,]       1        2  0.25996183
[457,]       3        2  0.58616957
[458,]       1        3  0.52161852
[459,]       3        2  0.03459854
[460,]       1        3  0.45022906
[461,]       2        3  0.31725497
[462,]       1        3 -0.50260900
[463,]       1        3  0.41789108
[464,]       2        3  0.41328652
[465,]       2        3  0.73947129
[466,]       1        3  0.44693120
[467,]       1        3  0.49297875
[468,]       1        3  0.40657245
[469,]       2        3  0.74247293
[470,]       2        1  0.59320646
[471,]       2        1  0.37502415
[472,]       1        3  0.55453854
[473,]       1        3 -0.12673953
[474,]       1        3  0.56537808
[475,]       1        3  0.47789303
[476,]       1        2  0.54378320
[477,]       1        3 -0.54038521
[478,]       3        1  0.64478515
[479,]       2        3  0.52768237
[480,]       1        3  0.48291285
[481,]       2        1  0.49742304
[482,]       1        3  0.49360970
[483,]       2        3  0.59612174
[484,]       1        3  0.49066093
[485,]       1        3  0.50984244
[486,]       2        3  0.71271573
[487,]       3        2 -0.15462146
[488,]       2        3  0.73904117
[489,]       3        2  0.57608120
[490,]       1        3 -0.28481149
[491,]       1        2  0.34264707
[492,]       3        2  0.50289837
[493,]       2        3  0.66608798
[494,]       1        3  0.55941673
[495,]       1        2  0.36574559
[496,]       2        1  0.39333003
[497,]       3        2 -0.03895958
[498,]       2        3  0.63380223
[499,]       1        3  0.47557248
[500,]       1        2  0.04739007
[501,]       3        1  0.84547579
[502,]       3        1  0.84806890
[503,]       3        1  0.82760450
[504,]       3        1  0.83108370
[505,]       3        1  0.80339283
[506,]       3        1  0.82641590
[507,]       3        1  0.81082953
[508,]       3        1  0.83717410
[509,]       3        1  0.85432947
[510,]       3        1  0.70383132
[511,]       3        1  0.85289308
[512,]       3        1  0.84668423
[513,]       3        1  0.83402925
[514,]       3        1  0.84995944
[515,]       3        1  0.82702948
[516,]       3        1  0.83561159
[517,]       3        1  0.77473190
[518,]       3        1  0.82002706
[519,]       3        1  0.84865044
[520,]       3        1  0.85612357
[521,]       3        1  0.85379021
[522,]       3        1  0.82704294
[523,]       3        1  0.79808646
[524,]       3        1  0.80633983
[525,]       3        1  0.85074907
[526,]       3        1  0.77250534
[527,]       3        1  0.68150867
[528,]       3        1  0.81087010
[529,]       3        1  0.81289779
[530,]       3        1  0.77192620
[531,]       3        1  0.70618882
[532,]       3        1  0.82435439
[533,]       3        1  0.83270097
[534,]       3        1  0.80370120
[535,]       3        1  0.82866734
[536,]       3        1  0.84717898
[537,]       3        1  0.85131330
[538,]       3        1  0.82727519
[539,]       3        1  0.83329148
[540,]       3        1  0.85269680
[541,]       3        1  0.81798904
[542,]       3        1  0.74518447
[543,]       3        1  0.80271790
[544,]       3        1  0.81460477
[545,]       3        1  0.83158863
[546,]       3        1  0.85208842
[547,]       3        1  0.84773381
[548,]       3        1  0.82053626
[549,]       3        1  0.84098623
[550,]       3        1  0.83714036
[551,]       3        1  0.81378844
[552,]       3        1  0.82858157
[553,]       3        1  0.82489995
[554,]       3        1  0.67597668
[555,]       3        1  0.69216132
[556,]       3        1  0.84598317
[557,]       3        1  0.84334826
[558,]       3        1  0.78318110
[559,]       3        1  0.84296804
[560,]       3        1  0.85397036
[561,]       3        1  0.84706508
[562,]       3        1  0.83682919
[563,]       3        1  0.79762062
[564,]       3        1  0.84058847
[565,]       3        1  0.84771363
[566,]       3        1  0.81558171
[567,]       3        1  0.84185849
[568,]       3        1  0.84448514
[569,]       3        1  0.82381296
[570,]       3        1  0.80508442
[571,]       3        1  0.78003468
[572,]       3        1  0.85023088
[573,]       3        1  0.84225623
[574,]       3        1  0.84080675
[575,]       3        1  0.76104579
[576,]       3        1  0.81900015
[577,]       3        1  0.82214112
[578,]       3        1  0.81922517
[579,]       3        1  0.85444954
[580,]       3        1  0.75817478
[581,]       3        1  0.77055872
[582,]       3        1  0.79640549
[583,]       3        1  0.84307825
[584,]       3        1  0.84208957
[585,]       3        1  0.82566363
[586,]       3        1  0.82750560
[587,]       3        1  0.84421397
[588,]       3        1  0.80662362
[589,]       3        1  0.84553686
[590,]       3        1  0.84719348
[591,]       3        1  0.85150450
[592,]       3        1  0.84761527
[593,]       3        1  0.78778467
[594,]       3        1  0.83037763
[595,]       3        1  0.78769707
[596,]       3        1  0.80075778
[597,]       3        1  0.83137817
[598,]       3        1  0.83332882
[599,]       3        1  0.80799942
[600,]       3        1  0.83020935
[601,]       3        1  0.83713259
[602,]       3        1  0.82947761
[603,]       3        1  0.70132989
[604,]       3        1  0.81888838
[605,]       3        1  0.85283606
[606,]       3        1  0.80790582
[607,]       3        1  0.83262528
[608,]       3        1  0.80417961
[609,]       3        1  0.76901646
[610,]       3        1  0.79776709
[611,]       3        1  0.84881306
[612,]       3        1  0.80161018
[613,]       3        1  0.80231697
[614,]       3        1  0.83084775
[615,]       3        1  0.84924586
[616,]       3        1  0.78544271
[617,]       3        1  0.83929479
[618,]       3        1  0.85631052
[619,]       3        1  0.83477242
[620,]       3        1  0.82938369
[621,]       3        1  0.75960451
[622,]       3        1  0.83787202
[623,]       3        1  0.82707910
[624,]       3        1  0.68119884
[625,]       3        1  0.84066993
[626,]       3        1  0.78301103
[627,]       3        1  0.83735494
[628,]       3        1  0.84981972
[629,]       3        1  0.85609878
[630,]       3        1  0.78652551
[631,]       3        1  0.84190130
[632,]       3        1  0.85157171
[633,]       3        1  0.83819123
[634,]       3        1  0.83558091
[635,]       3        1  0.76231339
[636,]       3        1  0.85400812
[637,]       3        1  0.71605488
[638,]       3        1  0.84232447
[639,]       3        1  0.80893614
[640,]       3        1  0.82498660
[641,]       3        1  0.79717687
[642,]       3        1  0.79004768
[643,]       3        1  0.84835287
[644,]       3        1  0.78119292
[645,]       3        1  0.81197900
[646,]       3        1  0.85316272
[647,]       3        1  0.82063107
[648,]       3        1  0.84233124
[649,]       3        1  0.82419379
[650,]       3        1  0.85580166
[651,]       3        1  0.74358657
[652,]       3        1  0.83025795
[653,]       3        1  0.83462610
[654,]       3        1  0.84855326
[655,]       3        1  0.82703672
[656,]       3        1  0.83551629
[657,]       3        1  0.75201121
[658,]       3        1  0.83723696
[659,]       3        1  0.72144639
[660,]       3        1  0.84418683
[661,]       3        1  0.84636690
[662,]       3        1  0.84969189
[663,]       3        1  0.80396300
[664,]       3        1  0.82164294
[665,]       3        1  0.83295927
[666,]       3        1  0.81822885
[667,]       3        1  0.83767083
[668,]       3        1  0.84336379
[669,]       3        1  0.83445893
[670,]       3        1  0.81303318
[671,]       3        1  0.82136639
[672,]       3        1  0.83413592
[673,]       3        1  0.81187395
[674,]       3        1  0.85625654
[675,]       3        1  0.80220617
[676,]       3        1  0.81863904
[677,]       3        1  0.80549514
[678,]       3        1  0.85108164
[679,]       3        1  0.85516216
[680,]       3        1  0.84735764
[681,]       3        1  0.82672545
[682,]       3        1  0.84468929
[683,]       3        1  0.83457127
[684,]       3        1  0.80089199
[685,]       3        1  0.79206333
[686,]       3        1  0.85254249
[687,]       3        1  0.84821681
[688,]       3        1  0.79858260
[689,]       3        1  0.81515029
[690,]       3        1  0.83250181
[691,]       3        1  0.85273561
[692,]       3        1  0.67544280
[693,]       3        1  0.85329566
[694,]       3        1  0.85186788
[695,]       3        1  0.84445268
[696,]       3        1  0.76057303
[697,]       3        1  0.81922971
[698,]       3        1  0.85430407
[699,]       3        1  0.83749497
[700,]       3        1  0.85443338
[701,]       3        1  0.85367203
[702,]       3        1  0.82952631
[703,]       3        1  0.85404936
[704,]       3        1  0.81442533
[705,]       3        1  0.84467872
[706,]       3        1  0.84917612
[707,]       3        1  0.82854618
[708,]       3        1  0.80562381
[709,]       3        1  0.81221762
[710,]       3        1  0.84606935
[711,]       3        1  0.82928624
[712,]       3        1  0.82062563
[713,]       3        1  0.82102438
[714,]       3        1  0.81073866
[715,]       3        1  0.84064143
[716,]       3        1  0.80929270
[717,]       3        1  0.83526538
[718,]       3        1  0.74417112
[719,]       3        1  0.72506791
[720,]       3        1  0.75799800
[721,]       3        1  0.84134802
[722,]       3        1  0.83303926
[723,]       3        1  0.76143888
[724,]       3        1  0.80098432
[725,]       3        1  0.68577186
[726,]       3        1  0.82757340
[727,]       3        1  0.83565143
[728,]       3        1  0.84120691
[729,]       3        1  0.83600677
[730,]       3        1  0.79064418
[731,]       3        1  0.75928699
[732,]       3        1  0.84655953
[733,]       3        1  0.79129062
[734,]       3        1  0.85160748
[735,]       3        1  0.80161235
[736,]       3        1  0.81227222
[737,]       3        1  0.82279181
[738,]       3        1  0.76836798
[739,]       3        1  0.85391458
[740,]       3        1  0.81989964
[741,]       3        1  0.70273317
[742,]       3        1  0.83169000
[743,]       3        1  0.81943233
[744,]       3        1  0.82599773
[745,]       3        1  0.83693966
[746,]       3        1  0.77279180
[747,]       3        1  0.79618632
[748,]       3        1  0.82029315
[749,]       3        1  0.80837236
[750,]       3        1  0.84349548
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = average_clusters_ring_m, dist = dist(ring_moon_sphere_scaled))
attr(,"class")
[1] "silhouette"
avg_ring_m_average <- mean(ring_m_average_sils[, "sil_width"])


(ring_m_ward_sils <- silhouette(
  x   = ward_clusters_ring_m,
  dist = dist(ring_moon_sphere_scaled)
))
       cluster neighbor    sil_width
  [1,]       1        3  0.355192168
  [2,]       1        3  0.614969376
  [3,]       1        3  0.589316591
  [4,]       1        3  0.568240839
  [5,]       1        3  0.647636711
  [6,]       1        3  0.654164424
  [7,]       1        3  0.177976230
  [8,]       1        3  0.487577108
  [9,]       1        3  0.655314153
 [10,]       1        3  0.656796246
 [11,]       1        3  0.647120939
 [12,]       1        3  0.629226810
 [13,]       1        3  0.645473344
 [14,]       1        3  0.652615944
 [15,]       1        2  0.543737754
 [16,]       1        3  0.607088242
 [17,]       1        3  0.214040518
 [18,]       1        3  0.652651755
 [19,]       1        2  0.534999346
 [20,]       1        3  0.493750816
 [21,]       1        3  0.400242524
 [22,]       1        3 -0.050025795
 [23,]       1        3  0.217503902
 [24,]       1        3  0.069633417
 [25,]       1        3  0.439270300
 [26,]       1        3  0.641735829
 [27,]       1        3  0.648193547
 [28,]       1        2  0.535984478
 [29,]       1        3  0.646689110
 [30,]       1        3  0.640902543
 [31,]       1        3  0.581400574
 [32,]       1        3  0.578256219
 [33,]       1        3  0.357510138
 [34,]       1        3  0.621942552
 [35,]       1        3  0.449003369
 [36,]       1        3  0.558469983
 [37,]       1        2  0.547984121
 [38,]       1        3  0.353226957
 [39,]       1        3  0.647861249
 [40,]       1        3  0.349381230
 [41,]       1        3  0.481824599
 [42,]       1        3  0.643781375
 [43,]       1        3  0.334973455
 [44,]       1        3  0.649714706
 [45,]       1        3  0.593529019
 [46,]       1        3  0.487743120
 [47,]       1        3  0.028102958
 [48,]       1        3  0.164503037
 [49,]       1        3  0.539684580
 [50,]       1        3  0.625663554
 [51,]       1        3  0.384812774
 [52,]       1        3  0.332679914
 [53,]       1        2  0.567428693
 [54,]       1        2  0.410846022
 [55,]       1        2  0.585789165
 [56,]       1        2  0.519051367
 [57,]       1        3  0.630522625
 [58,]       1        3  0.430854707
 [59,]       1        3  0.275376997
 [60,]       1        3  0.492122788
 [61,]       1        3  0.622744979
 [62,]       1        3  0.083136251
 [63,]       1        3  0.622065279
 [64,]       1        3  0.108687212
 [65,]       1        3  0.636681606
 [66,]       1        3  0.543978518
 [67,]       1        3  0.641184873
 [68,]       1        3  0.639364489
 [69,]       1        3  0.558318057
 [70,]       1        3  0.080634472
 [71,]       1        3  0.634870123
 [72,]       1        3  0.630527206
 [73,]       1        2  0.457503214
 [74,]       1        2  0.438198329
 [75,]       1        3  0.631504805
 [76,]       1        3  0.650696065
 [77,]       1        3  0.255485566
 [78,]       1        3  0.297071325
 [79,]       1        3  0.622321306
 [80,]       1        3  0.648792744
 [81,]       1        3  0.622542828
 [82,]       1        3  0.657367467
 [83,]       1        3  0.567006706
 [84,]       1        3  0.082452881
 [85,]       1        2  0.436983385
 [86,]       1        3  0.611269187
 [87,]       1        3  0.430856804
 [88,]       1        3  0.629000395
 [89,]       1        3  0.656566900
 [90,]       1        2  0.559351014
 [91,]       1        3 -0.035114408
 [92,]       1        3  0.473251309
 [93,]       1        3  0.596358165
 [94,]       1        3  0.627690473
 [95,]       1        3  0.597146315
 [96,]       1        3  0.469375052
 [97,]       1        3  0.521988960
 [98,]       1        3  0.528670344
 [99,]       1        3  0.336443131
[100,]       1        3  0.656874505
[101,]       1        3  0.629442736
[102,]       1        3  0.657463255
[103,]       1        3  0.386872772
[104,]       1        3  0.638982161
[105,]       1        3  0.653022718
[106,]       1        3  0.569793572
[107,]       1        3  0.066134811
[108,]       1        3  0.591532209
[109,]       1        3  0.176754479
[110,]       1        3  0.548331290
[111,]       1        3  0.544361283
[112,]       1        3  0.183719011
[113,]       1        3  0.282184143
[114,]       1        3  0.231498580
[115,]       1        2  0.507410431
[116,]       1        3  0.656817570
[117,]       1        3  0.585239070
[118,]       1        3  0.656835423
[119,]       1        3  0.416962533
[120,]       1        3  0.615744771
[121,]       1        3  0.654882552
[122,]       1        3  0.599410887
[123,]       1        3  0.603866972
[124,]       1        3  0.349095527
[125,]       1        3  0.649642897
[126,]       1        3  0.607522319
[127,]       1        3  0.652451783
[128,]       1        3  0.603088564
[129,]       1        2  0.566761510
[130,]       1        3  0.516504848
[131,]       1        3  0.530068934
[132,]       1        3  0.641596543
[133,]       1        3  0.562213108
[134,]       1        3  0.411636109
[135,]       1        2  0.594252098
[136,]       1        3  0.637460644
[137,]       1        3  0.090219361
[138,]       1        3  0.186716892
[139,]       1        3  0.652832866
[140,]       1        3  0.643339671
[141,]       1        3  0.633608417
[142,]       1        3  0.551117831
[143,]       1        3  0.656889076
[144,]       1        3  0.599228401
[145,]       1        3  0.620168069
[146,]       1        3  0.472100536
[147,]       1        3  0.655469439
[148,]       1        3  0.603694351
[149,]       1        3  0.650969015
[150,]       1        3  0.380805677
[151,]       1        3  0.644733030
[152,]       1        3  0.230116557
[153,]       1        2  0.552929826
[154,]       1        3  0.518957938
[155,]       1        3  0.656871020
[156,]       1        3  0.478283550
[157,]       1        3  0.303180899
[158,]       1        3  0.181916199
[159,]       1        3  0.608370656
[160,]       1        3 -0.097350928
[161,]       1        2  0.422267855
[162,]       1        3  0.628851002
[163,]       1        3  0.570263226
[164,]       1        2  0.565602444
[165,]       1        3  0.639963931
[166,]       1        3  0.634186552
[167,]       1        2  0.573704005
[168,]       1        3  0.376542845
[169,]       1        3  0.633432652
[170,]       1        3  0.641997597
[171,]       1        3  0.628938619
[172,]       1        3  0.203830411
[173,]       1        3  0.649949124
[174,]       1        2  0.544423517
[175,]       1        3  0.373823250
[176,]       1        3  0.647527869
[177,]       1        3  0.657049414
[178,]       1        3  0.631788414
[179,]       1        3  0.341841931
[180,]       1        3  0.653780137
[181,]       1        3  0.312233110
[182,]       1        3  0.549418617
[183,]       1        3  0.310519282
[184,]       1        3  0.101654977
[185,]       1        3  0.467913442
[186,]       1        3  0.540496741
[187,]       1        3  0.601628641
[188,]       1        3  0.171321375
[189,]       1        3  0.587660936
[190,]       1        3  0.552848810
[191,]       1        3  0.623814645
[192,]       1        3  0.590665691
[193,]       1        3  0.544257113
[194,]       1        3  0.646262169
[195,]       1        3  0.650688272
[196,]       1        3  0.597348570
[197,]       1        3  0.597820022
[198,]       1        2  0.535345212
[199,]       1        3  0.600636755
[200,]       1        3  0.467352205
[201,]       1        3  0.643088271
[202,]       1        2  0.588754505
[203,]       1        3  0.564866367
[204,]       1        3  0.628187897
[205,]       1        3  0.598483292
[206,]       1        3  0.602625007
[207,]       1        3  0.653769535
[208,]       1        3  0.654861654
[209,]       1        2  0.583197123
[210,]       1        3 -0.039969827
[211,]       1        3  0.652256124
[212,]       1        3  0.625550266
[213,]       1        3  0.646755770
[214,]       1        3  0.381932901
[215,]       1        3  0.001195414
[216,]       1        2  0.369515194
[217,]       1        3  0.383582437
[218,]       1        3  0.157697651
[219,]       1        3  0.653533072
[220,]       1        3  0.644436142
[221,]       1        3  0.539221235
[222,]       1        3  0.624761826
[223,]       1        3  0.572879487
[224,]       1        3  0.653434378
[225,]       1        3  0.558945416
[226,]       1        3  0.647901682
[227,]       1        2  0.460253636
[228,]       1        3  0.035114323
[229,]       1        3  0.453382124
[230,]       1        3  0.562777203
[231,]       1        3  0.533997542
[232,]       1        3  0.611551460
[233,]       1        3  0.629262103
[234,]       1        3  0.655567006
[235,]       1        3  0.650947040
[236,]       1        2  0.545946676
[237,]       1        3  0.651131246
[238,]       1        3  0.563013400
[239,]       1        3  0.631274188
[240,]       1        3  0.649688561
[241,]       1        3 -0.035205295
[242,]       1        3  0.646131486
[243,]       1        3  0.656857550
[244,]       1        3 -0.042722777
[245,]       1        3  0.655159964
[246,]       1        3  0.544118091
[247,]       1        3  0.548379790
[248,]       1        2  0.357355974
[249,]       1        3  0.642606500
[250,]       1        3  0.654575490
[251,]       2        3  0.629809097
[252,]       3        1  0.587634111
[253,]       2        3  0.711172692
[254,]       2        3  0.366824360
[255,]       3        2  0.432433263
[256,]       1        3  0.386129571
[257,]       1        2  0.475444919
[258,]       2        1  0.636207318
[259,]       1        3  0.569139932
[260,]       2        1  0.669566276
[261,]       1        3 -0.540801927
[262,]       1        2  0.469851255
[263,]       1        3  0.481001785
[264,]       2        3  0.707704537
[265,]       1        2  0.224293182
[266,]       1        3  0.605245015
[267,]       1        2  0.494025957
[268,]       1        3  0.532332324
[269,]       1        3 -0.458955612
[270,]       3        2  0.502052472
[271,]       1        2  0.495587386
[272,]       1        3  0.526515682
[273,]       1        3  0.588720568
[274,]       1        2  0.463492271
[275,]       2        1  0.226736521
[276,]       1        3  0.601590700
[277,]       2        3  0.694668021
[278,]       2        1  0.637657240
[279,]       1        2  0.583602459
[280,]       1        3 -0.548247346
[281,]       3        1  0.641198839
[282,]       2        1  0.453196045
[283,]       2        1  0.628614891
[284,]       1        3  0.586279969
[285,]       2        3  0.705041767
[286,]       1        2  0.454460439
[287,]       1        3 -0.026459920
[288,]       2        1  0.522078651
[289,]       1        3  0.573534367
[290,]       2        1  0.542866427
[291,]       1        3  0.543550358
[292,]       2        3  0.640217886
[293,]       2        3  0.440994160
[294,]       1        3  0.575181855
[295,]       1        3  0.361113773
[296,]       1        3  0.602805309
[297,]       1        3  0.431941814
[298,]       1        3  0.507223185
[299,]       2        3  0.446589950
[300,]       2        3 -0.181003449
[301,]       1        3 -0.094588347
[302,]       1        3  0.565784727
[303,]       2        3  0.715301782
[304,]       2        3  0.715701627
[305,]       1        3  0.378592241
[306,]       1        3  0.194733105
[307,]       1        2 -0.106903101
[308,]       2        3  0.691478538
[309,]       1        2  0.566975244
[310,]       1        2  0.171322009
[311,]       1        3  0.560659649
[312,]       1        3  0.403791583
[313,]       2        1  0.180951657
[314,]       1        2  0.441074930
[315,]       1        3  0.368528256
[316,]       2        3 -0.126690205
[317,]       2        1  0.706918175
[318,]       1        2 -0.093262774
[319,]       2        3 -0.305774421
[320,]       2        3  0.666805863
[321,]       1        3  0.598408945
[322,]       2        3  0.716390513
[323,]       2        3  0.586675856
[324,]       1        2  0.032402803
[325,]       1        3  0.274355147
[326,]       3        2  0.547883408
[327,]       1        3 -0.306110104
[328,]       1        3  0.362211075
[329,]       1        3  0.487373463
[330,]       2        3  0.094606042
[331,]       2        3  0.665492272
[332,]       3        1  0.652105688
[333,]       2        3  0.636430457
[334,]       3        1  0.662429979
[335,]       1        3 -0.329488261
[336,]       1        2  0.239833610
[337,]       2        1  0.228544380
[338,]       1        3  0.609335376
[339,]       1        2  0.562787677
[340,]       2        3 -0.076294457
[341,]       1        3 -0.051971917
[342,]       2        1  0.276090802
[343,]       2        3  0.712847378
[344,]       2        3  0.636763081
[345,]       1        3  0.590166662
[346,]       1        2  0.573678356
[347,]       1        2  0.571087965
[348,]       1        3  0.451871028
[349,]       1        3 -0.415751908
[350,]       2        1  0.706920713
[351,]       2        3  0.485613135
[352,]       2        3  0.503234526
[353,]       2        3  0.716352812
[354,]       2        1  0.437322113
[355,]       2        1  0.461350733
[356,]       2        1  0.668332716
[357,]       1        3  0.580177751
[358,]       1        2  0.418219115
[359,]       1        3  0.600931401
[360,]       2        1  0.694109897
[361,]       2        1  0.491750003
[362,]       1        3  0.466828797
[363,]       1        3  0.520968014
[364,]       1        3  0.116366600
[365,]       2        3  0.716427019
[366,]       2        3  0.678301566
[367,]       2        3  0.571383316
[368,]       3        2  0.448576411
[369,]       2        3 -0.020415999
[370,]       1        2  0.264905413
[371,]       1        3  0.470531980
[372,]       2        3  0.608303470
[373,]       1        2  0.258344022
[374,]       2        3  0.711150275
[375,]       2        1  0.262672888
[376,]       2        3  0.552872064
[377,]       1        3  0.426819501
[378,]       1        2 -0.124012857
[379,]       2        3  0.710686032
[380,]       3        1  0.578658481
[381,]       2        1  0.648567077
[382,]       1        3  0.604140498
[383,]       1        3  0.445004785
[384,]       1        3  0.429630210
[385,]       1        3  0.440545730
[386,]       1        2  0.098843091
[387,]       2        3  0.707682190
[388,]       1        3  0.502005572
[389,]       2        3  0.712787224
[390,]       1        3  0.595076206
[391,]       2        3 -0.133112692
[392,]       1        3  0.600815521
[393,]       1        2  0.088354492
[394,]       1        3  0.348022238
[395,]       1        3  0.529857371
[396,]       1        3  0.606009684
[397,]       2        1  0.600154610
[398,]       1        3  0.452685239
[399,]       2        3  0.461084669
[400,]       2        3  0.709544034
[401,]       1        2  0.580861394
[402,]       2        1  0.679752776
[403,]       1        3  0.515538441
[404,]       2        3  0.705857386
[405,]       2        3  0.713915791
[406,]       1        3  0.599244205
[407,]       2        3  0.419656623
[408,]       1        3  0.501560891
[409,]       1        3  0.545835868
[410,]       2        3  0.714370276
[411,]       2        1  0.705287964
[412,]       1        3  0.161516760
[413,]       1        3  0.366211644
[414,]       2        3 -0.159737107
[415,]       1        3  0.506970983
[416,]       2        3  0.680961020
[417,]       2        3  0.640686475
[418,]       1        3  0.216042253
[419,]       1        2  0.365154466
[420,]       2        1  0.210772062
[421,]       1        2  0.418488218
[422,]       2        3  0.123094478
[423,]       2        1  0.674556613
[424,]       2        1  0.480066232
[425,]       1        3  0.068859905
[426,]       2        1  0.703336101
[427,]       1        3  0.067042366
[428,]       1        3 -0.059774913
[429,]       2        1  0.268841652
[430,]       2        3  0.166995756
[431,]       2        3  0.353757090
[432,]       1        3  0.530076451
[433,]       1        3  0.613747738
[434,]       1        3  0.503632839
[435,]       1        3  0.597719091
[436,]       2        1  0.699373685
[437,]       1        3 -0.417792096
[438,]       1        3 -0.488380655
[439,]       1        3 -0.332975634
[440,]       1        3  0.400791870
[441,]       1        3  0.594633104
[442,]       1        3  0.536327968
[443,]       1        3 -0.514829640
[444,]       1        3  0.518475218
[445,]       1        3  0.597551672
[446,]       1        3  0.489617724
[447,]       3        2  0.484051577
[448,]       1        3  0.542713136
[449,]       1        2  0.559354171
[450,]       1        2  0.464290747
[451,]       2        3  0.632231264
[452,]       1        3  0.568899605
[453,]       1        3  0.404577864
[454,]       1        2  0.357159435
[455,]       1        3 -0.451102939
[456,]       1        2  0.297733014
[457,]       3        2  0.533757666
[458,]       1        3  0.513032154
[459,]       2        3  0.126038823
[460,]       1        3  0.437779149
[461,]       2        3  0.403458863
[462,]       1        3 -0.532854033
[463,]       1        3  0.401639325
[464,]       2        3  0.478056979
[465,]       2        3  0.715988337
[466,]       1        3  0.433666890
[467,]       1        3  0.482488158
[468,]       1        3  0.390710141
[469,]       2        3  0.717684039
[470,]       2        1  0.540689380
[471,]       2        1  0.306967936
[472,]       1        3  0.547940993
[473,]       1        3 -0.163562703
[474,]       1        3  0.559716830
[475,]       1        3  0.466902363
[476,]       1        2  0.553300249
[477,]       1        3 -0.560151800
[478,]       3        1  0.657722909
[479,]       2        3  0.561000496
[480,]       1        3  0.472968358
[481,]       2        1  0.436911090
[482,]       1        3  0.483239867
[483,]       2        3  0.614501686
[484,]       1        3  0.480460598
[485,]       1        3  0.501870041
[486,]       2        3  0.696611876
[487,]       2        3  0.276422050
[488,]       2        3  0.713953829
[489,]       3        2  0.521770238
[490,]       1        3 -0.321641199
[491,]       1        2  0.371004066
[492,]       3        2  0.427919809
[493,]       2        3  0.665522620
[494,]       1        3  0.553139964
[495,]       1        2  0.392296878
[496,]       2        1  0.327727633
[497,]       2        3  0.186713005
[498,]       2        3  0.639325822
[499,]       1        3  0.464764483
[500,]       1        2  0.111886122
[501,]       3        1  0.873529640
[502,]       3        1  0.874975666
[503,]       3        1  0.847115406
[504,]       3        1  0.860253594
[505,]       3        1  0.833511059
[506,]       3        1  0.855242295
[507,]       3        1  0.826497668
[508,]       3        1  0.860136234
[509,]       3        1  0.880584871
[510,]       3        1  0.733733752
[511,]       3        1  0.879867764
[512,]       3        1  0.869884979
[513,]       3        1  0.860127884
[514,]       3        1  0.874234781
[515,]       3        1  0.856541172
[516,]       3        1  0.864430638
[517,]       3        1  0.805535685
[518,]       3        1  0.836896038
[519,]       3        1  0.876336401
[520,]       3        1  0.880628756
[521,]       3        1  0.876874250
[522,]       3        1  0.845939437
[523,]       3        1  0.828496203
[524,]       3        1  0.821827180
[525,]       3        1  0.872935190
[526,]       3        1  0.802295879
[527,]       3        1  0.713275283
[528,]       3        1  0.840311427
[529,]       3        1  0.842445887
[530,]       3        1  0.784127255
[531,]       3        1  0.737069322
[532,]       3        1  0.844702538
[533,]       3        1  0.861601402
[534,]       3        1  0.833513136
[535,]       3        1  0.848180799
[536,]       3        1  0.874753224
[537,]       3        1  0.877988823
[538,]       3        1  0.856613415
[539,]       3        1  0.862187722
[540,]       3        1  0.875499994
[541,]       3        1  0.835963725
[542,]       3        1  0.776776906
[543,]       3        1  0.817932516
[544,]       3        1  0.842632277
[545,]       3        1  0.860651565
[546,]       3        1  0.874680673
[547,]       3        1  0.875545175
[548,]       3        1  0.850359942
[549,]       3        1  0.861940963
[550,]       3        1  0.856587797
[551,]       3        1  0.830262225
[552,]       3        1  0.846726096
[553,]       3        1  0.851567838
[554,]       3        1  0.707405720
[555,]       3        1  0.724414907
[556,]       3        1  0.868050375
[557,]       3        1  0.871449190
[558,]       3        1  0.813304406
[559,]       3        1  0.869681277
[560,]       3        1  0.880473123
[561,]       3        1  0.872580161
[562,]       3        1  0.865628478
[563,]       3        1  0.828220734
[564,]       3        1  0.869178222
[565,]       3        1  0.871311839
[566,]       3        1  0.832285270
[567,]       3        1  0.868594246
[568,]       3        1  0.865287797
[569,]       3        1  0.843938092
[570,]       3        1  0.831459965
[571,]       3        1  0.809870600
[572,]       3        1  0.877536633
[573,]       3        1  0.863277071
[574,]       3        1  0.866772529
[575,]       3        1  0.792506027
[576,]       3        1  0.848720371
[577,]       3        1  0.851505751
[578,]       3        1  0.836393231
[579,]       3        1  0.877955240
[580,]       3        1  0.789690173
[581,]       3        1  0.798236597
[582,]       3        1  0.810100238
[583,]       3        1  0.863916723
[584,]       3        1  0.866433227
[585,]       3        1  0.845480013
[586,]       3        1  0.856942664
[587,]       3        1  0.866274654
[588,]       3        1  0.836768262
[589,]       3        1  0.871256858
[590,]       3        1  0.869488948
[591,]       3        1  0.873983452
[592,]       3        1  0.871357964
[593,]       3        1  0.810762387
[594,]       3        1  0.859674322
[595,]       3        1  0.800339945
[596,]       3        1  0.831223189
[597,]       3        1  0.860628174
[598,]       3        1  0.860916907
[599,]       3        1  0.824269580
[600,]       3        1  0.851559908
[601,]       3        1  0.856580814
[602,]       3        1  0.858538135
[603,]       3        1  0.733701879
[604,]       3        1  0.835649053
[605,]       3        1  0.877730171
[606,]       3        1  0.838058274
[607,]       3        1  0.861074417
[608,]       3        1  0.821397300
[609,]       3        1  0.800175990
[610,]       3        1  0.815116138
[611,]       3        1  0.870743842
[612,]       3        1  0.832078864
[613,]       3        1  0.831191387
[614,]       3        1  0.850581264
[615,]       3        1  0.875200196
[616,]       3        1  0.815906121
[617,]       3        1  0.865577650
[618,]       3        1  0.881108168
[619,]       3        1  0.862416232
[620,]       3        1  0.857249989
[621,]       3        2  0.758855164
[622,]       3        1  0.859068428
[623,]       3        1  0.854174049
[624,]       3        1  0.713218499
[625,]       3        1  0.869277141
[626,]       3        1  0.808541998
[627,]       3        1  0.866232591
[628,]       3        1  0.874611551
[629,]       3        1  0.881104693
[630,]       3        1  0.816653316
[631,]       3        1  0.869392289
[632,]       3        1  0.873960900
[633,]       3        1  0.864375087
[634,]       3        1  0.864448325
[635,]       3        1  0.790409118
[636,]       3        1  0.878259828
[637,]       3        1  0.747757748
[638,]       3        1  0.866521184
[639,]       3        1  0.826343229
[640,]       3        1  0.852366907
[641,]       3        1  0.827805313
[642,]       3        1  0.803187269
[643,]       3        1  0.873546963
[644,]       3        2  0.790877753
[645,]       3        1  0.831827161
[646,]       3        1  0.880060569
[647,]       3        1  0.839029933
[648,]       3        1  0.863189664
[649,]       3        1  0.841672027
[650,]       3        1  0.881325000
[651,]       3        2  0.740551472
[652,]       3        1  0.859618180
[653,]       3        1  0.853716672
[654,]       3        1  0.872450825
[655,]       3        1  0.855148338
[656,]       3        1  0.854690768
[657,]       3        1  0.783564472
[658,]       3        1  0.861794960
[659,]       3        1  0.753159338
[660,]       3        1  0.865716929
[661,]       3        1  0.870373285
[662,]       3        1  0.872059004
[663,]       3        1  0.832459737
[664,]       3        1  0.845200716
[665,]       3        1  0.852597673
[666,]       3        1  0.843458747
[667,]       3        1  0.865169244
[668,]       3        1  0.863932937
[669,]       3        1  0.862806516
[670,]       3        1  0.830916855
[671,]       3        1  0.838440565
[672,]       3        1  0.862531619
[673,]       3        1  0.836520444
[674,]       3        1  0.881699513
[675,]       3        1  0.817431159
[676,]       3        1  0.845841714
[677,]       3        1  0.834793725
[678,]       3        1  0.873399765
[679,]       3        1  0.879192063
[680,]       3        1  0.869813886
[681,]       3        1  0.847473251
[682,]       3        1  0.871715980
[683,]       3        1  0.863614355
[684,]       3        1  0.829211279
[685,]       3        1  0.806341096
[686,]       3        1  0.876290328
[687,]       3        1  0.872467320
[688,]       3        1  0.819646331
[689,]       3        1  0.831703806
[690,]       3        1  0.851893324
[691,]       3        1  0.879725684
[692,]       3        1  0.708215880
[693,]       3        1  0.876681031
[694,]       3        1  0.877749915
[695,]       3        1  0.872590708
[696,]       3        1  0.791897267
[697,]       3        1  0.845177332
[698,]       3        1  0.880154832
[699,]       3        1  0.857070756
[700,]       3        1  0.880824033
[701,]       3        1  0.876738556
[702,]       3        1  0.856514312
[703,]       3        1  0.880749194
[704,]       3        1  0.832079402
[705,]       3        1  0.870187634
[706,]       3        1  0.872469882
[707,]       3        1  0.857993609
[708,]       3        1  0.835992197
[709,]       3        1  0.841941313
[710,]       3        1  0.868015222
[711,]       3        1  0.847805581
[712,]       3        1  0.847587587
[713,]       3        1  0.845870543
[714,]       3        1  0.828432613
[715,]       3        1  0.867680341
[716,]       3        1  0.827519337
[717,]       3        1  0.863672059
[718,]       3        1  0.775944531
[719,]       3        1  0.756334110
[720,]       3        1  0.789300349
[721,]       3        1  0.862241578
[722,]       3        1  0.857213395
[723,]       3        2  0.761830000
[724,]       3        1  0.815451295
[725,]       3        1  0.718388049
[726,]       3        1  0.857079430
[727,]       3        1  0.863074660
[728,]       3        1  0.862024865
[729,]       3        1  0.858442378
[730,]       3        1  0.821349775
[731,]       3        1  0.789759639
[732,]       3        1  0.872116113
[733,]       3        1  0.813259507
[734,]       3        1  0.878824021
[735,]       3        1  0.816144221
[736,]       3        1  0.842406997
[737,]       3        1  0.852065583
[738,]       3        1  0.797760036
[739,]       3        1  0.878677927
[740,]       3        1  0.836958491
[741,]       3        1  0.730789401
[742,]       3        1  0.858401375
[743,]       3        1  0.845509356
[744,]       3        1  0.847908750
[745,]       3        1  0.861585313
[746,]       3        1  0.804005158
[747,]       3        1  0.822558288
[748,]       3        1  0.850112903
[749,]       3        1  0.838537508
[750,]       3        1  0.864082223
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = ward_clusters_ring_m, dist = dist(ring_moon_sphere_scaled))
attr(,"class")
[1] "silhouette"
avg_ring_m_ward <- mean(ring_m_ward_sils[, "sil_width"])
title_ring_single   <- paste("Ring–moon–sphere – single (s) =",   round(avg_ring_m_single, 3), ")")
title_ring_complete <- paste("Ring–moon–sphere – complete (s =", round(avg_ring_m_complete, 3), ")")
title_ring_average  <- paste("Ring–moon–sphere – average (s =",  round(avg_ring_m_average, 3), ")")
title_ring_ward     <- paste("Ring–moon–sphere – ward (s) =",     round(avg_ring_m_ward, 3), ")")
(two_s_single_sils <- silhouette(
  x   = single_clusters_two_s,
  dist = dist(two_spirals_sphere_scaled)
))
       cluster neighbor   sil_width
  [1,]       1        3 -0.74363016
  [2,]       1        3 -0.74226653
  [3,]       1        3 -0.73561137
  [4,]       1        3 -0.74191187
  [5,]       1        3 -0.70950994
  [6,]       1        3 -0.70681774
  [7,]       1        3 -0.69814145
  [8,]       1        3 -0.67593905
  [9,]       1        3 -0.72036919
 [10,]       1        3 -0.70370283
 [11,]       1        3 -0.68653183
 [12,]       1        3 -0.63752723
 [13,]       1        3 -0.63370540
 [14,]       1        3 -0.69293733
 [15,]       1        3 -0.68045367
 [16,]       1        3 -0.68146736
 [17,]       1        3 -0.69694583
 [18,]       1        3 -0.60861102
 [19,]       1        3 -0.67521190
 [20,]       1        3 -0.64073621
 [21,]       1        3 -0.65466214
 [22,]       1        3 -0.66819668
 [23,]       1        3 -0.62542915
 [24,]       1        3 -0.58885563
 [25,]       1        3 -0.60553804
 [26,]       1        3 -0.62250380
 [27,]       1        3 -0.59297827
 [28,]       1        3 -0.58755211
 [29,]       1        3 -0.59994501
 [30,]       1        3 -0.59445289
 [31,]       1        3 -0.59938659
 [32,]       1        3 -0.58464627
 [33,]       1        3 -0.55873329
 [34,]       1        3 -0.60466846
 [35,]       1        3 -0.59058103
 [36,]       1        3 -0.58850441
 [37,]       1        3 -0.53093726
 [38,]       1        3 -0.57186017
 [39,]       1        3 -0.50623244
 [40,]       1        3 -0.53109012
 [41,]       1        3 -0.50154794
 [42,]       1        3 -0.49655929
 [43,]       1        3 -0.54140972
 [44,]       1        3 -0.50649939
 [45,]       1        3 -0.50724594
 [46,]       1        3 -0.51716775
 [47,]       1        3 -0.51989317
 [48,]       1        3 -0.52671632
 [49,]       1        3 -0.54013822
 [50,]       1        3 -0.48355038
 [51,]       1        3 -0.47202016
 [52,]       1        3 -0.45077551
 [53,]       1        3 -0.45719087
 [54,]       1        3 -0.46945932
 [55,]       1        3 -0.47874846
 [56,]       1        3 -0.44735391
 [57,]       1        3 -0.45817115
 [58,]       1        3 -0.44869928
 [59,]       1        3 -0.38835155
 [60,]       1        3 -0.41033902
 [61,]       1        3 -0.40581584
 [62,]       1        3 -0.43359607
 [63,]       1        3 -0.42324728
 [64,]       1        3 -0.40314655
 [65,]       1        3 -0.36649470
 [66,]       1        3 -0.42619187
 [67,]       1        3 -0.39862924
 [68,]       1        3 -0.39419439
 [69,]       1        3 -0.36918181
 [70,]       1        3 -0.39153041
 [71,]       1        3 -0.35832042
 [72,]       1        3 -0.37639536
 [73,]       1        3 -0.35010809
 [74,]       1        3 -0.39047952
 [75,]       1        3 -0.34642557
 [76,]       1        3 -0.39602041
 [77,]       1        3 -0.37157595
 [78,]       1        3 -0.36614604
 [79,]       1        3 -0.33439936
 [80,]       1        3 -0.36646894
 [81,]       1        3 -0.36737753
 [82,]       1        3 -0.37934326
 [83,]       1        3 -0.35687521
 [84,]       1        3 -0.35899164
 [85,]       1        3 -0.34874933
 [86,]       1        3 -0.33854283
 [87,]       1        3 -0.36181526
 [88,]       1        3 -0.31512485
 [89,]       1        3 -0.32824205
 [90,]       1        3 -0.31278482
 [91,]       1        3 -0.37484274
 [92,]       1        3 -0.31830304
 [93,]       1        3 -0.31570546
 [94,]       1        3 -0.31288420
 [95,]       1        3 -0.32093130
 [96,]       1        3 -0.30176989
 [97,]       1        3 -0.34254396
 [98,]       1        3 -0.31669427
 [99,]       1        3 -0.31862897
[100,]       1        3 -0.32525511
[101,]       1        3 -0.32557231
[102,]       1        3 -0.31583589
[103,]       1        3 -0.33235457
[104,]       1        3 -0.31210161
[105,]       1        3 -0.31936189
[106,]       1        3 -0.32728250
[107,]       1        3 -0.33724241
[108,]       1        3 -0.30884921
[109,]       1        3 -0.32419243
[110,]       1        3 -0.31245296
[111,]       1        3 -0.33220899
[112,]       1        3 -0.30425259
[113,]       1        3 -0.33762786
[114,]       1        3 -0.31172577
[115,]       1        3 -0.30858290
[116,]       1        3 -0.31359238
[117,]       1        3 -0.30996721
[118,]       1        3 -0.31306325
[119,]       1        3 -0.32250521
[120,]       1        3 -0.31942182
[121,]       1        3 -0.31452172
[122,]       1        3 -0.32037756
[123,]       1        3 -0.31751606
[124,]       1        3 -0.29238928
[125,]       1        3 -0.32795951
[126,]       1        3 -0.30929008
[127,]       1        3 -0.30972474
[128,]       1        3 -0.28888311
[129,]       1        3 -0.28965802
[130,]       1        3 -0.29617392
[131,]       1        3 -0.31030569
[132,]       1        3 -0.30239663
[133,]       1        3 -0.30810901
[134,]       1        3 -0.30093265
[135,]       1        3 -0.30354394
[136,]       1        3 -0.31110218
[137,]       1        3 -0.29999129
[138,]       1        3 -0.30095155
[139,]       1        3 -0.28814698
[140,]       1        3 -0.29196477
[141,]       1        3 -0.28458407
[142,]       1        3 -0.26752797
[143,]       1        3 -0.28804804
[144,]       1        3 -0.29054196
[145,]       1        3 -0.27348826
[146,]       1        3 -0.27870545
[147,]       1        3 -0.27737544
[148,]       1        3 -0.25781152
[149,]       1        3 -0.26256527
[150,]       1        3 -0.24896136
[151,]       1        3 -0.26619555
[152,]       1        3 -0.25614560
[153,]       1        3 -0.25573656
[154,]       1        3 -0.25774441
[155,]       1        3 -0.25085216
[156,]       1        3 -0.24255642
[157,]       1        3 -0.23785484
[158,]       1        3 -0.24308656
[159,]       1        3 -0.22801755
[160,]       1        3 -0.25201851
[161,]       1        3 -0.23428339
[162,]       1        3 -0.22078870
[163,]       1        3 -0.22029446
[164,]       1        3 -0.22326700
[165,]       1        3 -0.21085223
[166,]       1        3 -0.22231650
[167,]       1        3 -0.20746316
[168,]       1        3 -0.21916175
[169,]       1        3 -0.20058312
[170,]       1        3 -0.21722879
[171,]       1        3 -0.18439006
[172,]       1        3 -0.19416269
[173,]       1        3 -0.19253734
[174,]       1        3 -0.19228906
[175,]       1        3 -0.17436876
[176,]       1        3 -0.17230572
[177,]       1        3 -0.18705757
[178,]       1        3 -0.17479936
[179,]       1        3 -0.17337779
[180,]       1        3 -0.16006603
[181,]       1        3 -0.17396887
[182,]       1        3 -0.15737517
[183,]       1        3 -0.15713888
[184,]       1        3 -0.15061294
[185,]       1        3 -0.15114601
[186,]       1        3 -0.14334040
[187,]       1        3 -0.15174994
[188,]       1        3 -0.13682575
[189,]       1        3 -0.11943155
[190,]       1        3 -0.12804361
[191,]       1        3 -0.12600105
[192,]       1        3 -0.11055539
[193,]       1        3 -0.10846783
[194,]       1        3 -0.11425044
[195,]       1        3 -0.10825375
[196,]       1        3 -0.10930651
[197,]       1        3 -0.10075897
[198,]       1        3 -0.09693582
[199,]       1        3 -0.10323962
[200,]       1        3 -0.08957069
[201,]       1        3 -0.09601014
[202,]       1        3 -0.08052094
[203,]       1        3 -0.08067216
[204,]       1        3 -0.07464846
[205,]       1        3 -0.06896359
[206,]       1        3 -0.06397656
[207,]       1        3 -0.07727417
[208,]       1        3 -0.06740002
[209,]       1        3 -0.06426654
[210,]       1        3 -0.06426231
[211,]       1        3 -0.06410679
[212,]       1        3 -0.05547987
[213,]       1        3 -0.05743556
[214,]       1        3 -0.04844130
[215,]       1        3 -0.05907713
[216,]       1        3 -0.05528961
[217,]       1        3 -0.04699438
[218,]       1        3 -0.04829698
[219,]       1        3 -0.04032302
[220,]       1        3 -0.04916407
[221,]       1        3 -0.03647952
[222,]       1        3 -0.03629571
[223,]       1        3 -0.04734539
[224,]       1        3 -0.05034353
[225,]       1        3 -0.04483460
[226,]       1        3 -0.04311261
[227,]       1        3 -0.03803052
[228,]       1        3 -0.04663488
[229,]       1        3 -0.04245246
[230,]       1        3 -0.04022087
[231,]       1        3 -0.04185166
[232,]       1        3 -0.04558187
[233,]       1        3 -0.03621296
[234,]       1        3 -0.04713216
[235,]       1        3 -0.04275529
[236,]       1        3 -0.04908180
[237,]       1        3 -0.05148276
[238,]       1        3 -0.04308382
[239,]       1        3 -0.05080850
[240,]       1        3 -0.04831650
[241,]       1        3 -0.05801364
[242,]       1        3 -0.05305317
[243,]       1        3 -0.05352168
[244,]       1        3 -0.05535294
[245,]       1        3 -0.06209757
[246,]       1        3 -0.06251221
[247,]       1        3 -0.07248814
[248,]       1        3 -0.07229823
[249,]       1        3 -0.07390188
[250,]       1        3 -0.07502755
[251,]       1        3 -0.08103555
[252,]       1        3 -0.08020352
[253,]       1        3 -0.08482957
[254,]       1        3 -0.09114099
[255,]       1        3 -0.10093144
[256,]       1        3 -0.09954117
[257,]       1        3 -0.10221775
[258,]       2        3 -0.73559113
[259,]       2        3 -0.73283963
[260,]       2        3 -0.73343153
[261,]       2        3 -0.74080092
[262,]       2        3 -0.71399877
[263,]       2        3 -0.74274415
[264,]       2        3 -0.74193089
[265,]       2        3 -0.71868996
[266,]       2        3 -0.68038797
[267,]       2        3 -0.68392305
[268,]       2        3 -0.67924722
[269,]       2        3 -0.75271996
[270,]       2        3 -0.67406879
[271,]       2        3 -0.70048309
[272,]       2        3 -0.69136450
[273,]       2        3 -0.71247194
[274,]       2        3 -0.67869947
[275,]       2        3 -0.68863459
[276,]       2        3 -0.67707379
[277,]       2        3 -0.61445513
[278,]       2        3 -0.62136481
[279,]       2        3 -0.65965324
[280,]       2        3 -0.61031392
[281,]       2        3 -0.64321589
[282,]       2        3 -0.61929761
[283,]       2        3 -0.64014064
[284,]       2        3 -0.66922104
[285,]       2        3 -0.59071314
[286,]       2        3 -0.65030647
[287,]       2        3 -0.59661626
[288,]       2        3 -0.61243261
[289,]       2        3 -0.54118112
[290,]       2        3 -0.58724678
[291,]       2        3 -0.59992748
[292,]       2        3 -0.59440378
[293,]       2        3 -0.56721119
[294,]       2        3 -0.57327253
[295,]       2        3 -0.59918685
[296,]       2        3 -0.58180727
[297,]       2        3 -0.55156658
[298,]       2        3 -0.54211753
[299,]       2        3 -0.54973412
[300,]       2        3 -0.54774434
[301,]       2        3 -0.51469383
[302,]       2        3 -0.54261095
[303,]       2        3 -0.51365378
[304,]       2        3 -0.52556040
[305,]       2        3 -0.50934767
[306,]       2        3 -0.49799031
[307,]       2        3 -0.49365805
[308,]       2        3 -0.45788994
[309,]       2        3 -0.43600483
[310,]       2        3 -0.46339569
[311,]       2        3 -0.45354071
[312,]       2        3 -0.50058224
[313,]       2        3 -0.46576863
[314,]       2        3 -0.44356049
[315,]       2        3 -0.46462307
[316,]       2        3 -0.41755998
[317,]       2        3 -0.41287133
[318,]       2        3 -0.44965405
[319,]       2        3 -0.41057622
[320,]       2        3 -0.43447878
[321,]       2        3 -0.39435866
[322,]       2        3 -0.40996053
[323,]       2        3 -0.42422674
[324,]       2        3 -0.41185299
[325,]       2        3 -0.37360598
[326,]       2        3 -0.39295520
[327,]       2        3 -0.36368878
[328,]       2        3 -0.37081878
[329,]       2        3 -0.36508410
[330,]       2        3 -0.36229074
[331,]       2        3 -0.37864485
[332,]       2        3 -0.37591256
[333,]       2        3 -0.39270534
[334,]       2        3 -0.34017315
[335,]       2        3 -0.36117377
[336,]       2        3 -0.36172277
[337,]       2        3 -0.34004264
[338,]       2        3 -0.36970934
[339,]       2        3 -0.34187816
[340,]       2        3 -0.34690095
[341,]       2        3 -0.32847939
[342,]       2        3 -0.36239780
[343,]       2        3 -0.32808905
[344,]       2        3 -0.29781543
[345,]       2        3 -0.30969464
[346,]       2        3 -0.34145045
[347,]       2        3 -0.34598132
[348,]       2        3 -0.32573512
[349,]       2        3 -0.33149314
[350,]       2        3 -0.33033339
[351,]       2        3 -0.34025587
[352,]       2        3 -0.34390546
[353,]       2        3 -0.29578031
[354,]       2        3 -0.34014344
[355,]       2        3 -0.30713964
[356,]       2        3 -0.33254634
[357,]       2        3 -0.35921986
[358,]       2        3 -0.34283196
[359,]       2        3 -0.33054618
[360,]       2        3 -0.32297061
[361,]       2        3 -0.31937697
[362,]       2        3 -0.31965432
[363,]       2        3 -0.34926274
[364,]       2        3 -0.32943921
[365,]       2        3 -0.32513871
[366,]       2        3 -0.32806003
[367,]       2        3 -0.31596130
[368,]       2        3 -0.32392707
[369,]       2        3 -0.30144358
[370,]       2        3 -0.31866101
[371,]       2        3 -0.32000878
[372,]       2        3 -0.30925689
[373,]       2        3 -0.30371207
[374,]       2        3 -0.31095326
[375,]       2        3 -0.31491869
[376,]       2        3 -0.30745688
[377,]       2        3 -0.31948247
[378,]       2        3 -0.31749048
[379,]       2        3 -0.31232306
[380,]       2        3 -0.33588398
[381,]       2        3 -0.32550745
[382,]       2        3 -0.31891162
[383,]       2        3 -0.30578366
[384,]       2        3 -0.30859202
[385,]       2        3 -0.30840097
[386,]       2        3 -0.32306649
[387,]       2        3 -0.30675253
[388,]       2        3 -0.31005178
[389,]       2        3 -0.31212276
[390,]       2        3 -0.29319810
[391,]       2        3 -0.30535747
[392,]       2        3 -0.30118087
[393,]       2        3 -0.29899226
[394,]       2        3 -0.30925945
[395,]       2        3 -0.28394529
[396,]       2        3 -0.30368485
[397,]       2        3 -0.31030300
[398,]       2        3 -0.30062490
[399,]       2        3 -0.29686933
[400,]       2        3 -0.28569897
[401,]       2        3 -0.26984255
[402,]       2        3 -0.27310441
[403,]       2        3 -0.26640642
[404,]       2        3 -0.26744378
[405,]       2        3 -0.27415174
[406,]       2        3 -0.26665588
[407,]       2        3 -0.26279978
[408,]       2        3 -0.25947174
[409,]       2        3 -0.25899422
[410,]       2        3 -0.27030070
[411,]       2        3 -0.25057142
[412,]       2        3 -0.24590312
[413,]       2        3 -0.24628010
[414,]       2        3 -0.24205969
[415,]       2        3 -0.23904840
[416,]       2        3 -0.24828524
[417,]       2        3 -0.24367228
[418,]       2        3 -0.22858327
[419,]       2        3 -0.23547984
[420,]       2        3 -0.22790766
[421,]       2        3 -0.23860852
[422,]       2        3 -0.22232978
[423,]       2        3 -0.20504416
[424,]       2        3 -0.20955474
[425,]       2        3 -0.22155564
[426,]       2        3 -0.21116557
[427,]       2        3 -0.21128798
[428,]       2        3 -0.20242841
[429,]       2        3 -0.20977524
[430,]       2        3 -0.19522454
[431,]       2        3 -0.19684753
[432,]       2        3 -0.20428344
[433,]       2        3 -0.18815528
[434,]       2        3 -0.17993555
[435,]       2        3 -0.18713501
[436,]       2        3 -0.18428369
[437,]       2        3 -0.16216541
[438,]       2        3 -0.15698732
[439,]       2        3 -0.16160483
[440,]       2        3 -0.17093664
[441,]       2        3 -0.15367884
[442,]       2        3 -0.14867086
[443,]       2        3 -0.15859451
[444,]       2        3 -0.14100284
[445,]       2        3 -0.12151462
[446,]       2        3 -0.12875198
[447,]       2        3 -0.12112999
[448,]       2        3 -0.12855908
[449,]       2        3 -0.11963977
[450,]       2        3 -0.11105291
[451,]       2        3 -0.11835480
[452,]       2        3 -0.10585115
[453,]       2        3 -0.11011924
[454,]       2        3 -0.10042679
[455,]       2        3 -0.09549530
[456,]       2        3 -0.09121772
[457,]       2        3 -0.08580614
[458,]       2        3 -0.08114897
[459,]       2        3 -0.08891304
[460,]       2        3 -0.07377882
[461,]       2        3 -0.09940219
[462,]       2        3 -0.07070195
[463,]       2        3 -0.06662968
[464,]       2        3 -0.06635423
[465,]       2        3 -0.06802035
[466,]       2        3 -0.07211322
[467,]       2        3 -0.06128025
[468,]       2        3 -0.05201838
[469,]       2        3 -0.05764222
[470,]       2        3 -0.05358388
[471,]       2        3 -0.05356374
[472,]       2        3 -0.03952686
[473,]       2        3 -0.04822449
[474,]       2        3 -0.05016428
[475,]       2        3 -0.03999906
[476,]       2        3 -0.03506912
[477,]       2        3 -0.03589247
[478,]       2        3 -0.03395774
[479,]       2        3 -0.04363097
[480,]       2        3 -0.03924661
[481,]       2        3 -0.03319067
[482,]       2        3 -0.03647737
[483,]       2        3 -0.03391359
[484,]       2        3 -0.03899731
[485,]       2        3 -0.03602802
[486,]       2        3 -0.03447762
[487,]       2        3 -0.03139980
[488,]       2        3 -0.03741254
[489,]       2        3 -0.03854597
[490,]       2        3 -0.04051765
[491,]       2        3 -0.03632658
[492,]       2        3 -0.04397345
[493,]       2        3 -0.03859473
[494,]       2        3 -0.04120504
[495,]       2        3 -0.05027262
[496,]       2        3 -0.05579264
[497,]       2        3 -0.05122541
[498,]       2        3 -0.05470113
[499,]       2        3 -0.05169692
[500,]       2        3 -0.04972294
[501,]       2        3 -0.06232456
[502,]       2        3 -0.05876586
[503,]       2        3 -0.06341422
[504,]       2        3 -0.06695771
[505,]       2        3 -0.06431548
[506,]       2        3 -0.06880550
[507,]       2        3 -0.07385851
[508,]       2        3 -0.07634239
[509,]       2        3 -0.08119827
[510,]       2        3 -0.08492723
[511,]       2        3 -0.08673136
[512,]       2        3 -0.09083213
[513,]       2        3 -0.09878693
[514,]       2        3 -0.09814314
[515,]       2        3 -0.10051568
[516,]       3        1  0.95484736
[517,]       3        2  0.95943650
[518,]       3        2  0.95677155
[519,]       3        2  0.96334706
[520,]       3        2  0.92221663
[521,]       3        1  0.95719369
[522,]       3        2  0.96371862
[523,]       3        1  0.95350508
[524,]       3        2  0.94283150
[525,]       3        1  0.94011961
[526,]       3        2  0.95708002
[527,]       3        2  0.92673593
[528,]       3        2  0.96369171
[529,]       3        2  0.92948648
[530,]       3        2  0.96269231
[531,]       3        1  0.95036936
[532,]       3        2  0.95335729
[533,]       3        1  0.92529749
[534,]       3        1  0.94963056
[535,]       3        2  0.92662004
[536,]       3        2  0.96239751
[537,]       3        2  0.96363503
[538,]       3        1  0.94472139
[539,]       3        2  0.95669816
[540,]       3        1  0.92821148
[541,]       3        2  0.95157856
[542,]       3        1  0.94817631
[543,]       3        1  0.92761702
[544,]       3        1  0.95102583
[545,]       3        2  0.92561519
[546,]       3        2  0.96367811
[547,]       3        2  0.95151531
[548,]       3        1  0.95730376
[549,]       3        2  0.96372449
[550,]       3        2  0.95774423
[551,]       3        2  0.94332520
[552,]       3        2  0.94696361
[553,]       3        1  0.96124265
[554,]       3        2  0.94015663
[555,]       3        1  0.93456550
[556,]       3        1  0.95834897
[557,]       3        2  0.96319245
[558,]       3        2  0.92263133
[559,]       3        2  0.96138478
[560,]       3        1  0.95846241
[561,]       3        1  0.95536639
[562,]       3        2  0.94330242
[563,]       3        2  0.96236407
[564,]       3        2  0.96092180
[565,]       3        2  0.94146224
[566,]       3        1  0.95972728
[567,]       3        1  0.92816488
[568,]       3        1  0.93820392
[569,]       3        1  0.92750973
[570,]       3        2  0.94549175
[571,]       3        2  0.94018914
[572,]       3        1  0.95036088
[573,]       3        2  0.96194051
[574,]       3        1  0.95869850
[575,]       3        2  0.94866140
[576,]       3        1  0.93039319
[577,]       3        1  0.94845504
[578,]       3        2  0.96181588
[579,]       3        2  0.95671730
[580,]       3        2  0.95498010
[581,]       3        2  0.94284790
[582,]       3        2  0.96356580
[583,]       3        1  0.93752151
[584,]       3        2  0.96312330
[585,]       3        2  0.92592013
[586,]       3        2  0.96362961
[587,]       3        1  0.94035000
[588,]       3        2  0.96286962
[589,]       3        2  0.96230926
[590,]       3        2  0.95274171
[591,]       3        2  0.96341670
[592,]       3        1  0.94364856
[593,]       3        2  0.94701175
[594,]       3        2  0.94415715
[595,]       3        1  0.93159703
[596,]       3        1  0.96099269
[597,]       3        1  0.93560331
[598,]       3        2  0.93635594
[599,]       3        1  0.95014643
[600,]       3        1  0.93881258
[601,]       3        2  0.92738951
[602,]       3        1  0.93058913
[603,]       3        2  0.96342930
[604,]       3        2  0.94979909
[605,]       3        2  0.95232938
[606,]       3        2  0.92985242
[607,]       3        2  0.96340302
[608,]       3        2  0.93447486
[609,]       3        1  0.96219101
[610,]       3        1  0.93148924
[611,]       3        2  0.95824985
[612,]       3        2  0.94280414
[613,]       3        1  0.92596251
[614,]       3        2  0.96206163
[615,]       3        2  0.95791313
[616,]       3        2  0.92899060
[617,]       3        2  0.96151534
[618,]       3        2  0.92302696
[619,]       3        2  0.94148915
[620,]       3        2  0.95383727
[621,]       3        1  0.96157428
[622,]       3        2  0.96257401
[623,]       3        2  0.96364592
[624,]       3        1  0.94621712
[625,]       3        1  0.93695257
[626,]       3        2  0.96305487
[627,]       3        2  0.94066875
[628,]       3        2  0.92523859
[629,]       3        1  0.96052262
[630,]       3        2  0.96252835
[631,]       3        2  0.95428394
[632,]       3        1  0.95444672
[633,]       3        2  0.94546724
[634,]       3        2  0.95098267
[635,]       3        2  0.95914231
[636,]       3        1  0.95462229
[637,]       3        1  0.92820729
[638,]       3        1  0.93470097
[639,]       3        2  0.94332712
[640,]       3        2  0.95834101
[641,]       3        2  0.94313580
[642,]       3        2  0.93932342
[643,]       3        2  0.94944030
[644,]       3        1  0.95239913
[645,]       3        2  0.94527958
[646,]       3        2  0.94327482
[647,]       3        2  0.95075939
[648,]       3        1  0.95563124
[649,]       3        1  0.94362104
[650,]       3        1  0.92414306
[651,]       3        1  0.95808930
[652,]       3        2  0.93401870
[653,]       3        2  0.93005041
[654,]       3        1  0.92561233
[655,]       3        2  0.92428860
[656,]       3        2  0.96337897
[657,]       3        2  0.96334376
[658,]       3        1  0.94262068
[659,]       3        1  0.94938533
[660,]       3        1  0.96035054
[661,]       3        2  0.94161478
[662,]       3        2  0.94999323
[663,]       3        1  0.95285988
[664,]       3        2  0.95974249
[665,]       3        1  0.92773257
[666,]       3        1  0.94009672
[667,]       3        1  0.95226286
[668,]       3        1  0.95786537
[669,]       3        2  0.95627854
[670,]       3        1  0.94195646
[671,]       3        1  0.95098102
[672,]       3        1  0.95450452
[673,]       3        2  0.95913236
[674,]       3        2  0.96048372
[675,]       3        1  0.95524018
[676,]       3        1  0.95186962
[677,]       3        1  0.93909388
[678,]       3        1  0.95093024
[679,]       3        1  0.95816714
[680,]       3        2  0.93530115
[681,]       3        1  0.93182547
[682,]       3        2  0.95141347
[683,]       3        2  0.93195092
[684,]       3        1  0.93248272
[685,]       3        2  0.96255226
[686,]       3        1  0.96150463
[687,]       3        1  0.92812645
[688,]       3        2  0.95658239
[689,]       3        2  0.93091994
[690,]       3        2  0.96122430
[691,]       3        2  0.94774557
[692,]       3        2  0.92513642
[693,]       3        2  0.92979400
[694,]       3        1  0.94810006
[695,]       3        2  0.96366980
[696,]       3        1  0.93995853
[697,]       3        1  0.94147167
[698,]       3        2  0.94530532
[699,]       3        2  0.95957877
[700,]       3        2  0.95275030
[701,]       3        1  0.95240982
[702,]       3        2  0.96296468
[703,]       3        1  0.95560482
[704,]       3        2  0.95716981
[705,]       3        1  0.95044689
[706,]       3        2  0.93209238
[707,]       3        1  0.93289841
[708,]       3        2  0.94634132
[709,]       3        1  0.95824184
[710,]       3        2  0.95653764
[711,]       3        2  0.95433967
[712,]       3        2  0.94274482
[713,]       3        2  0.95186686
[714,]       3        2  0.94942153
[715,]       3        1  0.93650826
[716,]       3        2  0.94589073
[717,]       3        1  0.96278472
[718,]       3        1  0.94977660
[719,]       3        1  0.94633304
[720,]       3        1  0.93534629
[721,]       3        1  0.93486070
[722,]       3        1  0.95692804
[723,]       3        1  0.93518192
[724,]       3        2  0.94232096
[725,]       3        1  0.93256695
[726,]       3        2  0.96147777
[727,]       3        2  0.96362902
[728,]       3        2  0.94127484
[729,]       3        1  0.94501420
[730,]       3        2  0.95315366
[731,]       3        2  0.95836999
[732,]       3        2  0.96268697
[733,]       3        2  0.94646766
[734,]       3        1  0.95434454
[735,]       3        2  0.93507665
[736,]       3        2  0.96084025
[737,]       3        1  0.96170758
[738,]       3        2  0.93033860
[739,]       3        2  0.96323496
[740,]       3        2  0.95669650
[741,]       3        1  0.94049253
[742,]       3        2  0.95232486
[743,]       3        2  0.96209175
[744,]       3        1  0.95390360
[745,]       3        2  0.94664427
[746,]       3        1  0.96114700
[747,]       3        2  0.95926007
[748,]       3        2  0.94205206
[749,]       3        2  0.94698759
[750,]       3        2  0.95100320
[751,]       3        1  0.95814616
[752,]       3        1  0.94943723
[753,]       3        2  0.92638594
[754,]       3        2  0.94295106
[755,]       3        2  0.93719029
[756,]       3        1  0.95147089
[757,]       3        2  0.95025773
[758,]       3        2  0.96331206
[759,]       3        2  0.93218238
[760,]       3        1  0.95299664
[761,]       3        1  0.94984178
[762,]       3        1  0.96113535
[763,]       3        2  0.93416121
[764,]       3        1  0.96135702
[765,]       3        2  0.96116837
[766,]       3        1  0.92591464
[767,]       3        2  0.94581639
[768,]       3        2  0.96033110
[769,]       3        1  0.92749161
[770,]       3        1  0.93860733
[771,]       3        2  0.96343726
[772,]       3        2  0.96199120
[773,]       3        2  0.96363610
[774,]       3        2  0.95155871
[775,]       3        2  0.92623409
[776,]       3        2  0.96350015
[777,]       3        2  0.94130184
[778,]       3        1  0.94002516
[779,]       3        2  0.95177603
[780,]       3        2  0.95164259
[781,]       3        2  0.93996712
[782,]       3        1  0.94135251
[783,]       3        2  0.96289011
[784,]       3        2  0.94219157
[785,]       3        2  0.95571526
[786,]       3        1  0.95516006
[787,]       3        2  0.94291845
[788,]       3        2  0.93352067
[789,]       3        2  0.94390491
[790,]       3        1  0.93753633
[791,]       3        2  0.96059384
[792,]       3        2  0.96284955
[793,]       3        2  0.96345954
[794,]       3        2  0.94973459
[795,]       3        2  0.94134319
[796,]       3        1  0.93142987
[797,]       3        1  0.93357421
[798,]       3        1  0.94558147
[799,]       3        2  0.92688320
[800,]       3        2  0.93434223
[801,]       3        2  0.94326010
[802,]       3        2  0.94654601
[803,]       3        1  0.94967496
[804,]       3        2  0.94883458
[805,]       3        2  0.94289931
[806,]       3        2  0.96139294
[807,]       3        1  0.92604004
[808,]       3        2  0.94654201
[809,]       3        1  0.95419724
[810,]       3        2  0.96227033
[811,]       3        2  0.93329896
[812,]       3        2  0.93059918
[813,]       3        1  0.93174750
[814,]       3        2  0.94276932
[815,]       3        2  0.96324600
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = single_clusters_two_s, dist = dist(two_spirals_sphere_scaled))
attr(,"class")
[1] "silhouette"
avg_two_s_single <- mean(two_s_single_sils[, "sil_width"])

(two_s_complete_sils <- silhouette(
  x   = complete_clusters_two_s,
  dist = dist(two_spirals_sphere_scaled)
))
       cluster neighbor     sil_width
  [1,]       1        3  0.2755327003
  [2,]       1        3  0.2862591581
  [3,]       1        3  0.2653284905
  [4,]       1        3  0.2900805373
  [5,]       1        3  0.2342937151
  [6,]       1        3  0.2357931253
  [7,]       1        3  0.2409674033
  [8,]       1        3  0.1980173154
  [9,]       1        3  0.2520095059
 [10,]       1        2  0.2590912382
 [11,]       1        3  0.2095956308
 [12,]       1        3  0.1570254484
 [13,]       1        2  0.1365947957
 [14,]       1        2  0.2118265717
 [15,]       1        2  0.2195840405
 [16,]       1        2  0.2138148158
 [17,]       1        2  0.2268824845
 [18,]       1        2  0.0516722006
 [19,]       1        2  0.1959073527
 [20,]       1        2  0.0816485522
 [21,]       1        2  0.1053477759
 [22,]       1        2  0.1146564450
 [23,]       1        2  0.0224971146
 [24,]       1        2 -0.0623618826
 [25,]       1        2 -0.0103724737
 [26,]       1        2  0.0101588486
 [27,]       1        2 -0.0608326387
 [28,]       1        2 -0.0776068612
 [29,]       1        2 -0.0354349353
 [30,]       2        1  0.0544005707
 [31,]       1        2 -0.0523378995
 [32,]       2        1  0.0755660948
 [33,]       2        1  0.1249048886
 [34,]       2        1  0.0194722973
 [35,]       2        1  0.0632941236
 [36,]       2        1  0.0461455404
 [37,]       2        1  0.1691205409
 [38,]       2        1  0.0499315562
 [39,]       2        1  0.1727804458
 [40,]       2        1  0.1232010972
 [41,]       2        1  0.1485436075
 [42,]       2        1  0.1877552944
 [43,]       2        1 -0.0278594350
 [44,]       2        1  0.0929224210
 [45,]       2        1  0.0615964915
 [46,]       2        1  0.0614336223
 [47,]       2        1  0.0012166020
 [48,]       2        1 -0.0811861372
 [49,]       2        1 -0.0981378288
 [50,]       2        1  0.0135883050
 [51,]       2        1 -0.0070373551
 [52,]       2        1 -0.0357038304
 [53,]       2        1 -0.0685092613
 [54,]       1        2  0.2057922831
 [55,]       1        2  0.1527038352
 [56,]       1        2  0.1492890868
 [57,]       1        2  0.1788846570
 [58,]       1        2  0.2524452624
 [59,]       1        2  0.2472222515
 [60,]       1        2  0.2517086076
 [61,]       1        2  0.2593686395
 [62,]       1        2  0.2776382409
 [63,]       1        2  0.3542729663
 [64,]       1        2  0.3453059857
 [65,]       1        2  0.3680823973
 [66,]       1        2  0.3571016746
 [67,]       1        2  0.3676782342
 [68,]       1        2  0.3707448167
 [69,]       1        2  0.3892895014
 [70,]       1        2  0.4178256487
 [71,]       1        2  0.4292424989
 [72,]       1        2  0.4374813645
 [73,]       1        2  0.4382126220
 [74,]       1        2  0.4690981580
 [75,]       1        2  0.4623639155
 [76,]       1        2  0.4795427346
 [77,]       1        2  0.4729013729
 [78,]       1        2  0.4943911033
 [79,]       1        2  0.4825458122
 [80,]       1        2  0.5108032995
 [81,]       1        2  0.5048178481
 [82,]       1        2  0.5115857791
 [83,]       1        2  0.5179960200
 [84,]       1        2  0.5179664284
 [85,]       1        2  0.5245748940
 [86,]       1        2  0.5154312587
 [87,]       1        2  0.5275361077
 [88,]       1        2  0.5233667749
 [89,]       1        3  0.5205351721
 [90,]       1        3  0.5114624327
 [91,]       1        3  0.5214003190
 [92,]       1        3  0.4942504828
 [93,]       1        3  0.4866456707
 [94,]       1        3  0.4804379345
 [95,]       1        3  0.4711497023
 [96,]       1        3  0.4518377365
 [97,]       1        3  0.4716172792
 [98,]       1        3  0.4620075823
 [99,]       1        3  0.4336399999
[100,]       1        3  0.4397122617
[101,]       1        3  0.4061075244
[102,]       1        3  0.3864706818
[103,]       1        3  0.3865693694
[104,]       1        3  0.3655178859
[105,]       1        3  0.3286612684
[106,]       1        3  0.3587599913
[107,]       1        3  0.3089537877
[108,]       1        3  0.2890440779
[109,]       1        3  0.2662941207
[110,]       1        3  0.2414066541
[111,]       1        3  0.2408768469
[112,]       1        3  0.1517547377
[113,]       1        3  0.1763803421
[114,]       1        3  0.1412172784
[115,]       1        3  0.0505031329
[116,]       1        3  0.0523606010
[117,]       1        3  0.0287004669
[118,]       1        3 -0.0004598979
[119,]       1        3 -0.0410748479
[120,]       1        3 -0.0674411364
[121,]       1        3 -0.0912274613
[122,]       3        1  0.1626570356
[123,]       3        1  0.1833011965
[124,]       3        1  0.1998111197
[125,]       3        1  0.2377290486
[126,]       3        1  0.2879163977
[127,]       3        1  0.2541253572
[128,]       3        1  0.3264251784
[129,]       3        1  0.3481038282
[130,]       3        1  0.3665400793
[131,]       3        1  0.3551657912
[132,]       3        1  0.4019295157
[133,]       3        1  0.4057108367
[134,]       3        1  0.4247310377
[135,]       3        1  0.4404107195
[136,]       3        1  0.4282499087
[137,]       3        1  0.4690291717
[138,]       3        1  0.4731113206
[139,]       3        1  0.4911795182
[140,]       3        1  0.4879083549
[141,]       3        1  0.5028777120
[142,]       3        1  0.5112792776
[143,]       3        1  0.5026660836
[144,]       3        1  0.5046526359
[145,]       3        1  0.5143589035
[146,]       3        1  0.5103438794
[147,]       3        1  0.5103851135
[148,]       3        2  0.4994461461
[149,]       3        2  0.4934454827
[150,]       3        2  0.4643902104
[151,]       3        2  0.4487290015
[152,]       3        2  0.4492247824
[153,]       3        2  0.4185222327
[154,]       3        2  0.3653077821
[155,]       3        2  0.3292846338
[156,]       3        2  0.2990600306
[157,]       3        2  0.2660776726
[158,]       3        2  0.2387274444
[159,]       3        2  0.1777436806
[160,]       3        2  0.1984154956
[161,]       3        2  0.0807348990
[162,]       3        2  0.0044427524
[163,]       3        2  0.0002295360
[164,]       3        2 -0.1230494468
[165,]       3        2 -0.1424801195
[166,]       3        2 -0.2331300220
[167,]       3        2 -0.2365841904
[168,]       2        3  0.3268714533
[169,]       2        3  0.3622983505
[170,]       2        3  0.4081519748
[171,]       2        3  0.4142152549
[172,]       2        3  0.4676003702
[173,]       2        3  0.4946991065
[174,]       2        3  0.5000211224
[175,]       2        3  0.5492794788
[176,]       2        3  0.5750932933
[177,]       2        3  0.5814343433
[178,]       2        1  0.6034600944
[179,]       2        1  0.6052399320
[180,]       2        1  0.6055473895
[181,]       2        1  0.6045776054
[182,]       2        1  0.6001988308
[183,]       2        1  0.5971587699
[184,]       2        1  0.5904735128
[185,]       2        1  0.5768486364
[186,]       2        1  0.5740780224
[187,]       2        1  0.5494500323
[188,]       2        1  0.5152186735
[189,]       2        1  0.5136805624
[190,]       2        1  0.5142962783
[191,]       2        1  0.4881145147
[192,]       2        1  0.4558928092
[193,]       2        1  0.4259200148
[194,]       2        1  0.4222651339
[195,]       1        2 -0.3742233625
[196,]       1        2 -0.3669884397
[197,]       1        2 -0.3356317192
[198,]       1        2 -0.2961134642
[199,]       1        2 -0.2348504805
[200,]       1        2 -0.2137737261
[201,]       1        2 -0.2149160197
[202,]       1        2 -0.1554518288
[203,]       1        2 -0.1533959154
[204,]       1        2 -0.1062794340
[205,]       1        2 -0.0690004382
[206,]       1        2 -0.0477446470
[207,]       1        2 -0.0353950959
[208,]       1        2  0.0189449382
[209,]       1        2  0.0355609568
[210,]       1        2  0.0657582472
[211,]       1        2  0.0900982939
[212,]       1        2  0.1289170895
[213,]       1        2  0.1478964570
[214,]       1        2  0.1594188422
[215,]       1        2  0.1842807946
[216,]       1        2  0.2144637140
[217,]       1        2  0.2186131637
[218,]       1        2  0.2487148277
[219,]       1        2  0.2481057785
[220,]       1        2  0.2699379986
[221,]       1        2  0.2627717263
[222,]       1        2  0.2837371732
[223,]       1        2  0.3043408675
[224,]       1        2  0.3367893974
[225,]       1        2  0.3349231262
[226,]       1        2  0.3433740429
[227,]       1        2  0.3439055508
[228,]       1        2  0.3529893063
[229,]       1        2  0.3652536017
[230,]       1        2  0.3693961451
[231,]       1        2  0.3742528714
[232,]       1        2  0.3877906679
[233,]       1        2  0.3825934379
[234,]       1        2  0.3976984862
[235,]       1        2  0.3971651273
[236,]       1        2  0.4055509305
[237,]       1        3  0.4019143002
[238,]       1        3  0.3844068878
[239,]       1        3  0.3845979286
[240,]       1        3  0.3734822867
[241,]       1        3  0.3747859578
[242,]       1        3  0.3562358711
[243,]       1        3  0.3454781081
[244,]       1        3  0.3387779766
[245,]       1        3  0.3336498316
[246,]       1        3  0.3148801895
[247,]       1        3  0.3061007663
[248,]       1        3  0.3050331193
[249,]       1        3  0.2780082227
[250,]       1        3  0.2714357943
[251,]       1        3  0.2544005124
[252,]       1        3  0.2282174215
[253,]       1        3  0.2298526337
[254,]       1        3  0.1932745758
[255,]       1        3  0.1900233662
[256,]       1        3  0.1767708013
[257,]       1        3  0.1489025704
[258,]       1        2  0.4781249719
[259,]       1        2  0.5040401684
[260,]       1        2  0.5197986378
[261,]       1        2  0.5525532025
[262,]       1        2  0.5265415447
[263,]       1        2  0.5583101288
[264,]       1        2  0.5492064776
[265,]       1        2  0.5508771137
[266,]       1        2  0.5614746125
[267,]       1        2  0.5695849028
[268,]       1        2  0.5619457850
[269,]       1        2  0.5740108838
[270,]       1        2  0.5750654774
[271,]       1        2  0.5764248409
[272,]       1        2  0.5742981533
[273,]       1        2  0.5777844393
[274,]       1        2  0.5726737417
[275,]       1        3  0.5757069859
[276,]       1        3  0.5719887929
[277,]       1        3  0.5460865254
[278,]       1        3  0.5379260080
[279,]       1        3  0.5599893576
[280,]       1        3  0.5378163327
[281,]       1        3  0.5457234597
[282,]       1        3  0.5195008937
[283,]       1        3  0.5262899051
[284,]       1        3  0.5076887868
[285,]       1        3  0.4782253620
[286,]       1        3  0.4901802875
[287,]       1        3  0.4770461355
[288,]       1        3  0.4890929284
[289,]       1        3  0.4546544116
[290,]       1        3  0.4674361699
[291,]       1        3  0.4697280544
[292,]       1        3  0.4643332951
[293,]       1        3  0.4056297345
[294,]       1        3  0.3943125690
[295,]       1        3  0.4024972144
[296,]       1        3  0.3587160368
[297,]       1        3  0.3793893770
[298,]       1        3  0.3407588140
[299,]       1        3  0.3212312048
[300,]       1        3  0.3120546361
[301,]       1        3  0.2632407672
[302,]       1        3  0.2919462803
[303,]       1        3  0.2156127212
[304,]       1        3  0.2325430290
[305,]       1        3  0.1873916206
[306,]       1        3  0.1619378302
[307,]       1        3  0.1010847864
[308,]       1        3  0.0610556891
[309,]       3        1  0.0533808886
[310,]       3        1 -0.0224733157
[311,]       3        1  0.0226467184
[312,]       3        1 -0.0537524983
[313,]       3        1  0.0389076058
[314,]       3        1  0.0743061188
[315,]       3        1  0.0451109978
[316,]       3        1  0.1475739229
[317,]       3        1  0.1883387722
[318,]       3        1  0.1415734989
[319,]       3        1  0.1956987813
[320,]       3        1  0.1864427130
[321,]       3        1  0.2469141831
[322,]       3        1  0.2439417660
[323,]       3        1  0.2318862755
[324,]       3        1  0.2617446660
[325,]       3        1  0.3138125756
[326,]       3        1  0.2984266467
[327,]       3        1  0.3307226052
[328,]       3        1  0.3254241586
[329,]       3        1  0.3344733886
[330,]       3        1  0.3378772763
[331,]       3        1  0.3165168058
[332,]       3        1  0.3187359771
[333,]       3        1  0.2855430561
[334,]       3        1  0.3588020867
[335,]       3        1  0.3272240980
[336,]       3        1  0.3119178439
[337,]       3        1  0.3335524758
[338,]       3        1  0.2947823501
[339,]       3        2  0.2372855574
[340,]       3        2  0.2128461279
[341,]       3        2  0.2538188818
[342,]       3        2  0.1309685178
[343,]       3        2  0.1974332844
[344,]       3        2  0.0353980514
[345,]       3        2  0.0487034778
[346,]       3        2  0.0119311629
[347,]       3        2  0.0245639370
[348,]       3        2 -0.0364123632
[349,]       3        2 -0.1430797935
[350,]       3        2 -0.1495244372
[351,]       3        2 -0.2460574911
[352,]       3        2 -0.3529192971
[353,]       3        2 -0.3449130740
[354,]       3        2 -0.3082338745
[355,]       3        2 -0.3790099642
[356,]       2        1  0.4382026623
[357,]       2        1  0.4282010148
[358,]       2        1  0.4577383887
[359,]       2        1  0.4762184787
[360,]       2        1  0.5057901946
[361,]       2        1  0.5154630352
[362,]       2        1  0.5218919371
[363,]       2        1  0.4936971456
[364,]       2        1  0.5145497374
[365,]       2        1  0.5230928059
[366,]       2        1  0.5185561882
[367,]       2        1  0.5278573112
[368,]       2        1  0.5102252120
[369,]       2        1  0.5185955570
[370,]       2        1  0.4919210813
[371,]       2        1  0.4831646091
[372,]       2        1  0.4848917849
[373,]       2        1  0.4667745725
[374,]       2        1  0.4543850359
[375,]       2        1  0.4101695506
[376,]       2        1  0.3816423028
[377,]       2        1  0.3660913454
[378,]       2        1  0.3702368422
[379,]       1        2 -0.3173739972
[380,]       1        2 -0.2349678064
[381,]       1        2 -0.2646757334
[382,]       1        2 -0.2405139964
[383,]       1        2 -0.2246728907
[384,]       1        2 -0.1717989393
[385,]       1        2 -0.1587858258
[386,]       1        2 -0.0794025987
[387,]       1        2 -0.0685073790
[388,]       1        2 -0.0491641088
[389,]       1        2  0.0132096977
[390,]       1        2  0.0361129357
[391,]       1        2  0.0843096478
[392,]       1        2  0.0605260968
[393,]       1        2  0.1367717592
[394,]       1        2  0.1561036265
[395,]       1        2  0.1581346328
[396,]       1        2  0.2073311126
[397,]       1        2  0.2135406939
[398,]       1        2  0.2525700449
[399,]       1        2  0.2743735696
[400,]       1        2  0.2907399462
[401,]       1        2  0.2890016080
[402,]       1        2  0.3248417913
[403,]       1        2  0.3326386506
[404,]       1        2  0.3386476368
[405,]       1        2  0.3611980541
[406,]       1        2  0.3782093367
[407,]       1        2  0.3792837092
[408,]       1        2  0.3782228234
[409,]       1        2  0.3958796725
[410,]       1        2  0.4150292692
[411,]       1        2  0.4092259875
[412,]       1        2  0.4174941084
[413,]       1        2  0.4254876996
[414,]       1        2  0.4383452396
[415,]       1        2  0.4500348734
[416,]       1        2  0.4513004771
[417,]       1        2  0.4471015183
[418,]       1        2  0.4524699696
[419,]       1        2  0.4633240239
[420,]       1        2  0.4633959723
[421,]       1        3  0.4650379272
[422,]       1        3  0.4487055624
[423,]       1        3  0.4329441458
[424,]       1        3  0.4300171077
[425,]       1        3  0.4320817231
[426,]       1        3  0.4261511744
[427,]       1        3  0.4192400624
[428,]       1        3  0.4005207294
[429,]       1        3  0.4034404198
[430,]       1        3  0.3838109326
[431,]       1        3  0.3694865815
[432,]       1        3  0.3583631353
[433,]       1        3  0.3392238269
[434,]       1        3  0.3205583304
[435,]       1        3  0.3150153476
[436,]       1        3  0.3016360011
[437,]       1        3  0.2474684687
[438,]       1        3  0.2226890936
[439,]       1        3  0.2296416787
[440,]       1        3  0.2218185262
[441,]       1        3  0.1862201914
[442,]       1        3  0.1485766265
[443,]       1        3  0.1514986436
[444,]       1        3  0.0834171049
[445,]       3        1 -0.0402862789
[446,]       3        1 -0.0234051331
[447,]       3        1 -0.0156984203
[448,]       3        1  0.0258938930
[449,]       3        1  0.0544212432
[450,]       3        1  0.0958926996
[451,]       3        1  0.1111302563
[452,]       3        1  0.1421497562
[453,]       3        1  0.1807612018
[454,]       3        1  0.2040454565
[455,]       3        1  0.2328956331
[456,]       3        1  0.2368270508
[457,]       3        1  0.2786960210
[458,]       3        1  0.3024250571
[459,]       3        1  0.3397581307
[460,]       3        1  0.3484891839
[461,]       3        1  0.3416718802
[462,]       3        1  0.3859183717
[463,]       3        1  0.4009979956
[464,]       3        1  0.4316150577
[465,]       3        1  0.4291435263
[466,]       3        1  0.4454908865
[467,]       3        1  0.4542991449
[468,]       3        1  0.4593463109
[469,]       3        1  0.4772205898
[470,]       3        1  0.4797764319
[471,]       3        1  0.4916963515
[472,]       3        1  0.4842374095
[473,]       3        1  0.5027339487
[474,]       3        1  0.5102540526
[475,]       3        1  0.5051854544
[476,]       3        1  0.5045339868
[477,]       3        1  0.5083494746
[478,]       3        2  0.5065946595
[479,]       3        2  0.5085901598
[480,]       3        2  0.4781797394
[481,]       3        2  0.4742197863
[482,]       3        2  0.4466184514
[483,]       3        2  0.4206697797
[484,]       3        2  0.4117627569
[485,]       3        2  0.3707998971
[486,]       3        2  0.3534156003
[487,]       3        2  0.3460023591
[488,]       3        2  0.3010015588
[489,]       3        2  0.2738339179
[490,]       3        2  0.2208074639
[491,]       3        2  0.1951369663
[492,]       3        2  0.1454076317
[493,]       3        2  0.0985241238
[494,]       3        2  0.0345066565
[495,]       3        2 -0.0223060569
[496,]       3        2 -0.0978624333
[497,]       3        2 -0.0979990869
[498,]       2        3  0.1683260147
[499,]       2        3  0.2090035365
[500,]       2        3  0.2598959969
[501,]       2        3  0.3193277959
[502,]       2        3  0.3485749613
[503,]       2        3  0.3744721623
[504,]       2        3  0.3882309963
[505,]       2        3  0.4293383996
[506,]       2        3  0.4520011773
[507,]       2        3  0.4810640626
[508,]       2        3  0.5060186678
[509,]       2        3  0.5256270829
[510,]       2        3  0.5350771539
[511,]       2        3  0.5447224425
[512,]       2        3  0.5534813224
[513,]       2        1  0.5582702628
[514,]       2        1  0.5522556531
[515,]       2        1  0.5430789727
[516,]       1        2  0.5595140096
[517,]       1        2  0.5723133047
[518,]       1        2  0.5689410509
[519,]       1        2  0.5628544957
[520,]       1        2  0.5062525558
[521,]       1        2  0.5512071963
[522,]       1        2  0.5660433667
[523,]       1        2  0.5530465740
[524,]       1        2  0.5300723761
[525,]       1        2  0.5387705775
[526,]       1        2  0.5698275273
[527,]       1        2  0.5165385724
[528,]       1        2  0.5654271711
[529,]       1        3  0.5349255829
[530,]       1        2  0.5630629572
[531,]       1        2  0.5602868316
[532,]       1        2  0.5606649208
[533,]       1        2  0.5079783809
[534,]       1        2  0.5518522543
[535,]       1        2  0.5212629532
[536,]       1        2  0.5612293351
[537,]       1        2  0.5649232837
[538,]       1        2  0.5340973932
[539,]       1        2  0.5574381525
[540,]       1        2  0.5110227399
[541,]       1        2  0.5571053174
[542,]       1        2  0.5691566216
[543,]       1        2  0.5717880077
[544,]       1        2  0.5416434878
[545,]       1        3  0.5559812165
[546,]       1        2  0.5651557291
[547,]       1        2  0.5486786611
[548,]       1        2  0.5498044578
[549,]       1        2  0.5651011135
[550,]       1        2  0.5657498324
[551,]       1        2  0.5798158233
[552,]       1        3  0.5597990469
[553,]       1        2  0.5578658110
[554,]       1        2  0.5395970207
[555,]       1        2  0.5740465115
[556,]       1        2  0.5716691604
[557,]       1        2  0.5628817539
[558,]       1        3  0.5483350855
[559,]       1        2  0.5707409243
[560,]       1        2  0.5697342010
[561,]       1        2  0.5467272731
[562,]       1        3  0.5543829843
[563,]       1        2  0.5688271841
[564,]       1        2  0.5701610816
[565,]       1        3  0.5699601797
[566,]       1        2  0.5544581549
[567,]       1        2  0.5611391050
[568,]       1        2  0.5514913940
[569,]       1        2  0.5766922963
[570,]       1        2  0.5333703162
[571,]       1        2  0.5793710893
[572,]       1        2  0.5574827012
[573,]       1        2  0.5585818660
[574,]       1        2  0.5613972705
[575,]       1        2  0.5763273582
[576,]       1        2  0.5363245901
[577,]       1        2  0.5484713870
[578,]       1        2  0.5696875170
[579,]       1        2  0.5492816067
[580,]       1        2  0.5481463250
[581,]       1        3  0.5701835050
[582,]       1        2  0.5652295245
[583,]       1        2  0.5771756907
[584,]       1        2  0.5625610211
[585,]       1        2  0.5815220275
[586,]       1        2  0.5642164569
[587,]       1        2  0.5655773706
[588,]       1        2  0.5620107841
[589,]       1        2  0.5698388756
[590,]       1        2  0.5769928817
[591,]       1        2  0.5674561085
[592,]       1        2  0.5678702468
[593,]       1        2  0.5481185093
[594,]       1        3  0.5693272527
[595,]       1        2  0.5582737789
[596,]       1        2  0.5565736895
[597,]       1        2  0.5708222727
[598,]       1        3  0.5681314867
[599,]       1        2  0.5402126153
[600,]       1        2  0.5777733966
[601,]       1        3  0.5507385202
[602,]       1        2  0.5764524658
[603,]       1        2  0.5660067756
[604,]       1        2  0.5436758735
[605,]       1        2  0.5563701367
[606,]       1        2  0.5181209234
[607,]       1        2  0.5678467891
[608,]       1        3  0.5718845946
[609,]       1        2  0.5617689683
[610,]       1        2  0.5745746350
[611,]       1        2  0.5740803316
[612,]       1        2  0.5801898744
[613,]       1        2  0.5198064894
[614,]       1        2  0.5664517040
[615,]       1        2  0.5556948568
[616,]       1        3  0.5373174224
[617,]       1        2  0.5678802982
[618,]       1        3  0.5395788815
[619,]       1        3  0.5495310707
[620,]       1        2  0.5703635644
[621,]       1        2  0.5581014464
[622,]       1        2  0.5695503800
[623,]       1        2  0.5661784561
[624,]       1        2  0.5581896262
[625,]       1        2  0.5288867912
[626,]       1        2  0.5639660419
[627,]       1        2  0.5806295640
[628,]       1        3  0.5624693876
[629,]       1        2  0.5577340153
[630,]       1        2  0.5634999498
[631,]       1        2  0.5743409798
[632,]       1        2  0.5599909625
[633,]       1        3  0.5704127051
[634,]       1        2  0.5647502786
[635,]       1        2  0.5537465041
[636,]       1        2  0.5604361256
[637,]       1        2  0.5315359945
[638,]       1        2  0.5737220087
[639,]       1        2  0.5800328196
[640,]       1        2  0.5561980755
[641,]       1        2  0.5497970254
[642,]       1        2  0.5797803013
[643,]       1        2  0.5573730764
[644,]       1        2  0.5728490389
[645,]       1        2  0.5527732475
[646,]       1        3  0.5663520532
[647,]       1        2  0.5710931703
[648,]       1        2  0.5688810751
[649,]       1        2  0.5341161004
[650,]       1        2  0.5250764179
[651,]       1        2  0.5579650883
[652,]       1        2  0.5191313868
[653,]       1        3  0.5352310215
[654,]       1        2  0.5531430682
[655,]       1        2  0.5211197035
[656,]       1        2  0.5633640790
[657,]       1        2  0.5638634063
[658,]       1        2  0.5341632034
[659,]       1        2  0.5591504884
[660,]       1        2  0.5551635689
[661,]       1        2  0.5418790707
[662,]       1        2  0.5407208347
[663,]       1        2  0.5528354334
[664,]       1        2  0.5727117075
[665,]       1        2  0.5444203272
[666,]       1        2  0.5636771992
[667,]       1        2  0.5682538691
[668,]       1        2  0.5540867866
[669,]       1        2  0.5496108440
[670,]       1        2  0.5615173692
[671,]       1        2  0.5676710380
[672,]       1        2  0.5598152992
[673,]       1        2  0.5709693959
[674,]       1        2  0.5557214887
[675,]       1        2  0.5545598615
[676,]       1        2  0.5684405101
[677,]       1        2  0.5491646709
[678,]       1        2  0.5431509637
[679,]       1        2  0.5525084839
[680,]       1        3  0.5772102953
[681,]       1        2  0.5157175348
[682,]       1        2  0.5515097255
[683,]       1        2  0.5187534659
[684,]       1        2  0.5723210231
[685,]       1        2  0.5600644278
[686,]       1        2  0.5646329869
[687,]       1        2  0.5110764404
[688,]       1        2  0.5654159227
[689,]       1        2  0.5818511829
[690,]       1        2  0.5603133946
[691,]       1        3  0.5712757212
[692,]       1        3  0.5316195127
[693,]       1        3  0.5348949742
[694,]       1        2  0.5650298699
[695,]       1        2  0.5662812865
[696,]       1        2  0.5546553251
[697,]       1        2  0.5649030913
[698,]       1        2  0.5776451155
[699,]       1        2  0.5732752343
[700,]       1        2  0.5766655163
[701,]       1        2  0.5451791261
[702,]       1        2  0.5615998872
[703,]       1        2  0.5544965188
[704,]       1        2  0.5625702592
[705,]       1        2  0.5743503629
[706,]       1        3  0.5454525346
[707,]       1        2  0.5645009366
[708,]       1        2  0.5787218430
[709,]       1        2  0.5516504994
[710,]       1        2  0.5674353296
[711,]       1        2  0.5499070568
[712,]       1        2  0.5339056826
[713,]       1        2  0.5772527350
[714,]       1        2  0.5401264656
[715,]       1        2  0.5668323172
[716,]       1        3  0.5716909294
[717,]       1        2  0.5653407106
[718,]       1        2  0.5547934480
[719,]       1        2  0.5756782482
[720,]       1        2  0.5764257200
[721,]       1        2  0.5769075978
[722,]       1        2  0.5524744947
[723,]       1        2  0.5511851977
[724,]       1        3  0.5655982088
[725,]       1        2  0.5290152250
[726,]       1        2  0.5712239858
[727,]       1        2  0.5654456976
[728,]       1        3  0.5522046381
[729,]       1        2  0.5754584900
[730,]       1        2  0.5467802705
[731,]       1        2  0.5740215157
[732,]       1        2  0.5694150970
[733,]       1        2  0.5534549042
[734,]       1        2  0.5616626517
[735,]       1        2  0.5809708981
[736,]       1        2  0.5670641136
[737,]       1        2  0.5607227517
[738,]       1        2  0.5820985361
[739,]       1        2  0.5648400282
[740,]       1        2  0.5543345909
[741,]       1        2  0.5267126028
[742,]       1        2  0.5517616281
[743,]       1        2  0.5619063764
[744,]       1        2  0.5475726491
[745,]       1        2  0.5764102519
[746,]       1        2  0.5607088915
[747,]       1        2  0.5731512910
[748,]       1        2  0.5367225177
[749,]       1        2  0.5788282513
[750,]       1        2  0.5779013576
[751,]       1        2  0.5723400339
[752,]       1        2  0.5660531385
[753,]       1        2  0.5159640830
[754,]       1        2  0.5438640217
[755,]       1        2  0.5812181994
[756,]       1        2  0.5428691061
[757,]       1        2  0.5750528627
[758,]       1        2  0.5660099586
[759,]       1        2  0.5253777454
[760,]       1        2  0.5643888216
[761,]       1        2  0.5397117126
[762,]       1        2  0.5650051826
[763,]       1        3  0.5463042847
[764,]       1        2  0.5612540407
[765,]       1        2  0.5690943996
[766,]       1        2  0.5607816538
[767,]       1        2  0.5443108585
[768,]       1        2  0.5553825289
[769,]       1        2  0.5370032383
[770,]       1        2  0.5618143138
[771,]       1        2  0.5673916873
[772,]       1        2  0.5661815539
[773,]       1        2  0.5657596438
[774,]       1        2  0.5466154541
[775,]       1        2  0.5824326373
[776,]       1        2  0.5663591306
[777,]       1        2  0.5803724449
[778,]       1        2  0.5287054700
[779,]       1        2  0.5416574758
[780,]       1        2  0.5765831118
[781,]       1        2  0.5792832480
[782,]       1        2  0.5288829602
[783,]       1        2  0.5675969217
[784,]       1        3  0.5553994738
[785,]       1        2  0.5666648484
[786,]       1        2  0.5706027191
[787,]       1        2  0.5411251889
[788,]       1        3  0.5626330185
[789,]       1        2  0.5486992855
[790,]       1        2  0.5267873987
[791,]       1        2  0.5686966376
[792,]       1        2  0.5611703865
[793,]       1        2  0.5667945346
[794,]       1        3  0.5681221132
[795,]       1        3  0.5514232949
[796,]       1        2  0.5328775150
[797,]       1        2  0.5358571316
[798,]       1        2  0.5361460290
[799,]       1        2  0.5307893323
[800,]       1        3  0.5668948876
[801,]       1        2  0.5389595467
[802,]       1        2  0.5382617052
[803,]       1        2  0.5734901745
[804,]       1        2  0.5777764654
[805,]       1        3  0.5609250078
[806,]       1        2  0.5607872365
[807,]       1        2  0.5093828431
[808,]       1        2  0.5378488975
[809,]       1        2  0.5516679422
[810,]       1        2  0.5691219761
[811,]       1        2  0.5370741509
[812,]       1        2  0.5818280387
[813,]       1        2  0.5154030030
[814,]       1        2  0.5434536731
[815,]       1        2  0.5680061262
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = complete_clusters_two_s, dist = dist(two_spirals_sphere_scaled))
attr(,"class")
[1] "silhouette"
avg_two_s_complete <- mean(two_s_complete_sils[, "sil_width"])


(two_s_average_sils <- silhouette(
  x   = average_clusters_two_s,
  dist = dist(two_spirals_sphere_scaled)
))
       cluster neighbor     sil_width
  [1,]       1        3  0.5565233281
  [2,]       1        3  0.5366572720
  [3,]       1        3  0.5423671375
  [4,]       1        3  0.5328909065
  [5,]       1        3  0.5075002418
  [6,]       1        3  0.5009113641
  [7,]       1        3  0.4820160930
  [8,]       1        3  0.4622125926
  [9,]       1        3  0.5174802566
 [10,]       1        3  0.4802274923
 [11,]       1        3  0.4765582053
 [12,]       1        3  0.4069210999
 [13,]       1        3  0.3909729008
 [14,]       1        3  0.4587653606
 [15,]       1        3  0.4525723285
 [16,]       1        3  0.4513879616
 [17,]       1        3  0.4657014885
 [18,]       1        3  0.3451567976
 [19,]       1        3  0.4415506319
 [20,]       1        3  0.3881223896
 [21,]       1        3  0.4064938863
 [22,]       1        3  0.4249829478
 [23,]       1        3  0.3705789997
 [24,]       1        3  0.3173111148
 [25,]       1        3  0.3386513763
 [26,]       1        3  0.3689049084
 [27,]       1        3  0.3284414956
 [28,]       1        3  0.3250115826
 [29,]       1        3  0.3336090175
 [30,]       1        3  0.3477183140
 [31,]       1        3  0.3443170753
 [32,]       1        3  0.3383222041
 [33,]       1        3  0.3141727502
 [34,]       1        3  0.3783153999
 [35,]       1        3  0.3419243608
 [36,]       1        3  0.3679473828
 [37,]       1        3  0.2892730357
 [38,]       1        3  0.3705564389
 [39,]       1        3  0.2952973797
 [40,]       1        3  0.3293424999
 [41,]       1        3  0.3122733210
 [42,]       1        3  0.2838792525
 [43,]       1        3  0.4027044887
 [44,]       1        3  0.3447699275
 [45,]       1        3  0.3597847726
 [46,]       1        3  0.3620106967
 [47,]       1        3  0.3872068530
 [48,]       1        3  0.4179858606
 [49,]       1        3  0.4272605163
 [50,]       1        3  0.3721136564
 [51,]       1        3  0.3756274384
 [52,]       1        3  0.3780291769
 [53,]       1        3  0.3916152654
 [54,]       1        2  0.4307482926
 [55,]       1        3  0.4306389627
 [56,]       1        3  0.4192533667
 [57,]       1        2  0.4299357754
 [58,]       1        2  0.3945326174
 [59,]       1        2  0.3361889663
 [60,]       1        2  0.3573241733
 [61,]       1        2  0.3488208810
 [62,]       1        2  0.3682283851
 [63,]       1        2  0.3097890386
 [64,]       1        2  0.2917497769
 [65,]       1        2  0.2202560823
 [66,]       1        2  0.3111911328
 [67,]       1        2  0.2672267710
 [68,]       1        2  0.2582993497
 [69,]       1        2  0.2011565526
 [70,]       1        2  0.2027056294
 [71,]       1        2  0.1276549644
 [72,]       1        2  0.1492028788
 [73,]       1        2  0.0959782362
 [74,]       1        2  0.1235711029
 [75,]       1        2  0.0405105708
 [76,]       1        2  0.1152450678
 [77,]       1        2  0.0765114357
 [78,]       1        2  0.0141265759
 [79,]       1        2 -0.0387644118
 [80,]       1        2 -0.0290033259
 [81,]       1        2 -0.0100607245
 [82,]       1        2  0.0027929674
 [83,]       1        2 -0.0752897099
 [84,]       1        2 -0.0695521488
 [85,]       1        2 -0.1180097540
 [86,]       1        2 -0.1170727576
 [87,]       1        2 -0.0922311528
 [88,]       1        2 -0.2057048508
 [89,]       1        2 -0.1907745879
 [90,]       1        2 -0.2278505991
 [91,]       1        2 -0.1070573847
 [92,]       2        1  0.2242218132
 [93,]       2        1  0.2315542912
 [94,]       2        1  0.2376618173
 [95,]       2        1  0.2211434913
 [96,]       2        1  0.2527129857
 [97,]       2        1  0.1761655277
 [98,]       2        1  0.2270165013
 [99,]       2        1  0.2069262201
[100,]       2        1  0.1968093249
[101,]       2        1  0.1686159821
[102,]       2        1  0.1721798221
[103,]       2        1  0.1337575089
[104,]       2        1  0.1594524911
[105,]       2        1  0.1020665386
[106,]       2        1  0.1163691117
[107,]       2        1  0.0347262952
[108,]       2        1  0.0827121077
[109,]       2        1  0.0182873363
[110,]       2        1  0.0193340371
[111,]       2        1 -0.0312989563
[112,]       2        1 -0.0567852148
[113,]       2        1 -0.1085829021
[114,]       2        1 -0.0836455313
[115,]       1        2  0.1424216753
[116,]       1        2  0.1509361029
[117,]       1        2  0.1602095280
[118,]       1        2  0.1843215676
[119,]       1        2  0.2243016725
[120,]       1        2  0.2339441269
[121,]       1        2  0.2391305718
[122,]       1        2  0.2898169540
[123,]       1        2  0.2964598642
[124,]       1        2  0.2692119014
[125,]       1        2  0.3383785214
[126,]       1        2  0.3401731276
[127,]       1        2  0.3228809636
[128,]       1        2  0.3353342655
[129,]       1        2  0.3485310398
[130,]       1        2  0.3668003266
[131,]       1        2  0.3773348675
[132,]       1        3  0.3476615751
[133,]       1        3  0.3457806212
[134,]       1        3  0.3275524839
[135,]       1        3  0.3105729386
[136,]       1        3  0.3246530868
[137,]       1        3  0.2674467036
[138,]       1        3  0.2587715313
[139,]       1        3  0.2195054399
[140,]       1        3  0.2268133187
[141,]       1        3  0.1748227520
[142,]       1        3  0.1499135742
[143,]       1        3  0.1674180100
[144,]       1        3  0.1280196746
[145,]       1        3  0.0828352524
[146,]       1        3  0.0395977228
[147,]       1        3  0.0274891688
[148,]       3        1  0.0596812489
[149,]       3        1  0.0631668532
[150,]       3        1  0.1349980063
[151,]       3        1  0.1274757977
[152,]       3        1  0.1452118286
[153,]       3        1  0.1824725665
[154,]       3        1  0.2288965770
[155,]       3        1  0.2676128295
[156,]       3        1  0.3000358731
[157,]       3        1  0.3251864492
[158,]       3        1  0.3305656218
[159,]       3        1  0.3762523930
[160,]       3        1  0.3326521844
[161,]       3        1  0.3968426622
[162,]       3        1  0.4323410368
[163,]       3        1  0.4337799460
[164,]       3        1  0.4514328750
[165,]       3        1  0.4697695156
[166,]       3        1  0.4677093550
[167,]       3        1  0.4863701272
[168,]       3        1  0.4812455820
[169,]       3        1  0.5052704138
[170,]       3        1  0.4859427504
[171,]       3        1  0.5215769384
[172,]       3        1  0.5105472376
[173,]       3        1  0.5090611685
[174,]       3        1  0.5084210950
[175,]       3        1  0.5111115639
[176,]       3        1  0.5013806227
[177,]       3        1  0.4857729606
[178,]       3        1  0.4790680659
[179,]       3        1  0.4713270838
[180,]       3        1  0.4614149848
[181,]       3        1  0.4318825192
[182,]       3        1  0.4231386100
[183,]       3        1  0.4110448732
[184,]       3        1  0.3978460951
[185,]       3        1  0.3611023171
[186,]       3        1  0.3646330309
[187,]       3        1  0.3033858075
[188,]       3        1  0.2593738541
[189,]       3        1  0.2799034137
[190,]       3        1  0.2685210126
[191,]       3        1  0.2298129965
[192,]       3        1  0.2027357289
[193,]       3        1  0.1640719735
[194,]       3        1  0.1519610138
[195,]       1        3 -0.0997000277
[196,]       1        3 -0.0898117316
[197,]       1        3 -0.0632005811
[198,]       1        3 -0.0232553981
[199,]       1        3  0.0464135342
[200,]       1        3  0.0523530321
[201,]       1        3  0.0576567974
[202,]       1        3  0.0927498889
[203,]       1        3  0.0944924540
[204,]       1        3  0.1236995610
[205,]       1        2  0.1155534254
[206,]       1        2  0.0952917127
[207,]       1        2  0.1073474356
[208,]       1        2  0.0562538071
[209,]       1        2  0.0381530188
[210,]       1        2  0.0120003014
[211,]       1        2 -0.0122345228
[212,]       2        1  0.0610418536
[213,]       2        1  0.0792505637
[214,]       2        1  0.1106136215
[215,]       2        1  0.1209549808
[216,]       2        1  0.1683858238
[217,]       2        1  0.1900221283
[218,]       2        1  0.2306575630
[219,]       2        1  0.2447628525
[220,]       2        1  0.2612938059
[221,]       2        1  0.2738739737
[222,]       2        1  0.3068472531
[223,]       2        1  0.3203720267
[224,]       2        1  0.3714065013
[225,]       2        1  0.3779187560
[226,]       2        1  0.3961780828
[227,]       2        1  0.4059924123
[228,]       2        1  0.4076251914
[229,]       2        1  0.4377458513
[230,]       2        1  0.4492622324
[231,]       2        1  0.4557163971
[232,]       2        1  0.4754050976
[233,]       2        1  0.4800439778
[234,]       2        1  0.4917708986
[235,]       2        1  0.4969621880
[236,]       2        1  0.5032123235
[237,]       2        1  0.5087294779
[238,]       2        1  0.5057509809
[239,]       2        1  0.5109569557
[240,]       2        1  0.5082371439
[241,]       2        1  0.5114821289
[242,]       2        1  0.5037871859
[243,]       2        1  0.4984230552
[244,]       2        1  0.4946332722
[245,]       2        1  0.4910993071
[246,]       2        1  0.4774289192
[247,]       2        1  0.4682836182
[248,]       2        1  0.4674833472
[249,]       2        1  0.4435944922
[250,]       2        1  0.4372183733
[251,]       2        1  0.4186476498
[252,]       2        1  0.3938886365
[253,]       2        1  0.3931892339
[254,]       2        1  0.3533933867
[255,]       2        1  0.3434500960
[256,]       2        1  0.3313350221
[257,]       2        1  0.3013603765
[258,]       1        2  0.5285329910
[259,]       1        2  0.5142773056
[260,]       1        2  0.5076089997
[261,]       1        2  0.5008018204
[262,]       1        2  0.4836350048
[263,]       1        2  0.5005586435
[264,]       1        2  0.5033302355
[265,]       1        2  0.4774973376
[266,]       1        2  0.4272138096
[267,]       1        2  0.4297051740
[268,]       1        2  0.4255887950
[269,]       1        2  0.5062977826
[270,]       1        2  0.4172102021
[271,]       1        2  0.4496966729
[272,]       1        2  0.4386873431
[273,]       1        2  0.4635471132
[274,]       1        2  0.4228929561
[275,]       1        2  0.4362866635
[276,]       1        2  0.4225019477
[277,]       1        2  0.3434312184
[278,]       1        2  0.3609200597
[279,]       1        2  0.4038296295
[280,]       1        2  0.3428355944
[281,]       1        2  0.3888080121
[282,]       1        2  0.3724251147
[283,]       1        2  0.3983154648
[284,]       1        2  0.4506795628
[285,]       1        2  0.3642427719
[286,]       1        2  0.4394222665
[287,]       1        2  0.3747657769
[288,]       1        2  0.3882112850
[289,]       1        2  0.3001939989
[290,]       1        2  0.3686357721
[291,]       1        2  0.3862413947
[292,]       1        2  0.3825024818
[293,]       1        2  0.3913079310
[294,]       1        2  0.4091784114
[295,]       1        2  0.4375740265
[296,]       1        2  0.4456578653
[297,]       1        2  0.3896709281
[298,]       1        2  0.4059513425
[299,]       1        2  0.4299561613
[300,]       1        2  0.4333749259
[301,]       1        2  0.4212780868
[302,]       1        2  0.4394243542
[303,]       1        2  0.4474917386
[304,]       1        2  0.4526107209
[305,]       1        2  0.4568197041
[306,]       1        2  0.4559900598
[307,]       1        2  0.4778122026
[308,]       1        2  0.4549072625
[309,]       1        2  0.4782063656
[310,]       1        2  0.4791338576
[311,]       1        2  0.4851062143
[312,]       1        2  0.5056705986
[313,]       1        2  0.5033080689
[314,]       1        2  0.4938951480
[315,]       1        2  0.5043706501
[316,]       1        3  0.4806996305
[317,]       1        3  0.4628047186
[318,]       1        3  0.4761576155
[319,]       1        3  0.4593663698
[320,]       1        3  0.4549183306
[321,]       1        3  0.4305342950
[322,]       1        3  0.4214034332
[323,]       1        3  0.4193605608
[324,]       1        3  0.3908798742
[325,]       1        3  0.3626593003
[326,]       1        3  0.3329172032
[327,]       1        3  0.3415544098
[328,]       1        3  0.3309206073
[329,]       1        3  0.3077441445
[330,]       1        3  0.2841897759
[331,]       1        3  0.2880498833
[332,]       1        3  0.2752627261
[333,]       1        3  0.2453874772
[334,]       1        3  0.2200189303
[335,]       1        3  0.2137892286
[336,]       1        3  0.1699332305
[337,]       1        3  0.1291338886
[338,]       1        3  0.1629562247
[339,]       1        3  0.0495342165
[340,]       1        3  0.0439012659
[341,]       1        3  0.0317937702
[342,]       1        3  0.0291653247
[343,]       1        3 -0.0090486223
[344,]       1        3 -0.1564487293
[345,]       1        3 -0.1263818556
[346,]       1        3 -0.0730996158
[347,]       1        3 -0.0582121699
[348,]       1        3 -0.1246520261
[349,]       1        3 -0.1502506026
[350,]       1        3 -0.1548151751
[351,]       1        3 -0.1662777156
[352,]       1        3 -0.1900682788
[353,]       1        3 -0.2809854996
[354,]       1        3 -0.1851627531
[355,]       1        3 -0.2682832811
[356,]       3        1  0.2266607071
[357,]       3        1  0.1747299788
[358,]       3        1  0.2122131041
[359,]       3        1  0.2383182660
[360,]       3        1  0.2508851001
[361,]       3        1  0.2550357837
[362,]       3        1  0.2483659019
[363,]       3        1  0.1824744798
[364,]       3        1  0.2253027167
[365,]       3        1  0.2175950662
[366,]       3        1  0.1880859182
[367,]       3        1  0.2020598318
[368,]       3        1  0.1570903334
[369,]       3        1  0.1751033984
[370,]       3        1  0.1201867388
[371,]       3        1  0.1046936641
[372,]       3        1  0.1127606968
[373,]       3        1  0.0892728892
[374,]       3        1  0.0665257358
[375,]       1        3 -0.0163195559
[376,]       1        3  0.0102688034
[377,]       1        3  0.0376497821
[378,]       1        3  0.0317579904
[379,]       1        3  0.0820600776
[380,]       1        3  0.1612346794
[381,]       1        3  0.1333533562
[382,]       1        3  0.1446905018
[383,]       1        3  0.1445160895
[384,]       1        3  0.1791647746
[385,]       1        3  0.1863893337
[386,]       1        3  0.2369743517
[387,]       1        3  0.2311796798
[388,]       1        3  0.2421823053
[389,]       1        2  0.2455850418
[390,]       1        2  0.2059782160
[391,]       1        2  0.1965172934
[392,]       1        2  0.2044869627
[393,]       1        2  0.1480559369
[394,]       1        2  0.1511998935
[395,]       1        2  0.0993286450
[396,]       1        2  0.0917882909
[397,]       1        2  0.0993017188
[398,]       1        2  0.0296360723
[399,]       1        2 -0.0118842138
[400,]       1        2 -0.0674710020
[401,]       1        2 -0.1076240633
[402,]       2        1  0.1488304117
[403,]       2        1  0.1801273499
[404,]       2        1  0.1876109823
[405,]       2        1  0.2087097207
[406,]       2        1  0.2579589034
[407,]       2        1  0.2697327643
[408,]       2        1  0.2763837670
[409,]       2        1  0.3076865591
[410,]       2        1  0.3119679407
[411,]       2        1  0.3504083768
[412,]       2        1  0.3745934132
[413,]       2        1  0.3862116427
[414,]       2        1  0.4145111618
[415,]       2        1  0.4362426786
[416,]       2        1  0.4191709982
[417,]       2        1  0.4232217999
[418,]       2        1  0.4583938603
[419,]       2        1  0.4566962608
[420,]       2        1  0.4689625295
[421,]       2        1  0.4591701556
[422,]       2        1  0.4791550938
[423,]       2        1  0.4952485563
[424,]       2        1  0.4883985470
[425,]       2        1  0.4718494791
[426,]       2        1  0.4834748753
[427,]       2        1  0.4772906802
[428,]       2        1  0.4723612272
[429,]       2        1  0.4629082122
[430,]       2        1  0.4645893628
[431,]       2        1  0.4425390442
[432,]       2        1  0.4119929990
[433,]       2        1  0.4156127253
[434,]       2        1  0.4037333886
[435,]       2        1  0.3809116347
[436,]       2        1  0.3660146715
[437,]       2        1  0.3275821524
[438,]       2        1  0.3005472158
[439,]       2        1  0.3017007824
[440,]       2        1  0.2704900671
[441,]       2        1  0.2530125618
[442,]       2        1  0.2088892805
[443,]       2        1  0.1926078786
[444,]       1        2 -0.1445258001
[445,]       1        2 -0.1187907801
[446,]       1        2 -0.0849306185
[447,]       1        2 -0.0904130683
[448,]       1        2 -0.0280620588
[449,]       1        2 -0.0115399087
[450,]       1        2  0.0221069163
[451,]       1        2  0.0523140937
[452,]       1        2  0.0662364423
[453,]       1        2  0.1141007128
[454,]       1        2  0.1242838093
[455,]       1        2  0.1469745580
[456,]       1        2  0.1455160845
[457,]       1        2  0.1803809749
[458,]       1        2  0.1980502574
[459,]       1        2  0.2403301836
[460,]       1        2  0.2338512803
[461,]       1        2  0.2525946290
[462,]       1        2  0.2651924382
[463,]       1        3  0.2698508063
[464,]       1        3  0.2470860002
[465,]       1        3  0.2513749118
[466,]       1        3  0.2410265486
[467,]       1        3  0.2163091930
[468,]       1        3  0.1934036798
[469,]       1        3  0.1765353430
[470,]       1        3  0.1636589402
[471,]       1        3  0.1358620935
[472,]       1        3  0.1144551256
[473,]       1        3  0.0830068954
[474,]       1        3  0.0505762218
[475,]       1        3  0.0326763311
[476,]       1        3 -0.0002116333
[477,]       1        3 -0.0440760461
[478,]       1        3 -0.0599266122
[479,]       1        3 -0.0724870990
[480,]       1        3 -0.1414934784
[481,]       1        3 -0.1408608581
[482,]       3        1  0.1889439719
[483,]       3        1  0.2265893330
[484,]       3        1  0.2434645121
[485,]       3        1  0.2886780105
[486,]       3        1  0.3044430959
[487,]       3        1  0.3082312877
[488,]       3        1  0.3475395453
[489,]       3        1  0.3658344984
[490,]       3        1  0.3958078196
[491,]       3        1  0.4053616953
[492,]       3        1  0.4288548455
[493,]       3        1  0.4417809581
[494,]       3        1  0.4605085407
[495,]       3        1  0.4771808971
[496,]       3        1  0.4940203666
[497,]       3        1  0.4927977913
[498,]       3        1  0.5081342644
[499,]       3        1  0.5123471026
[500,]       3        1  0.5161945132
[501,]       3        1  0.5286973189
[502,]       3        1  0.5278892237
[503,]       3        1  0.5311727421
[504,]       3        1  0.5329274473
[505,]       3        1  0.5254053458
[506,]       3        1  0.5252261733
[507,]       3        1  0.5209401742
[508,]       3        1  0.5093515900
[509,]       3        1  0.5011615179
[510,]       3        1  0.4989364684
[511,]       3        1  0.4831536723
[512,]       3        1  0.4769955646
[513,]       3        1  0.4565068814
[514,]       3        1  0.4472499280
[515,]       3        1  0.4289524875
[516,]       1        2  0.6756529639
[517,]       1        2  0.6773197054
[518,]       1        2  0.6784146503
[519,]       1        3  0.6821773356
[520,]       1        3  0.6517159238
[521,]       1        3  0.6764599164
[522,]       1        2  0.6812766899
[523,]       1        3  0.6763907734
[524,]       1        3  0.6653901524
[525,]       1        3  0.6683267138
[526,]       1        2  0.6780737911
[527,]       1        3  0.6566744642
[528,]       1        2  0.6816274683
[529,]       1        3  0.6665254743
[530,]       1        3  0.6821645513
[531,]       1        2  0.6720039654
[532,]       1        3  0.6795394193
[533,]       1        3  0.6531544360
[534,]       1        2  0.6747732597
[535,]       1        3  0.6585233348
[536,]       1        3  0.6813953776
[537,]       1        2  0.6818396013
[538,]       1        3  0.6674382766
[539,]       1        3  0.6788873278
[540,]       1        3  0.6550365372
[541,]       1        3  0.6778037973
[542,]       1        2  0.6675226468
[543,]       1        2  0.6524510428
[544,]       1        3  0.6715766203
[545,]       1        2  0.6627651581
[546,]       1        2  0.6817321815
[547,]       1        3  0.6744433693
[548,]       1        3  0.6759564358
[549,]       1        2  0.6816073303
[550,]       1        2  0.6802449711
[551,]       1        2  0.6644330133
[552,]       1        2  0.6779814497
[553,]       1        3  0.6798129649
[554,]       1        3  0.6686165847
[555,]       1        2  0.6567039029
[556,]       1        2  0.6745661030
[557,]       1        2  0.6816127032
[558,]       1        2  0.6640380261
[559,]       1        2  0.6787972141
[560,]       1        2  0.6750659333
[561,]       1        3  0.6743879237
[562,]       1        3  0.6762068361
[563,]       1        2  0.6787349434
[564,]       1        2  0.6770745644
[565,]       1        2  0.6685573311
[566,]       1        3  0.6782144272
[567,]       1        2  0.6560676228
[568,]       1        2  0.6665292568
[569,]       1        2  0.6512878275
[570,]       1        3  0.6672192691
[571,]       1        2  0.6601375756
[572,]       1        2  0.6730483708
[573,]       1        3  0.6802577405
[574,]       1        2  0.6779890906
[575,]       1        2  0.6703798668
[576,]       1        3  0.6654650850
[577,]       1        3  0.6736465080
[578,]       1        2  0.6795678393
[579,]       1        3  0.6756537352
[580,]       1        3  0.6748867048
[581,]       1        2  0.6695080282
[582,]       1        2  0.6817866253
[583,]       1        2  0.6582152781
[584,]       1        2  0.6816867363
[585,]       1        2  0.6501795146
[586,]       1        2  0.6819375361
[587,]       1        2  0.6630742255
[588,]       1        3  0.6817783753
[589,]       1        2  0.6794464912
[590,]       1        2  0.6699540920
[591,]       1        2  0.6807995773
[592,]       1        2  0.6646855427
[593,]       1        3  0.6733608062
[594,]       1        2  0.6708787167
[595,]       1        2  0.6594250298
[596,]       1        3  0.6792802047
[597,]       1        2  0.6582339476
[598,]       1        2  0.6655079262
[599,]       1        3  0.6708519394
[600,]       1        2  0.6590777311
[601,]       1        2  0.6665862206
[602,]       1        2  0.6534642101
[603,]       1        2  0.6806040123
[604,]       1        3  0.6721256231
[605,]       1        3  0.6776529694
[606,]       1        3  0.6579704326
[607,]       1        2  0.6803630213
[608,]       1        2  0.6625937685
[609,]       1        2  0.6809662451
[610,]       1        2  0.6544523057
[611,]       1        2  0.6754534232
[612,]       1        2  0.6634045072
[613,]       1        3  0.6583478191
[614,]       1        2  0.6812510914
[615,]       1        3  0.6784221752
[616,]       1        3  0.6694382311
[617,]       1        2  0.6804896932
[618,]       1        2  0.6687840302
[619,]       1        3  0.6731550413
[620,]       1        2  0.6764935575
[621,]       1        3  0.6799749341
[622,]       1        2  0.6796022101
[623,]       1        2  0.6809059812
[624,]       1        2  0.6697572445
[625,]       1        3  0.6639427258
[626,]       1        2  0.6822695729
[627,]       1        2  0.6615368618
[628,]       1        2  0.6596440497
[629,]       1        3  0.6796076385
[630,]       1        3  0.6823076293
[631,]       1        2  0.6742010068
[632,]       1        2  0.6751593222
[633,]       1        2  0.6714088276
[634,]       1        2  0.6779972836
[635,]       1        3  0.6778667611
[636,]       1        2  0.6751251229
[637,]       1        3  0.6632381957
[638,]       1        2  0.6568720491
[639,]       1        2  0.6639481778
[640,]       1        3  0.6786990937
[641,]       1        3  0.6732956075
[642,]       1        2  0.6628184729
[643,]       1        3  0.6775099742
[644,]       1        2  0.6696865967
[645,]       1        3  0.6748951161
[646,]       1        2  0.6715433928
[647,]       1        2  0.6747678710
[648,]       1        2  0.6730763777
[649,]       1        3  0.6672386322
[650,]       1        3  0.6600067586
[651,]       1        2  0.6789094353
[652,]       1        3  0.6592954418
[653,]       1        3  0.6662430047
[654,]       1        2  0.6570834565
[655,]       1        3  0.6579831496
[656,]       1        2  0.6823137560
[657,]       1        2  0.6813364616
[658,]       1        3  0.6670656590
[659,]       1        2  0.6717004096
[660,]       1        3  0.6786164022
[661,]       1        3  0.6698183225
[662,]       1        3  0.6709948710
[663,]       1        3  0.6761793048
[664,]       1        2  0.6770049246
[665,]       1        2  0.6618065904
[666,]       1        2  0.6635088251
[667,]       1        2  0.6707364312
[668,]       1        3  0.6776813076
[669,]       1        3  0.6757081785
[670,]       1        2  0.6655423392
[671,]       1        2  0.6699727974
[672,]       1        2  0.6752710067
[673,]       1        2  0.6781472004
[674,]       1        3  0.6788815822
[675,]       1        3  0.6773147071
[676,]       1        2  0.6703937264
[677,]       1        2  0.6680675714
[678,]       1        3  0.6721371775
[679,]       1        3  0.6771522138
[680,]       1        2  0.6611707170
[681,]       1        3  0.6576916974
[682,]       1        3  0.6755504828
[683,]       1        3  0.6586784766
[684,]       1        2  0.6556746309
[685,]       1        3  0.6809389201
[686,]       1        2  0.6791478574
[687,]       1        3  0.6551290493
[688,]       1        2  0.6799615337
[689,]       1        2  0.6542594667
[690,]       1        3  0.6808364916
[691,]       1        2  0.6727979490
[692,]       1        3  0.6664351378
[693,]       1        3  0.6660333850
[694,]       1        2  0.6687257082
[695,]       1        2  0.6809456664
[696,]       1        2  0.6665882497
[697,]       1        2  0.6640732791
[698,]       1        2  0.6677598675
[699,]       1        2  0.6760342393
[700,]       1        2  0.6715884754
[701,]       1        3  0.6732049419
[702,]       1        3  0.6815916638
[703,]       1        3  0.6773662900
[704,]       1        3  0.6809884449
[705,]       1        2  0.6679606975
[706,]       1        2  0.6731823866
[707,]       1        2  0.6582414930
[708,]       1        2  0.6670816370
[709,]       1        3  0.6768470924
[710,]       1        2  0.6790519806
[711,]       1        3  0.6754658719
[712,]       1        3  0.6668613423
[713,]       1        2  0.6692015677
[714,]       1        3  0.6706484392
[715,]       1        2  0.6600135034
[716,]       1        2  0.6711799350
[717,]       1        2  0.6801002522
[718,]       1        2  0.6736711919
[719,]       1        2  0.6647342167
[720,]       1        2  0.6567862285
[721,]       1        2  0.6563737525
[722,]       1        3  0.6768813499
[723,]       1        2  0.6645002334
[724,]       1        2  0.6711493271
[725,]       1        3  0.6631456781
[726,]       1        2  0.6777282690
[727,]       1        2  0.6816784129
[728,]       1        3  0.6754762290
[729,]       1        2  0.6638088386
[730,]       1        3  0.6740010121
[731,]       1        2  0.6746809267
[732,]       1        2  0.6791598571
[733,]       1        3  0.6753918745
[734,]       1        2  0.6744607580
[735,]       1        2  0.6592533110
[736,]       1        2  0.6806872904
[737,]       1        2  0.6809619462
[738,]       1        2  0.6546872945
[739,]       1        2  0.6819869987
[740,]       1        3  0.6776604764
[741,]       1        3  0.6637050658
[742,]       1        3  0.6758227529
[743,]       1        3  0.6816113617
[744,]       1        3  0.6744139886
[745,]       1        2  0.6694120173
[746,]       1        2  0.6804135301
[747,]       1        2  0.6753991532
[748,]       1        3  0.6678388289
[749,]       1        2  0.6671460903
[750,]       1        2  0.6692265957
[751,]       1        2  0.6742986791
[752,]       1        2  0.6693567118
[753,]       1        3  0.6563735737
[754,]       1        3  0.6708749110
[755,]       1        2  0.6591508464
[756,]       1        3  0.6721359307
[757,]       1        2  0.6720483833
[758,]       1        2  0.6804520563
[759,]       1        3  0.6613191836
[760,]       1        2  0.6724999139
[761,]       1        3  0.6705984987
[762,]       1        2  0.6786908368
[763,]       1        3  0.6738678541
[764,]       1        2  0.6803679398
[765,]       1        2  0.6797905268
[766,]       1        2  0.6546319454
[767,]       1        3  0.6716076080
[768,]       1        3  0.6787198416
[769,]       1        2  0.6645442805
[770,]       1        2  0.6630901195
[771,]       1        2  0.6808271388
[772,]       1        2  0.6813490163
[773,]       1        2  0.6810085727
[774,]       1        3  0.6736314793
[775,]       1        2  0.6523056408
[776,]       1        2  0.6806025315
[777,]       1        2  0.6616074857
[778,]       1        3  0.6644459031
[779,]       1        3  0.6717095685
[780,]       1        2  0.6687787441
[781,]       1        2  0.6599514373
[782,]       1        3  0.6647519036
[783,]       1        2  0.6795430314
[784,]       1        2  0.6762689721
[785,]       1        2  0.6790852789
[786,]       1        2  0.6722669211
[787,]       1        3  0.6697693444
[788,]       1        2  0.6657603220
[789,]       1        3  0.6730009196
[790,]       1        3  0.6632326309
[791,]       1        2  0.6798458753
[792,]       1        3  0.6814058103
[793,]       1        2  0.6804404892
[794,]       1        2  0.6758756264
[795,]       1        3  0.6748989819
[796,]       1        3  0.6643813436
[797,]       1        3  0.6659262556
[798,]       1        3  0.6684003146
[799,]       1        3  0.6624357231
[800,]       1        2  0.6645299307
[801,]       1        3  0.6689700538
[802,]       1        3  0.6693434245
[803,]       1        2  0.6675425311
[804,]       1        2  0.6666498694
[805,]       1        2  0.6738833334
[806,]       1        3  0.6810521014
[807,]       1        3  0.6541358878
[808,]       1        3  0.6691798100
[809,]       1        3  0.6760162565
[810,]       1        2  0.6799564951
[811,]       1        3  0.6662570686
[812,]       1        2  0.6539581995
[813,]       1        3  0.6574632898
[814,]       1        3  0.6706749028
[815,]       1        2  0.6805233231
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = average_clusters_two_s, dist = dist(two_spirals_sphere_scaled))
attr(,"class")
[1] "silhouette"
avg_two_s_average <- mean(two_s_average_sils[, "sil_width"])


(two_s_ward_sils <- silhouette(
  x   = ward_clusters_two_s,
  dist = dist(two_spirals_sphere_scaled)
))
       cluster neighbor     sil_width
  [1,]       1        2  0.5041696170
  [2,]       1        2  0.5193182772
  [3,]       1        2  0.5013249695
  [4,]       1        2  0.5229249225
  [5,]       1        2  0.4857363878
  [6,]       1        2  0.4877613039
  [7,]       1        2  0.4929319440
  [8,]       1        2  0.4643821602
  [9,]       1        2  0.4971849815
 [10,]       1        2  0.5107100467
 [11,]       1        2  0.4715468071
 [12,]       1        2  0.4373442004
 [13,]       1        2  0.4540951125
 [14,]       1        2  0.5226458232
 [15,]       1        2  0.4935398658
 [16,]       1        2  0.4993383930
 [17,]       1        2  0.5198155142
 [18,]       1        2  0.4562789977
 [19,]       1        2  0.4992195667
 [20,]       1        2  0.5102427291
 [21,]       1        2  0.5241881526
 [22,]       1        2  0.5520991557
 [23,]       1        2  0.5261717149
 [24,]       1        2  0.5026653315
 [25,]       1        2  0.4983600710
 [26,]       1        2  0.5316083580
 [27,]       1        2  0.5168457850
 [28,]       1        2  0.5221578161
 [29,]       1        2  0.5080442174
 [30,]       1        2  0.5446362719
 [31,]       1        2  0.5330170715
 [32,]       1        2  0.5438391460
 [33,]       1        2  0.5411144126
 [34,]       1        2  0.5689143077
 [35,]       1        2  0.5418397392
 [36,]       1        2  0.5688984053
 [37,]       1        2  0.5372901022
 [38,]       1        2  0.5768218912
 [39,]       1        2  0.5485180487
 [40,]       1        2  0.5619583696
 [41,]       1        2  0.5577767319
 [42,]       1        2  0.5444173789
 [43,]       1        2  0.5968781675
 [44,]       1        2  0.5724130935
 [45,]       1        2  0.5788996940
 [46,]       1        2  0.5796426755
 [47,]       1        2  0.5903110935
 [48,]       1        2  0.6024510812
 [49,]       1        2  0.6066479150
 [50,]       1        2  0.5829522881
 [51,]       1        2  0.5832456521
 [52,]       1        3  0.5703782319
 [53,]       1        3  0.5693094812
 [54,]       1        3  0.5456981837
 [55,]       1        3  0.5660643120
 [56,]       1        3  0.5429210187
 [57,]       1        3  0.5440585525
 [58,]       1        3  0.5131037579
 [59,]       1        3  0.4560554831
 [60,]       1        3  0.4770995940
 [61,]       1        3  0.4691457083
 [62,]       1        3  0.4889397043
 [63,]       1        3  0.4365720370
 [64,]       1        3  0.4182099744
 [65,]       1        3  0.3488289926
 [66,]       1        3  0.4381379460
 [67,]       1        3  0.3957830250
 [68,]       1        3  0.3872071712
 [69,]       1        3  0.3320114578
 [70,]       1        3  0.3372348110
 [71,]       1        3  0.2639205562
 [72,]       1        3  0.2870593510
 [73,]       1        3  0.2337207339
 [74,]       1        3  0.2680920803
 [75,]       1        3  0.1840180267
 [76,]       1        3  0.2624503881
 [77,]       1        3  0.2228890274
 [78,]       1        3  0.1692175146
 [79,]       1        3  0.1107161147
 [80,]       1        3  0.1349812133
 [81,]       1        3  0.1505277946
 [82,]       1        3  0.1660516650
 [83,]       1        3  0.0915571713
 [84,]       1        3  0.0976825396
 [85,]       1        3  0.0497629073
 [86,]       1        3  0.0422265186
 [87,]       1        3  0.0812765662
 [88,]       1        3 -0.0582265686
 [89,]       1        3 -0.0302315970
 [90,]       1        3 -0.0761661552
 [91,]       1        3  0.0836972425
 [92,]       1        3 -0.0659594772
 [93,]       1        3 -0.0716047863
 [94,]       1        3 -0.0774831460
 [95,]       1        3 -0.0516231456
 [96,]       1        3 -0.0943090363
 [97,]       1        3  0.0078850853
 [98,]       1        3 -0.0586396823
 [99,]       1        3 -0.0347877697
[100,]       1        3 -0.0205117510
[101,]       1        3  0.0073752047
[102,]       1        3 -0.0029824913
[103,]       1        3  0.0426965167
[104,]       1        3  0.0051866694
[105,]       1        3  0.0565077573
[106,]       1        3  0.0523942954
[107,]       1        3  0.1150141273
[108,]       1        3  0.0614505910
[109,]       1        3  0.1153822607
[110,]       1        3  0.1054754449
[111,]       1        3  0.1493483803
[112,]       1        3  0.1433600404
[113,]       1        3  0.1961497260
[114,]       1        3  0.1644922171
[115,]       2        1 -0.1363754348
[116,]       2        1 -0.1397756510
[117,]       2        1 -0.1230427995
[118,]       2        1 -0.1064593493
[119,]       2        1 -0.0860618102
[120,]       2        1 -0.0675427551
[121,]       2        1 -0.0492379069
[122,]       2        1  0.0019112612
[123,]       2        1  0.0187400818
[124,]       2        1  0.0459513217
[125,]       2        1  0.0518711318
[126,]       2        1  0.1005015457
[127,]       2        1  0.0753773411
[128,]       2        1  0.1413045194
[129,]       2        1  0.1569599101
[130,]       2        1  0.1667333148
[131,]       2        1  0.1495008167
[132,]       2        1  0.1890759072
[133,]       2        1  0.1881537386
[134,]       2        1  0.2068189841
[135,]       2        1  0.2165342967
[136,]       2        1  0.2025905062
[137,]       2        1  0.2393923113
[138,]       2        1  0.2415048335
[139,]       2        1  0.2631060143
[140,]       2        1  0.2581048258
[141,]       2        1  0.2731860860
[142,]       2        1  0.2913740779
[143,]       2        1  0.2701643671
[144,]       2        1  0.2681624948
[145,]       2        1  0.2874082437
[146,]       2        1  0.2784883150
[147,]       2        1  0.2791515494
[148,]       2        1  0.2939630821
[149,]       2        1  0.2870779381
[150,]       2        1  0.2932330727
[151,]       2        1  0.2685573344
[152,]       2        1  0.2805019864
[153,]       2        1  0.2707945296
[154,]       2        1  0.2502497731
[155,]       2        1  0.2468172572
[156,]       2        1  0.2474065627
[157,]       2        1  0.2428738625
[158,]       2        1  0.2275568191
[159,]       2        1  0.2287034293
[160,]       2        1  0.2026369883
[161,]       2        1  0.1923756844
[162,]       2        1  0.1902971514
[163,]       2        1  0.1898680459
[164,]       2        1  0.1496682348
[165,]       2        1  0.1614424498
[166,]       2        1  0.1116209094
[167,]       2        1  0.1330619935
[168,]       2        1  0.0696502154
[169,]       2        1  0.0816729574
[170,]       2        1  0.0265150647
[171,]       2        1  0.0755570375
[172,]       2        1  0.0239982577
[173,]       2        1  0.0038708426
[174,]       2        1 -0.0006555158
[175,]       2        1 -0.0262650003
[176,]       2        1 -0.0562390769
[177,]       2        1 -0.0840700572
[178,]       2        1 -0.1038104240
[179,]       2        1 -0.1175993070
[180,]       2        1 -0.1307455982
[181,]       2        1 -0.1735324858
[182,]       2        1 -0.1787959886
[183,]       2        1 -0.1918098811
[184,]       2        1 -0.2016965027
[185,]       2        1 -0.2348223641
[186,]       2        1 -0.2273492245
[187,]       2        1 -0.2775236705
[188,]       1        2  0.2918421263
[189,]       1        2  0.2673955138
[190,]       1        2  0.2811288169
[191,]       1        2  0.3011725504
[192,]       1        2  0.3035608887
[193,]       1        2  0.3199288565
[194,]       1        2  0.3292086633
[195,]       1        2  0.3488852269
[196,]       1        2  0.3530984628
[197,]       1        3  0.3504589317
[198,]       1        3  0.3334281450
[199,]       1        3  0.3196085464
[200,]       1        3  0.2944208049
[201,]       1        3  0.3032347448
[202,]       1        3  0.2563944121
[203,]       1        3  0.2556450492
[204,]       1        3  0.2221997184
[205,]       1        3  0.1913161442
[206,]       1        3  0.1687287243
[207,]       1        3  0.1848445137
[208,]       1        3  0.1281434261
[209,]       1        3  0.1078040658
[210,]       1        3  0.0793446045
[211,]       1        3  0.0524950993
[212,]       3        1  0.0080731887
[213,]       3        1  0.0303378060
[214,]       3        1  0.0720499109
[215,]       3        1  0.0819581844
[216,]       3        1  0.1417506822
[217,]       3        1  0.1705228345
[218,]       3        1  0.2197392992
[219,]       3        1  0.2387801965
[220,]       3        1  0.2564786929
[221,]       3        1  0.2746136157
[222,]       3        1  0.3137197183
[223,]       3        1  0.3269706979
[224,]       3        1  0.3852024796
[225,]       3        1  0.3939802323
[226,]       3        1  0.4149415884
[227,]       3        1  0.4269864466
[228,]       3        1  0.4267523660
[229,]       3        1  0.4603670176
[230,]       3        1  0.4730277891
[231,]       3        1  0.4793218363
[232,]       3        1  0.4981544892
[233,]       3        1  0.5045987450
[234,]       3        1  0.5132491745
[235,]       3        1  0.5186778400
[236,]       3        1  0.5224641146
[237,]       3        1  0.5256508575
[238,]       3        1  0.5237238816
[239,]       3        1  0.5252979579
[240,]       3        1  0.5220370789
[241,]       3        1  0.5205474564
[242,]       3        1  0.5127157586
[243,]       3        1  0.5057348526
[244,]       3        1  0.5002187060
[245,]       3        1  0.4926057165
[246,]       3        1  0.4769705214
[247,]       3        1  0.4619289863
[248,]       3        1  0.4611611538
[249,]       3        1  0.4350609091
[250,]       3        1  0.4278812994
[251,]       3        1  0.4058460554
[252,]       3        1  0.3813944621
[253,]       3        1  0.3783977985
[254,]       3        1  0.3361728745
[255,]       3        1  0.3215793583
[256,]       3        1  0.3106794452
[257,]       3        1  0.2807584860
[258,]       1        3  0.6400182875
[259,]       1        3  0.6280552845
[260,]       1        3  0.6222608185
[261,]       1        3  0.6151060464
[262,]       1        3  0.6017097048
[263,]       1        3  0.6143349233
[264,]       1        3  0.6175041713
[265,]       1        3  0.5954590479
[266,]       1        3  0.5515562665
[267,]       1        3  0.5523947932
[268,]       1        3  0.5501100503
[269,]       1        3  0.6163408688
[270,]       1        3  0.5401383162
[271,]       1        3  0.5674805812
[272,]       1        3  0.5588370132
[273,]       1        3  0.5787261708
[274,]       1        3  0.5458105127
[275,]       1        3  0.5549502525
[276,]       1        3  0.5428491281
[277,]       1        3  0.4733209714
[278,]       1        3  0.4853783800
[279,]       1        3  0.5248124969
[280,]       1        3  0.4710238659
[281,]       1        3  0.5093472568
[282,]       1        3  0.4901342293
[283,]       1        3  0.5121705175
[284,]       1        3  0.5491929118
[285,]       1        3  0.4740662075
[286,]       1        3  0.5361369317
[287,]       1        3  0.4820361972
[288,]       1        3  0.4953796093
[289,]       1        3  0.4188624077
[290,]       1        3  0.4750337281
[291,]       1        3  0.4893744338
[292,]       1        3  0.4852118179
[293,]       1        2  0.4773572919
[294,]       1        2  0.4728635616
[295,]       1        2  0.4871948048
[296,]       1        2  0.4555845653
[297,]       1        2  0.4558624921
[298,]       1        2  0.4296585056
[299,]       1        2  0.4217257035
[300,]       1        2  0.4157916731
[301,]       1        2  0.3746475646
[302,]       1        2  0.4025202774
[303,]       2        1 -0.3535462558
[304,]       2        1 -0.3678026463
[305,]       2        1 -0.3374418940
[306,]       2        1 -0.3194825067
[307,]       2        1 -0.2898169117
[308,]       2        1 -0.2517576303
[309,]       2        1 -0.1867514711
[310,]       2        1 -0.2357049615
[311,]       2        1 -0.2113894175
[312,]       2        1 -0.2719278884
[313,]       2        1 -0.2134425790
[314,]       2        1 -0.1832285213
[315,]       2        1 -0.2102134018
[316,]       2        1 -0.1312726622
[317,]       2        1 -0.1085776208
[318,]       2        1 -0.1604604508
[319,]       2        1 -0.1031825584
[320,]       2        1 -0.1291959838
[321,]       2        1 -0.0644658824
[322,]       2        1 -0.0823314174
[323,]       2        1 -0.1029335307
[324,]       2        1 -0.0805632383
[325,]       2        1 -0.0154433328
[326,]       2        1 -0.0532215891
[327,]       2        1  0.0019924360
[328,]       2        1 -0.0119165980
[329,]       2        1 -0.0048654845
[330,]       2        1 -0.0050682266
[331,]       2        1 -0.0374182496
[332,]       2        1 -0.0361701356
[333,]       1        2  0.0774971767
[334,]       2        1  0.0207522452
[335,]       1        2  0.0216188127
[336,]       1        2  0.0426797480
[337,]       1        2  0.0094003643
[338,]       1        2  0.0645013889
[339,]       1        2  0.0518016456
[340,]       1        2  0.0673939264
[341,]       1        2  0.0255269480
[342,]       1        2  0.1141256051
[343,]       1        2  0.0440341474
[344,]       1        2  0.0429673274
[345,]       1        2  0.0587149395
[346,]       1        2  0.1160884463
[347,]       1        2  0.1194478051
[348,]       1        2  0.1045972498
[349,]       1        2  0.1405271824
[350,]       1        2  0.1405676966
[351,]       1        2  0.1821804302
[352,]       1        2  0.2217672080
[353,]       1        2  0.1484365889
[354,]       1        2  0.2015722755
[355,]       1        2  0.1781801890
[356,]       1        2  0.2429833304
[357,]       1        2  0.2885095274
[358,]       1        2  0.2800154625
[359,]       1        2  0.2713629528
[360,]       1        2  0.2876707931
[361,]       1        2  0.2926543746
[362,]       1        2  0.3052611192
[363,]       1        2  0.3423648874
[364,]       1        2  0.3210190624
[365,]       1        2  0.3353786259
[366,]       1        2  0.3580602397
[367,]       1        2  0.3533801786
[368,]       1        2  0.3785063740
[369,]       1        2  0.3705257791
[370,]       1        2  0.3963311042
[371,]       1        2  0.4026480361
[372,]       1        2  0.3981369692
[373,]       1        2  0.4050272162
[374,]       1        2  0.4140686291
[375,]       1        2  0.4323545796
[376,]       1        2  0.4367007250
[377,]       1        2  0.4474377013
[378,]       1        2  0.4453494285
[379,]       1        2  0.4557908385
[380,]       1        3  0.4703341260
[381,]       1        3  0.4690013430
[382,]       1        3  0.4546899885
[383,]       1        3  0.4350419195
[384,]       1        3  0.4196098203
[385,]       1        3  0.4145864724
[386,]       1        3  0.4027938023
[387,]       1        3  0.3768534912
[388,]       1        3  0.3733062413
[389,]       1        3  0.3486820901
[390,]       1        3  0.3060090350
[391,]       1        3  0.2987743199
[392,]       1        3  0.3059943385
[393,]       1        3  0.2485584848
[394,]       1        3  0.2539047198
[395,]       1        3  0.1950370282
[396,]       1        3  0.1921202536
[397,]       1        3  0.2014213528
[398,]       1        3  0.1271866357
[399,]       1        3  0.0827009498
[400,]       1        3  0.0152893975
[401,]       1        3 -0.0410575459
[402,]       3        1  0.0898697977
[403,]       3        1  0.1309053037
[404,]       3        1  0.1394764810
[405,]       3        1  0.1614697526
[406,]       3        1  0.2225916041
[407,]       3        1  0.2380672650
[408,]       3        1  0.2473672411
[409,]       3        1  0.2824081048
[410,]       3        1  0.2797561461
[411,]       3        1  0.3329952688
[412,]       3        1  0.3605608735
[413,]       3        1  0.3714953428
[414,]       3        1  0.4003090091
[415,]       3        1  0.4198267682
[416,]       3        1  0.3977860936
[417,]       3        1  0.4057349806
[418,]       3        1  0.4448701763
[419,]       3        1  0.4339506744
[420,]       3        1  0.4481593403
[421,]       3        1  0.4234536430
[422,]       3        1  0.4482046657
[423,]       3        1  0.4722977160
[424,]       3        1  0.4567531875
[425,]       3        1  0.4264364831
[426,]       3        1  0.4463843876
[427,]       3        1  0.4344610951
[428,]       3        1  0.4269598633
[429,]       3        1  0.4105066121
[430,]       3        1  0.4173172947
[431,]       3        1  0.3854519265
[432,]       3        1  0.3413401021
[433,]       3        1  0.3544308718
[434,]       3        1  0.3442995508
[435,]       3        1  0.3123230578
[436,]       3        1  0.2964343502
[437,]       3        1  0.2667264975
[438,]       3        1  0.2403595904
[439,]       3        1  0.2385824150
[440,]       3        1  0.1989122770
[441,]       3        1  0.1918979905
[442,]       3        1  0.1497091219
[443,]       3        1  0.1268668584
[444,]       2        3 -0.1920693956
[445,]       2        3 -0.1439091910
[446,]       2        3 -0.1033094921
[447,]       2        3 -0.1047141950
[448,]       2        1 -0.0337429758
[449,]       2        1 -0.0117502420
[450,]       2        1  0.0196058964
[451,]       2        1  0.0266689370
[452,]       2        1  0.0529261618
[453,]       2        1  0.0772452448
[454,]       2        1  0.0971065190
[455,]       2        1  0.1188123298
[456,]       2        1  0.1232753290
[457,]       2        1  0.1542382084
[458,]       2        1  0.1725369727
[459,]       2        1  0.1952174051
[460,]       2        1  0.2076209990
[461,]       2        1  0.1921943303
[462,]       2        1  0.2352083811
[463,]       2        1  0.2476105856
[464,]       2        1  0.2695798030
[465,]       2        1  0.2670900654
[466,]       2        1  0.2771332502
[467,]       2        1  0.2882427482
[468,]       2        1  0.2960794528
[469,]       2        1  0.3068070000
[470,]       2        1  0.3105766239
[471,]       2        1  0.3196928293
[472,]       2        1  0.3207432648
[473,]       2        1  0.3309884220
[474,]       2        1  0.3362267538
[475,]       2        1  0.3373919298
[476,]       2        1  0.3398359441
[477,]       2        1  0.3432529347
[478,]       2        1  0.3436585118
[479,]       2        1  0.3443256364
[480,]       2        1  0.3440616306
[481,]       2        1  0.3439872075
[482,]       2        1  0.3412717064
[483,]       2        1  0.3381547078
[484,]       2        1  0.3359201613
[485,]       2        1  0.3296962292
[486,]       2        1  0.3269160806
[487,]       2        1  0.3260575774
[488,]       2        1  0.3162255118
[489,]       2        1  0.3106546557
[490,]       2        1  0.2997829252
[491,]       2        1  0.2958988414
[492,]       2        1  0.2841561314
[493,]       2        1  0.2767579029
[494,]       2        1  0.2641364568
[495,]       2        1  0.2510545544
[496,]       2        1  0.2340971894
[497,]       2        1  0.2358055083
[498,]       2        1  0.2152026838
[499,]       2        1  0.2053292539
[500,]       2        1  0.1897890585
[501,]       2        1  0.1671038365
[502,]       2        1  0.1555863673
[503,]       2        1  0.1434066081
[504,]       2        1  0.1361001244
[505,]       2        1  0.1101085354
[506,]       2        1  0.0948280083
[507,]       2        1  0.0709776177
[508,]       2        1  0.0429322217
[509,]       2        1  0.0189664012
[510,]       2        1  0.0079457208
[511,]       2        1 -0.0159681337
[512,]       2        1 -0.0307185815
[513,]       2        1 -0.0648798185
[514,]       2        1 -0.0718442296
[515,]       2        1 -0.0900063293
[516,]       1        2  0.7194586261
[517,]       1        2  0.7126003403
[518,]       1        2  0.7078650667
[519,]       1        2  0.7154588132
[520,]       1        2  0.6889921366
[521,]       1        2  0.7157312280
[522,]       1        2  0.7161259551
[523,]       1        2  0.7182939617
[524,]       1        2  0.7025809267
[525,]       1        2  0.7155752719
[526,]       1        2  0.7085123532
[527,]       1        2  0.6874577355
[528,]       1        2  0.7157258598
[529,]       1        2  0.6829578248
[530,]       1        2  0.7136481339
[531,]       1        2  0.7195892113
[532,]       1        2  0.7031891585
[533,]       1        2  0.6939712169
[534,]       1        2  0.7184672654
[535,]       1        2  0.6848137301
[536,]       1        2  0.7136443000
[537,]       1        2  0.7155191205
[538,]       1        2  0.7113957470
[539,]       1        2  0.7066281923
[540,]       1        2  0.6977437121
[541,]       1        2  0.7014530453
[542,]       1        2  0.7186869408
[543,]       1        2  0.7140892556
[544,]       1        2  0.7129122151
[545,]       1        2  0.6863474354
[546,]       1        2  0.7156692573
[547,]       1        2  0.7026951043
[548,]       1        2  0.7131915471
[549,]       1        2  0.7161091583
[550,]       1        2  0.7078918669
[551,]       1        2  0.7070338821
[552,]       1        2  0.6977542978
[553,]       1        2  0.7165462703
[554,]       1        2  0.6929283504
[555,]       1        2  0.7147788757
[556,]       1        2  0.7179418170
[557,]       1        2  0.7169659225
[558,]       1        2  0.6820416424
[559,]       1        2  0.7139416462
[560,]       1        2  0.7186798511
[561,]       1        2  0.7112442737
[562,]       1        2  0.6943464664
[563,]       1        2  0.7175512220
[564,]       1        2  0.7178258235
[565,]       1        2  0.6987702185
[566,]       1        2  0.7154975946
[567,]       1        2  0.7165008160
[568,]       1        2  0.7181270686
[569,]       1        2  0.7117132634
[570,]       1        2  0.7043558817
[571,]       1        2  0.7117896673
[572,]       1        2  0.7193841117
[573,]       1        2  0.7147362689
[574,]       1        2  0.7191197478
[575,]       1        2  0.7058685805
[576,]       1        2  0.7152698410
[577,]       1        2  0.7176984518
[578,]       1        2  0.7137432147
[579,]       1        2  0.7107300225
[580,]       1        2  0.7078943552
[581,]       1        2  0.6994329383
[582,]       1        2  0.7152668480
[583,]       1        2  0.7135877388
[584,]       1        2  0.7169215878
[585,]       1        2  0.7062863310
[586,]       1        2  0.7158576228
[587,]       1        2  0.7182166807
[588,]       1        2  0.7143759637
[589,]       1        2  0.7148280839
[590,]       1        2  0.7139692175
[591,]       1        2  0.7155591201
[592,]       1        2  0.7183526619
[593,]       1        2  0.6979442394
[594,]       1        2  0.6996095993
[595,]       1        2  0.7173556666
[596,]       1        2  0.7154599281
[597,]       1        2  0.7161784074
[598,]       1        2  0.6959214095
[599,]       1        2  0.7122654793
[600,]       1        2  0.7133348198
[601,]       1        2  0.6850348922
[602,]       1        2  0.7126085748
[603,]       1        2  0.7172868159
[604,]       1        2  0.7026114032
[605,]       1        2  0.7021910666
[606,]       1        2  0.6907972078
[607,]       1        2  0.7162829631
[608,]       1        2  0.6970096005
[609,]       1        2  0.7177221866
[610,]       1        2  0.7138495299
[611,]       1        2  0.7134340747
[612,]       1        2  0.7081750815
[613,]       1        2  0.7101077186
[614,]       1        2  0.7127938399
[615,]       1        2  0.7084858790
[616,]       1        2  0.6823406592
[617,]       1        2  0.7124535536
[618,]       1        2  0.6792718718
[619,]       1        2  0.6926259922
[620,]       1        2  0.7058947099
[621,]       1        2  0.7161562292
[622,]       1        2  0.7151808886
[623,]       1        2  0.7167950751
[624,]       1        2  0.7192674020
[625,]       1        2  0.7118496077
[626,]       1        2  0.7141912268
[627,]       1        2  0.7082100887
[628,]       1        2  0.6890731984
[629,]       1        2  0.7172719109
[630,]       1        2  0.7133080025
[631,]       1        2  0.7088588928
[632,]       1        2  0.7195429091
[633,]       1        2  0.7006307408
[634,]       1        2  0.7017471062
[635,]       1        2  0.7117068413
[636,]       1        2  0.7195722579
[637,]       1        2  0.7140933594
[638,]       1        2  0.7149497133
[639,]       1        2  0.7080015514
[640,]       1        2  0.7089124255
[641,]       1        2  0.6940853615
[642,]       1        2  0.7033987098
[643,]       1        2  0.6995199482
[644,]       1        2  0.7178385681
[645,]       1        2  0.6958452888
[646,]       1        2  0.6980095928
[647,]       1        2  0.7037446528
[648,]       1        2  0.7191349563
[649,]       1        2  0.7122520895
[650,]       1        2  0.7123384211
[651,]       1        2  0.7185863418
[652,]       1        2  0.6974692717
[653,]       1        2  0.6835535815
[654,]       1        2  0.7164486020
[655,]       1        2  0.6822646328
[656,]       1        2  0.7151776323
[657,]       1        2  0.7171115039
[658,]       1        2  0.7128139338
[659,]       1        2  0.7194983619
[660,]       1        2  0.7147913818
[661,]       1        2  0.6938270910
[662,]       1        2  0.7050664628
[663,]       1        2  0.7183465395
[664,]       1        2  0.7135993063
[665,]       1        2  0.7163468971
[666,]       1        2  0.7184043753
[667,]       1        2  0.7192190007
[668,]       1        2  0.7171767622
[669,]       1        2  0.7092021858
[670,]       1        2  0.7188236721
[671,]       1        2  0.7192403135
[672,]       1        2  0.7195211874
[673,]       1        2  0.7111614013
[674,]       1        2  0.7132527234
[675,]       1        2  0.7183784408
[676,]       1        2  0.7191635211
[677,]       1        2  0.7179365293
[678,]       1        2  0.7144677114
[679,]       1        2  0.7158052085
[680,]       1        2  0.7000482744
[681,]       1        2  0.7021284744
[682,]       1        2  0.7018523838
[683,]       1        2  0.6936554319
[684,]       1        2  0.7150193073
[685,]       1        2  0.7155072742
[686,]       1        2  0.7185993558
[687,]       1        2  0.7001091800
[688,]       1        2  0.7067232903
[689,]       1        2  0.7058958987
[690,]       1        2  0.7118713086
[691,]       1        2  0.7019908157
[692,]       1        2  0.6791885315
[693,]       1        2  0.6833739040
[694,]       1        2  0.7193144291
[695,]       1        2  0.7166545778
[696,]       1        2  0.7185293779
[697,]       1        2  0.7184840167
[698,]       1        2  0.7047254626
[699,]       1        2  0.7151919754
[700,]       1        2  0.7103019501
[701,]       1        2  0.7149707376
[702,]       1        2  0.7165311166
[703,]       1        2  0.7182660152
[704,]       1        2  0.7069409192
[705,]       1        2  0.7170041655
[706,]       1        2  0.6856986708
[707,]       1        2  0.7170141386
[708,]       1        2  0.7073347780
[709,]       1        2  0.7145265371
[710,]       1        2  0.7071561045
[711,]       1        2  0.7058253846
[712,]       1        2  0.6985016477
[713,]       1        2  0.7139198604
[714,]       1        2  0.7045363120
[715,]       1        2  0.7173238424
[716,]       1        2  0.7013637463
[717,]       1        2  0.7179324746
[718,]       1        2  0.7190300021
[719,]       1        2  0.7158916826
[720,]       1        2  0.7136775007
[721,]       1        2  0.7132595524
[722,]       1        2  0.7168523081
[723,]       1        2  0.7177886179
[724,]       1        2  0.6972896345
[725,]       1        2  0.7129491776
[726,]       1        2  0.7163367590
[727,]       1        2  0.7154692685
[728,]       1        2  0.6926432506
[729,]       1        2  0.7158837112
[730,]       1        2  0.7057459452
[731,]       1        2  0.7156055132
[732,]       1        2  0.7165994344
[733,]       1        2  0.6968787254
[734,]       1        2  0.7196605774
[735,]       1        2  0.7027846637
[736,]       1        2  0.7114117763
[737,]       1        2  0.7177333445
[738,]       1        2  0.7035640218
[739,]       1        2  0.7144903750
[740,]       1        2  0.7073011318
[741,]       1        2  0.7064271717
[742,]       1        2  0.7027866380
[743,]       1        2  0.7128544122
[744,]       1        2  0.7156698536
[745,]       1        2  0.7043562561
[746,]       1        2  0.7181057892
[747,]       1        2  0.7162652195
[748,]       1        2  0.6960458810
[749,]       1        2  0.7082986713
[750,]       1        2  0.7116558372
[751,]       1        2  0.7176056078
[752,]       1        2  0.7193357569
[753,]       1        2  0.6873516791
[754,]       1        2  0.6947181429
[755,]       1        2  0.7067818719
[756,]       1        2  0.7137661868
[757,]       1        2  0.7059428501
[758,]       1        2  0.7174437434
[759,]       1        2  0.6894597463
[760,]       1        2  0.7196612619
[761,]       1        2  0.7120142327
[762,]       1        2  0.7187461453
[763,]       1        2  0.6870874099
[764,]       1        2  0.7181451756
[765,]       1        2  0.7125012989
[766,]       1        2  0.7160844625
[767,]       1        2  0.6975816523
[768,]       1        2  0.7132230436
[769,]       1        2  0.7152825960
[770,]       1        2  0.7183232772
[771,]       1        2  0.7155833424
[772,]       1        2  0.7126502653
[773,]       1        2  0.7168750941
[774,]       1        2  0.7035449535
[775,]       1        2  0.7010743244
[776,]       1        2  0.7171248459
[777,]       1        2  0.7094727143
[778,]       1        2  0.7101114895
[779,]       1        2  0.7084387668
[780,]       1        2  0.7151197315
[781,]       1        2  0.7118932964
[782,]       1        2  0.7089226174
[783,]       1        2  0.7175735130
[784,]       1        2  0.6938707060
[785,]       1        2  0.7062089122
[786,]       1        2  0.7187005400
[787,]       1        2  0.6953918018
[788,]       1        2  0.6923625068
[789,]       1        2  0.6948760045
[790,]       1        2  0.7101632144
[791,]       1        2  0.7116406536
[792,]       1        2  0.7164076526
[793,]       1        2  0.7170841641
[794,]       1        2  0.7017184402
[795,]       1        2  0.6925782537
[796,]       1        2  0.7143852161
[797,]       1        2  0.7151485989
[798,]       1        2  0.7125936957
[799,]       1        2  0.6819930369
[800,]       1        2  0.6945746310
[801,]       1        2  0.6965342800
[802,]       1        2  0.7011868853
[803,]       1        2  0.7174057590
[804,]       1        2  0.7139207058
[805,]       1        2  0.6958581471
[806,]       1        2  0.7120078388
[807,]       1        2  0.7014996976
[808,]       1        2  0.7014740779
[809,]       1        2  0.7176516320
[810,]       1        2  0.7141088768
[811,]       1        2  0.6867720110
[812,]       1        2  0.7060182830
[813,]       1        2  0.6992933627
[814,]       1        2  0.6946248572
[815,]       1        2  0.7154615615
attr(,"Ordered")
[1] FALSE
attr(,"call")
silhouette.default(x = ward_clusters_two_s, dist = dist(two_spirals_sphere_scaled))
attr(,"class")
[1] "silhouette"
avg_two_s_ward <- mean(two_s_ward_sils[, "sil_width"])
title_two_single   <- paste("Two spirals – single (s =",   round(avg_two_s_single, 3),   ")")
title_two_complete <- paste("Two spirals – complete (s =", round(avg_two_s_complete, 3), ")")
title_two_average  <- paste("Two spirals – average (s =",  round(avg_two_s_average, 3),  ")")
title_two_ward     <- paste("Two spirals – ward (s =",     round(avg_two_s_ward, 3),     ")")
p_ring_single <- ggplot(ring_moon_with_clusters,
                        aes(x, y, colour = sing_clust)) +
  geom_point() +
  coord_equal() +
  ggtitle(paste("Single linkage (s =", round(avg_ring_m_single, 3), ")")) +
  theme_minimal() +
  theme(legend.position = "none")

p_ring_complete <- ggplot(ring_moon_with_clusters,
                          aes(x, y, colour = comp_clust)) +
  geom_point() +
  coord_equal() +
  ggtitle(paste("Complete linkage (s =", round(avg_ring_m_complete, 3), ")")) +
  theme_minimal() +
  theme(legend.position = "none")

p_ring_average <- ggplot(ring_moon_with_clusters,
                         aes(x, y, colour = ave_clust)) +
  geom_point() +
  coord_equal() +
  ggtitle(paste("Average linkage (s =", round(avg_ring_m_average, 3), ")")) +
  theme_minimal() +
  theme(legend.position = "none")

p_ring_ward <- ggplot(ring_moon_with_clusters,
                      aes(x, y, colour = ward_clust)) +
  geom_point() +
  coord_equal() +
  ggtitle(paste("Ward linkage (s =", round(avg_ring_m_ward, 3), ")")) +
  theme_minimal() +
  theme(legend.position = "none")
p_three_single <- ggplot(three_spheres_with_clusters,
                         aes(x, y, colour = sing_clust)) +
  geom_point() +
  coord_equal() +
  ggtitle(paste("Single linkage (s =", round(avg_three_s_single, 3), ")")) +
  theme_minimal() +
  theme(legend.position = "none")

p_three_complete <- ggplot(three_spheres_with_clusters,
                           aes(x, y, colour = comp_clust)) +
  geom_point() +
  coord_equal() +
  ggtitle(paste("Complete linkage (s =", round(avg_three_s_complete, 3), ")")) +
  theme_minimal() +
  theme(legend.position = "none")

p_three_average <- ggplot(three_spheres_with_clusters,
                          aes(x, y, colour = ave_clust)) +
  geom_point() +
  coord_equal() +
  ggtitle(paste("Average linkage (s =", round(avg_three_s_average, 3), ")")) +
  theme_minimal() +
  theme(legend.position = "none")

p_three_ward <- ggplot(three_spheres_with_clusters,
                       aes(x, y, colour = ward_clust)) +
  geom_point() +
  coord_equal() +
  ggtitle(paste("Ward linkage (s =", round(avg_three_s_ward, 3), ")")) +
  theme_minimal() +
  theme(legend.position = "none")
p_two_single <- ggplot(two_spirals_with_clusters,
                       aes(x, y, colour = sing_clust)) +
  geom_point() +
  coord_equal() +
  labs(title = title_two_single) +
  theme_minimal() +
  theme(legend.position = "none")

p_two_complete <- ggplot(two_spirals_with_clusters,
                         aes(x, y, colour = comp_clust)) +
  geom_point() +
  coord_equal() +
  labs(title = title_two_complete) +
  theme_minimal() +
  theme(legend.position = "none")

p_two_average <- ggplot(two_spirals_with_clusters,
                        aes(x, y, colour = ave_clust)) +
  geom_point() +
  coord_equal() +
  labs(title = title_two_average) +
  theme_minimal() +
  theme(legend.position = "none")

p_two_ward <- ggplot(two_spirals_with_clusters,
                     aes(x, y, colour = ward_clust)) +
  geom_point() +
  coord_equal() +
  labs(title = title_two_ward) +
  theme_minimal() +
  theme(legend.position = "none")
(p_three_single  | p_three_complete  | p_three_average  | p_three_ward) /
(p_ring_single   | p_ring_complete   | p_ring_average   | p_ring_ward) /
(p_two_single    | p_two_complete    | p_two_average    | p_two_ward)

Perform agglomerative clustering with single, complete, average, and Ward linkages. Cut each tree to produce three clusters. Produce 12 scatterplots, one per data set/linkage combination, showing the 3-cluster solution. Title each graph with the linkage used, as well as the average silhouette width (\(\bar s\)) for that clustering solution. Use patchwork to create a nice 4x3 grid of your plots.

Discuss the following:

  1. Which linkage works best for which scenario?

    Three spheres: all linkages are 0.72 - which are decently high silhouettes scores - indicates that they performed equally well and it’s hard to pick one or the other

    Ring-moon-sphere: average (0.587) ward (0.586) complete (0.488) single (0.145)

    Average and ward worked the best here and they did a pretty similar job, while the single and complete linkages performed the worst

    Two spirals: average(0.422) ward (0.423) complete (0.386) single (0.158)

    Average and ward also performed the best here, but they didn’t do a super great job. Similar to the ring-moon-sphere, the single and complete linkages performed the worst

  2. Does the average silhouette width always do a good job of measuring the quality of the clustering solution?

    Using average silhouette width can give a good measure of the overall cluster quality, but it doesn’t necessarily mean it will be entirely accurate. When the clusters are not convex, rather than compact and convex, the estimates will not be as accurate.

(Hint: you have a lot of repetitive code to write. You may find it helpful to write a function that takes a data set and a linkage method as arguments, does the clustering and computes average silhouette width, and produces the desired plot.)

Question 2

Consider the data set below on milk content of 25 mammals. The variables have been pre-scaled to z-scores, hence no additional standardizing is necessary. (Data source: Everitt et al. Cluster analysis 4ed)

mammals <- read.csv('Data/mammal_milk.csv') %>% 
  column_to_rownames('Mammal')

A)

Perform agglomerative clustering with single, complete, average, and Ward linkages. Which has the best agglomerative coefficient?

cluster_mammals <- agnes(mammals, metric='euclidean', method='single')
cluster_mammals <- agnes(mammals, metric='euclidean', method='complete')
cluster_mammals <- agnes(mammals, metric='euclidean', method='average')
cluster_mammals <- agnes(mammals, metric='euclidean', method='ward')
(mammals_single <- agnes(mammals, method='single'))$ac
[1] 0.7875718
(mammals_complete <- agnes(mammals, method='complete'))$ac
[1] 0.8985539
(mammals_average <- agnes(mammals, method='average'))$ac
[1] 0.8706571
(mammals_ward <- agnes(mammals, method='ward'))$ac
[1] 0.9413994

The linkage with the best agglomerative coefficient in this situation is the Ward linkage.

B)

Plot a dendrogram of the method with the highest AC. Which mammals cluster together first?

mammals_ward_tree <- agnes(mammals, method = "ward")

mammals_ward_plot <- fviz_dend(mammals_ward_tree) + ggtitle("Ward linkage dendrogram")
Warning: `aes_string()` was deprecated in ggplot2 3.0.0.
ℹ Please use tidy evaluation idioms with `aes()`.
ℹ See also `vignette("ggplot2-in-packages")` for more information.
ℹ The deprecated feature was likely used in the factoextra package.
  Please report the issue at <https://github.com/kassambara/factoextra/issues>.
Warning: Using `size` aesthetic for lines was deprecated in ggplot2 3.4.0.
ℹ Please use `linewidth` instead.
ℹ The deprecated feature was likely used in the factoextra package.
  Please report the issue at <https://github.com/kassambara/factoextra/issues>.
Warning: The `<scale>` argument of `guides()` cannot be `FALSE`. Use "none" instead as
of ggplot2 3.3.4.
ℹ The deprecated feature was likely used in the factoextra package.
  Please report the issue at <https://github.com/kassambara/factoextra/issues>.
mammals_ward_plot

The mammals that cluster together first are bison and llama, followed by camel and zebra.

C)

If the tree is cut at a height of 4, how many clusters will form? Which cluster will have the fewest mammals, and which mammals will they be?

fviz_dend(mammals_ward, h = 4) + 
  labs(title='Ward linkage')

Clusters formed: 4

Fewest mammals: cluster 1, only 5 mammals

Which mammals: bison, llama, camel, zebra, elephant

D)

Use WSS and average silhouette method to suggest the optimal number of clusters. Re-create the dendrogram with the cluster memberships indicated.

fviz_nbclust(mammals,
             FUNcluster = hcut,
             k.max = 10,
             method='wss',
             hc_method='ward',
             hc_func = 'agnes')

fviz_nbclust(mammals,
             FUNcluster = hcut,
             k.max = 10,
             method='silhouette',
             hc_method='ward',
             hc_func = 'agnes')

WSS plot: seems to suggest 3 clusters

Average silhouette: also seems to suggest 3 clusters

mammals_clusters_3 <- cutree(as.hclust(mammals_ward_tree), k = 3)

fviz_dend(mammals_ward_tree, k = 3) + labs(title = "Ward linkage dendrogram (k = 3 clusters)")

E)

Use suitable visualizations, including dimension reduction techniques, to explore the different milk characteristics of the assigned clusters. Discuss.

mammals_pca <- prcomp(mammals, center=TRUE, scale. = TRUE)
k3_biplot <- fviz_pca(mammals_pca,
  habillage = factor(mammals_clusters_3),  
  repel = TRUE) +
  ggtitle("3-cluster solution") +
  guides(color = "none", shape = "none")

k3_biplot

mammals_dist <- dist(mammals)

mammals_sils_3 <- silhouette(x = mammals_clusters_3,
                             dist = mammals_dist)

head(mammals_sils_3)
     cluster neighbor sil_width
[1,]       1        2 0.6206877
[2,]       1        2 0.5331256
[3,]       1        2 0.6686388
[4,]       1        2 0.1739062
[5,]       2        3 0.6464723
[6,]       2        1 0.3426564
fviz_silhouette(mammals_sils_3)
  cluster size ave.sil.width
1       1   17          0.53
2       2    6          0.54
3       3    2          0.70

Biplot:

-Seal and dolpin milk is high in fat

-Green cluster mammals have milk with more protein and ash

-Red cluster mammals have milk with more water and lactose

  • Overall, the mammals can be clearly separated based on their milk types

Silhouette plot:

-Shows an average of 0.55 = decent fit