In[710]:=
Out[710]=
In[711]:=
Out[711]=
In[712]:=
Out[712]=
In[713]:=
Out[713]=
In[714]:=
Out[714]=
In[715]:=
Out[715]=
In[716]:=
Out[716]=
In[717]:=
Out[717]=
In[718]:=
Out[718]//InputForm=
Graphics3D[GraphicsComplex[{{-2.974850065734247, -0.26798610688774166, -0.33576871496825955},
{-2.9657820471601117, -0.32326214614615073, 0.6626612177375959}, {-2.735193546216759, 0.7015048854324545,
-0.2842714484125729}, {-2.726125527642618, 0.6462288461740774, 0.714158484293295},
{-2.6861307391068276, -1.1546461922980435, -0.6969820084280351}, {-2.671458376843278, -1.2440847025815651,
0.9185115580753446}, {-2.562359532841466, 0.18768128720615188, -1.1245771747565017},
{-2.538619152003756, 0.042966737664256766, 1.4893463244527467}, {-2.498624363467964, -1.7579083008078997,
0.07820583173139506}, {-2.441205200402384, 1.4889804102872317, 0.2574417139529179},
{-2.273640206214023, -0.6989787982041394, -1.4857904682162477}, {-2.2442954816869163, -0.8778558187711684,
1.7451966647904777}, {-1.9887198789738045, 0.14377276590906454, -1.942507238556617},
{-1.9793165358971625, -1.6198013546395502, -1.22994012787849}, {-1.9555761550595068, -1.7645159041814453,
1.3839833713307161}, {-1.9503071358725306, -0.09038029391638766, 2.2869098271559674},
{-1.7926880512030738, 2.2493189765846413, 0.2936462964695574}, {-1.7918101602583043, -2.2230634631493746,
-0.4547522877190612}, {-1.782742141684214, -2.2783395024077517, 0.5436776449867918},
{-1.2333854350965194, 0.5865508842808166, -2.4256401558617178}, {-1.2181705063906259, -2.2669719844464513,
-1.2726823515191992}, {-1.194430125552973, -2.4116865339883855, 1.3412411476900217},
{-1.1859046734211047, 0.29712178519703, 2.8022068425567594}, {-1.0373536073257734, 2.692097094956436,
-0.18948662083551715}, {-1.0282855887516398, 2.6368210556980554, 0.8089433118703536},
{-0.584868285897201, 1.3468894505782443, -2.389435573345068}, {-0.5373875242217931, 1.0574603514944327,
2.8384114250734034}, {-0.46371395345811955, 2.6481885736593096, -1.007416684635657},
{-0.4399735726204161, 2.5034740241174074, 1.6065068145735828}, {-0.2961489592697985, 0.4602293651679636,
-2.750648866804846}, {-0.2908799400828261, 2.1343649754330176, -1.8477224109795771},
{-0.28093403056391025, -2.3932935035593434, -1.597691062462336},
{-0.25246719698155545, 1.9002119156075905, 2.3816946547330295},
{-0.25158930603681856, -2.5721705241264115, 1.6332960705444002},
{-0.24306385390494872, 0.1366377950589969, 3.094261765411138}, {0.35382451101532564, 1.6832876337873215,
-2.4648815497663876}, {0.46499707023672593, -0.1869412646389906, -2.7933910904455566},
{0.4735225223686133, 2.5218670545464352, -1.3324253955787788}, {0.47440041331338145, -1.9505153851875414,
-2.0808239797674233}, {0.5028672468957407, 2.342990033979378, 1.8985617374279529},
{0.512813156414609, -2.1846684450129974, 2.1485930859451994}, {0.518082175601567, -0.5105328347479431,
3.0515195417704546}, {0.6425438376427419, 0.7966275483770408, -2.8260948432261497},
{0.6619067889522339, -2.553777493697366, -1.3056361396079548}, {0.6856471697899111, -2.698492043239286,
1.3082873596012792}, {0.7593207405536135, -1.1077638210744014, -2.537540750107827},
{0.8068015022289812, -1.39719292015822, 2.690306248310694}, {1.118226973466765, 2.0707897129007353,
-1.9495845343655893}, {1.250218805083448, -2.6871245252780245, -0.5080726369047214},
{1.2592868236575765, -2.742400564536405, 0.4903572958011505}, {1.4078378897529102, -0.34742525477699165,
-2.5013361675911723}, {1.416363341884774, 2.3613830644084057, -1.0403704727244043},
{1.440103722722471, 2.2166685148665035, 1.573553026484833}, {1.455318651428299, -0.6368543538608139,
2.7265108308273365}, {1.585384657158906, 0.6361435582390113, -2.5340399203717747},
{1.879373002973281, 1.4236190830937956, -1.9923267580062816}, {2.004675358016007, 2.2280360328277506,
-0.24280697002116802}, {2.013743376590136, 2.1727599935693735, 0.7556229626846988},
{2.0146212675348787, -2.299622446164621, 0.007224378496078994}, {2.1722403522043483, 0.040076824336411715,
-1.9860391521903438}, {2.177509371391298, 1.7142124346014695, -1.083112696365092},
{2.201249752228995, 1.5694978850595602, 1.5308108028441465}, {2.210653095305599, -0.19407623548902983,
2.243377913522265}, {2.4662286980187216, 0.8275523491911888, -1.444325989824851},
{2.495573422545844, 0.6486753286241279, 1.78666114318189}, {2.6631384167341947, -1.5392838798672146,
0.0434289610127211}, {2.7605523683355866, -0.09327020724424337, -1.188475649487097},
{2.784292749173265, -0.23798475678614914, 1.4254478497221368}, {2.948058743974439, -0.6965323157540605,
-0.4132878093276533}, {2.9571267625485658, -0.7518083550124376, 0.5851421233782147}},
Polygon[{{41, 45, 50, 59, 66, 70, 68, 63, 54, 47}, {42, 47, 54}, {12, 15, 22, 34, 41, 47, 42, 35, 23, 16},
{27, 23, 35}, {34, 45, 41}, {21, 32, 44, 49, 50, 45, 34, 22, 19, 18}, {15, 19, 22}, {49, 59, 50},
{51, 60, 67, 69, 66, 59, 49, 44, 39, 46}, {32, 39, 44}, {69, 70, 66},
{57, 58, 62, 65, 68, 70, 69, 67, 64, 61}, {60, 64, 67}, {65, 63, 68},
{33, 27, 35, 42, 54, 63, 65, 62, 53, 40}, {58, 53, 62}, {17, 24, 28, 31, 26, 20, 13, 7, 3, 10},
{4, 10, 3}, {27, 33, 29, 25, 17, 10, 4, 8, 16, 23}, {12, 16, 8}, {25, 24, 17},
{58, 57, 52, 38, 28, 24, 25, 29, 40, 53}, {33, 40, 29}, {38, 31, 28}, {61, 52, 57}, {30, 20, 26},
{32, 21, 14, 11, 13, 20, 30, 37, 46, 39}, {51, 46, 37}, {11, 7, 13}, {18, 14, 21}, {1, 5, 9, 6, 2},
{5, 1, 7, 11}, {5, 11, 14}, {9, 5, 14, 18}, {9, 18, 19}, {6, 9, 19, 15}, {6, 15, 12}, {2, 6, 12, 8},
{4, 2, 8}, {1, 2, 4, 3}, {1, 3, 7}, {36, 48, 56, 55, 43}, {48, 36, 31, 38}, {48, 38, 52},
{56, 48, 52, 61}, {56, 61, 64}, {55, 56, 64, 60}, {55, 60, 51}, {43, 55, 51, 37}, {30, 43, 37},
{36, 43, 30, 26}, {36, 26, 31}}]]]
In[719]:=
Out[719]=
In[720]:=
Out[720]=
In[721]:=
Out[721]=
Johnson Polyhedra
Geometry