| |
| Autor |
 Streichholzgraphen 4-regulär und 4/n-regulär (n>4) und 2/5 |
|
Slash
Aktiv 
Dabei seit: 23.03.2005
Mitteilungen: 9107
 |  Beitrag No.1640, vom Themenstarter, eingetragen 2019-01-24
|
\quoteon(2019-01-23 23:53 - haribo in Beitrag No. 1639)
96*1,5 wäre dann wieder 144 hölzer ,gell
\quoteoff
Ja, ein neuer Rekord wäre das nicht, aber vielleicht gibt's neue Ideen für Teilgraphen. Hab schon probiert ihn zusammenzuschieben, bekomme aber leider zwei 4er Knoten.
Ich frage mich gerade, ob ein Rahmen aus nur "M-Elementen", also die mit dem 3er nah am Rand, die optimale Lösung für Minimalität ist.
|
 Profil
|
haribo
Senior 
Dabei seit: 25.10.2012
Mitteilungen: 4352
 | Beitrag No.1641, eingetragen 2019-01-24
|
nahe der mittelsymetrie hast du ja die M´s zu häusern umgeschlagen... eins von beiden ist es meistens... in seltenen fällen könnten die beiden zur ausenkante opositionellen heftstreifen auch eine gemeinsame 2-lange gerade bilden
ähnlich wie in diesem floor 28 ansatz, sascha regt ja an sich evtl damit zu beschäftigen den teppich anzuheben...
https://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_dreier-girth5-flor28.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1642, vom Themenstarter, eingetragen 2019-01-24
|
Neue Idee mit 86 Knoten. Rahmen ist rotations-symmetrisch. 5*(3 M + 1 Haus) jeweils innen verbunden. Mitte ist asymmetrisch.
https://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_slash_3reg_girth5_neu1.jpg
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1643, vom Themenstarter, eingetragen 2019-01-24
|
Hier noch mal in ordentlich. Im blauen 72-Grad Tortenstück der Teilgraph mit 25 grünen Kanten. Die Beweglichkeit müsste ausreichend sein, um die vier inneren roten Kanten auf 1 zu bekommen. ...hoffe ich. ;-)
https://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_slash_3reg_girth5_86_129_asym.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1644, vom Themenstarter, eingetragen 2019-01-24
|
Vielleicht geht es sogar mit nur 4 Teilgraphen und 2 inneren Kanten. Das wär dann einer mit 68 Knoten und 102 Kanten, punkt-symmetrisch. Ist aber schon ein großes Gedränge mit den Heftstreifen.
https://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_slash_3reg_girth5_68.jpg
CAD Skizze
https://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_slash_3reg_girth5_68_102_sym.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1645, vom Themenstarter, eingetragen 2019-01-24
|
Rekord! :-)
68 Knoten, 68×Grad 3, 0 Dreiecke,
102 Kanten, minimal 0.99999999999999533706, maximal 1.00000000000000421885
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=0.99999999999999944489
|P68-P64|=0.99999999999999533706
\geo
ebene(572.57,627.42)
x(8.84,13.88)
y(7.59,13.11)
form(.)
#//Eingabe war:
#
##1622
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[78.50651766105952,-273.9771766322428];
#P[2]=[119.83480756477843,-167.97559446479673]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7); M(11,5,6,fuenfterWinkel);
#M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9); M(15,10,9,siebenterWinkel);
#N(16,15,14);
#N(17,12,16); M(18,11,12,achterWinkel); N(19,17,18); M(20,1,2,neunterWinkel);
#M(21,20,1,zehnterWinkel);
#M(22,20,21,elfterWinkel); N(23,2,21); M(24,22,20,zwölfterWinkel); N(25,24,21);
#M(26,22,24,dreizehnterWinkel);
#M(27,26,22,vierzehnterWinkel); N(28,27,24); M(29,28,24,fuenfzehnterWinkel);
#N(30,25,29); N(31,23,30);
#M(32,26,27,sechzehnterWinkel);
#A(18,32,ab(32,18,[1,32]));
#N(63,50,27); N(64,29,63); N(65,19,58); N(66,60,65); N(67,62,15); N(68,31,47);
#RA(66,67); RA(68,64);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(10.69002586864747961215,7.59190262251283520811,P1)
p(11.05327709912045719420,8.52359385009838455005,P2)
p(9.84476403542562295002,8.12625497190266266045,P3)
p(10.47814490805317433342,8.90009518162916890560,P4)
p(9.27261816198010713208,8.94640684777643357961,P5)
p(10.11412894392541339528,9.48664716825408937950,P6)
p(10.25136740259079992654,7.92614859016931738722,P7)
p(9.49868246550231987158,8.69846848787976334449,P8)
p(10.25227548426387969016,9.35580977068028829535,P9)
p(10.95111882208027687113,8.64053500585935729816,P10)
p(8.84345639971186336936,9.84963449450056671708,P11)
p(9.75403638599296485268,10.26296739735770557900,P12)
p(9.11415969780267154476,9.49448979592053809995,P13)
p(9.78232507092995184905,10.23850258758052156338,P14)
p(11.27116506794810746328,9.58793692717148182680,P15)
p(10.29326080950309396655,9.37888367722040428021,P16)
p(10.75403048282201012853,10.26640342807081651699,P17)
p(8.91818493535111223025,10.84683840843252511377,P18)
p(9.75455109459757530033,10.29866722379462373738,P19)
p(11.69002586864747961215,7.59190262251283520811,P20)
p(11.25165472185840087604,8.49069666881200291186,P21)
p(12.55605127243191887487,8.09190262251283520811,P22)
p(11.31523382287129564361,9.48867347110471825999,P23)
p(12.03951794356527571495,8.94816970711316272968,P24)
p(12.09260203555195545277,7.94957966150988859511,P25)
p(13.29989640223894298288,8.76025464268062847850,P26)
p(12.44326891804359291882,9.27619005852368516685,P27)
p(12.85025123975424499179,8.36275402364493736229,P28)
p(12.34771952955899010362,9.22731280143175425223,P29)
p(11.47617685393163711183,8.73699314594126263955,P30)
p(12.29842908065798212647,9.30611639765706399885,P31)
p(13.58156806283467865626,9.71976549494715769129,P32)
p(11.80972712953830949800,12.97470128086684759694,P33)
p(11.44647589906533369231,12.04301005328129647864,P34)
p(12.65498896276016616014,12.44034893147702014460,P35)
p(12.02160809013261655309,11.66650872175051212309,P36)
p(13.22713483620568375443,11.62019705560324744908,P37)
p(12.38562405426037749123,11.07995673512559164919,P38)
p(12.24838559559499095997,12.64045531321036364147,P39)
p(13.00107053268347101493,11.86813541549991768420,P40)
p(12.24747751392191119635,11.21079413269939273334,P41)
p(11.54863417610551401538,11.92606889752032373053,P42)
p(13.65629659847392751715,10.71696940887911431162,P43)
p(12.74571661219282603383,10.30363650602197544970,P44)
p(13.38559330038311934175,11.07211410745914292875,P45)
p(12.71742792725583903746,10.32810131579916124167,P46)
p(11.22858793023768342323,10.97866697620820097825,P47)
p(12.20649218868269514360,11.18772022615927852485,P48)
p(11.74572251536377898162,10.30020047530886628806,P49)
p(12.74520190358821380983,10.26793667958505729132,P50)
p(10.80972712953830949800,12.97470128086684759694,P51)
p(11.24809827632739001047,12.07590723456767634048,P52)
p(9.94370172575387556435,12.47470128086684582058,P53)
p(11.18451917531449524290,11.07793043227496454506,P54)
p(10.46023505462051517156,11.61843419626651652266,P55)
p(10.40715096263383543373,12.61702424186979243359,P56)
p(9.19985659594684790363,11.80634926069905255019,P57)
p(10.05648408014219619133,11.29041384485599586185,P58)
p(9.64950175843154767108,12.20384987973474366640,P59)
p(10.15203346862679900653,11.33929110194792855282,P60)
p(11.02357614425415377468,11.82961075743841838914,P61)
p(10.20132391752780698368,11.26048750572261702985,P62)
p(13.41233361398236922923,9.52299689612160982222,P63)
p(12.65696366530099048475,10.17829548503287107053,P64)
p(9.08741938420342165728,11.04360700725807298284,P65)
p(9.84278933288480040176,10.38830841834680995817,P66)
p(10.83769633435800550103,10.48910553348208374302,P67)
p(11.66205666382778893819,10.07749836989760083839,P68)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15)
s(P15,P16) s(P14,P16)
s(P12,P17) s(P16,P17)
s(P11,P18) s(P57,P18)
s(P17,P19) s(P18,P19)
s(P1,P20)
s(P20,P21)
s(P20,P22)
s(P2,P23) s(P21,P23)
s(P22,P24)
s(P24,P25) s(P21,P25)
s(P22,P26)
s(P26,P27)
s(P27,P28) s(P24,P28)
s(P28,P29)
s(P25,P30) s(P29,P30)
s(P23,P31) s(P30,P31)
s(P26,P32) s(P43,P32)
s(P33,P34)
s(P33,P35)
s(P35,P36)
s(P35,P37)
s(P37,P38)
s(P34,P39) s(P36,P39)
s(P36,P40) s(P38,P40)
s(P40,P41)
s(P39,P42) s(P41,P42)
s(P37,P43)
s(P43,P44)
s(P38,P45) s(P44,P45)
s(P41,P46) s(P45,P46)
s(P42,P47)
s(P46,P48) s(P47,P48)
s(P44,P49) s(P48,P49)
s(P49,P50) s(P32,P50)
s(P33,P51)
s(P51,P52)
s(P51,P53)
s(P34,P54) s(P52,P54)
s(P53,P55)
s(P52,P56) s(P55,P56)
s(P53,P57)
s(P57,P58)
s(P55,P59) s(P58,P59)
s(P59,P60)
s(P56,P61) s(P60,P61)
s(P54,P62) s(P61,P62)
s(P50,P63) s(P27,P63)
s(P29,P64) s(P63,P64)
s(P19,P65) s(P58,P65)
s(P60,P66) s(P65,P66) s(P67,P66)
s(P62,P67) s(P15,P67)
s(P31,P68) s(P47,P68) s(P64,P68)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P18,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P20,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P1,P20,MA19) m(P20,P21,MB19) b(P20,MA19,MB19)
color(#90EE90) m(P21,P20,MA110) m(P20,P22,MB110) b(P20,MA110,MB110)
color(#D3D3D3) m(P20,P22,MA111) m(P22,P24,MB111) b(P22,MA111,MB111)
color(#FFB6C1) m(P24,P22,MA112) m(P22,P26,MB112) b(P22,MA112,MB112)
color(#FFA07A) m(P22,P26,MA113) m(P26,P27,MB113) b(P26,MA113,MB113)
color(#20B2AA) m(P24,P28,MA114) m(P28,P29,MB114) b(P28,MA114,MB114)
color(#87CEFA) m(P27,P26,MA115) m(P26,P32,MB115) b(P26,MA115,MB115)
pen(2)
color(limegreen) s(P66,P67)
color(limegreen) s(P68,P64)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
Keine Überscheidung bei P28 bzw. P59. Man kann ihn bestimmt noch schöner verziehen. Feinjustieren klappt erst, wenn die Mess-Kante(n) schon fast 1 ist.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1646, eingetragen 2019-01-24
|
dear slash hier die vorschusslorberen mit heftsreifen ans rever geheftet!
haribo
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1647, vom Themenstarter, eingetragen 2019-01-24
|
Hier ist noch eine schöne Lösung. Da nur eine Kante auf 1 gebracht werden muss, ist auch der Beweis einfach.
68 Knoten, 68×Grad 3, 0 Dreiecke,
102 Kanten, minimal 0.99999999999995214939, maximal 1.00000000000000133227
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=0.99999999999995214939
|P68-P64|=0.99999999999995314859
\geo
ebene(386.38,345.76)
x(10.9,16.37)
y(8.73,13.62)
form(.)
#//Eingabe war:
#
##1622
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[389.0488267091568,-46.439338559841474];
#P[2]=[340.7027208567048,5.07052775038872]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7); M(11,5,6,fuenfterWinkel); M
#
#(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9); M(15,10,9,siebenterWinkel);
#N(16,15,14);
#N(17,12,16); M(18,11,12,achterWinkel); N(19,17,18); M(20,1,2,neunterWinkel);
#M(21,20,1,zehnterWinkel);
#M(22,20,21,elfterWinkel); N(23,2,21); M(24,22,20,zwölfterWinkel); N(25,24,21);
#M(26,22,24,dreizehnterWinkel);
#M(27,26,22,vierzehnterWinkel); N(28,27,24); M(29,28,24,fuenfzehnterWinkel);
#N(30,25,29); N(31,23,30);
#M(32,26,27,sechzehnterWinkel);
#A(18,32,ab(32,18,[1,32]));
#N(63,50,27); N(64,29,63); N(65,19,58); N(66,60,65); N(67,62,15); N(68,31,47);
#RA(66,67); RA(68,64);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(15.50715366310646636805,9.34263116631048617933,P1)
p(14.82279371735265094401,10.07177550363186568916,P2)
p(14.71470741207696164565,8.73268941562499279030,P3)
p(14.29866004862624961902,9.64203236048447287487,P4)
p(13.71473002212379199705,8.72596486490038891759,P5)
p(13.58965148400951505891,9.71811170851941419357,P6)
p(15.15724607684257563278,9.12936284495647321080,P7)
p(13.84447611206136663498,8.75112442373318977218,P8)
p(13.78956310975622301385,9.74961556649702743016,P9)
p(14.74617892192161150433,10.04096790974340436264,P10)
p(12.71475263217062412480,8.73268941562499101394,P11)
p(12.73892817055113724223,9.73239714458581772760,P12)
p(13.14909519283175853843,8.82038672039459825669,P13)
p(12.78957074140130600881,9.75352238514203051523,P14)
p(14.06496039982095069831,10.77304804548469796543,P15)
p(13.78784709094960625464,9.81221079909674998021,P16)
p(13.19885850182833131328,10.62035214928552129265,P17)
p(11.84947249447947115186,9.23397803839353237265,P18)
p(12.70585056703777127041,9.75032733571205412204,P19)
p(15.96912997064383077372,10.22952343218844539763,P20)
p(14.96917032076764542126,10.23850667322361651657,P21)
p(16.01300582783476755822,11.22856042307304846872,P22)
p(14.14913211058006226040,10.81081544812781380926,P23)
p(15.01338857781279934045,11.20089540077927736661,P24)
p(15.86669098889357343296,10.67947906497482968291,P25)
p(15.77506070912232161163,12.19983902392911545576,P26)
p(14.86702930087726848285,11.78093693317221202221,P27)
p(15.86542825763310560205,11.72437260564278460606,P28)
p(14.88238323741328628103,11.54100824645318645878,P29)
p(14.87632190642574769868,10.54102661648858507704,P30)
p(14.83334000537273844600,11.54010246755389346163,P31)
p(15.06101200363371361846,12.89993505033552168015,P32)
p(11.40333083500671840227,12.79128192241856787348,P33)
p(12.08769078076053204995,12.06213758509718836365,P34)
p(12.19577708603622312467,13.40122367310406126251,P35)
p(12.61182444948693515130,12.49188072824458117793,P36)
p(13.19575447598938922056,13.40794822382866513522,P37)
p(13.32083301410366971140,12.41580138020963985923,P38)
p(11.75323842127060736118,13.00455024377258084201,P39)
p(13.06600838605181635899,13.38278866499586428063,P40)
p(13.12092138835696175647,12.38429752223202484629,P41)
p(12.16430557619157148963,12.09294517898564969016,P42)
p(14.19573186594255886916,13.40122367310406303886,P43)
p(14.17155632756204752809,12.40151594414323632520,P44)
p(13.76138930528142800824,13.31352636833445579612,P45)
p(14.12091375671187520879,12.38039070358702353758,P46)
p(12.84552409829223229565,11.36086504324435608737,P47)
p(13.12263740716357851568,12.32170228963230229624,P48)
p(13.71162599628485168068,11.51356093944353098379,P49)
p(14.20463393107541349991,12.38358575301699815441,P50)
p(10.94135452746935222024,11.90438965654060865518,P51)
p(11.94131417734553757271,11.89540641550543753624,P52)
p(10.89747867027841365939,10.90535266565600558408,P53)
p(12.76135238753312073356,11.32309764060124024354,P54)
p(11.89709592030038365351,10.93301768794977668620,P55)
p(11.04379350921960956100,11.45443402375422436990,P56)
p(11.13542378899086138233,9.93407406479993859705,P57)
p(12.04345519723591451111,10.35297615555684203059,P58)
p(11.04505624048007739191,10.40954048308626944674,P59)
p(12.02810126069989848929,10.59290484227586759403,P60)
p(12.03416259168743707164,11.59288647224046897577,P61)
p(12.07714449274044632432,10.59381062117516059118,P62)
p(15.13756235965461449666,12.74364761874112872420,P63)
p(14.23839467841817807425,12.30604336713942359438,P64)
p(11.77292213845856849730,9.39026546998792532861,P65)
p(12.67208981969500669607,9.82786972158963045842,P66)
p(13.06529136860450890367,10.74732202700577943233,P67)
p(13.84519312950867586665,11.38659106172327284412,P68)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15)
s(P15,P16) s(P14,P16)
s(P12,P17) s(P16,P17)
s(P11,P18) s(P57,P18)
s(P17,P19) s(P18,P19)
s(P1,P20)
s(P20,P21)
s(P20,P22)
s(P2,P23) s(P21,P23)
s(P22,P24)
s(P24,P25) s(P21,P25)
s(P22,P26)
s(P26,P27)
s(P27,P28) s(P24,P28)
s(P28,P29)
s(P25,P30) s(P29,P30)
s(P23,P31) s(P30,P31)
s(P26,P32) s(P43,P32)
s(P33,P34)
s(P33,P35)
s(P35,P36)
s(P35,P37)
s(P37,P38)
s(P34,P39) s(P36,P39)
s(P36,P40) s(P38,P40)
s(P40,P41)
s(P39,P42) s(P41,P42)
s(P37,P43)
s(P43,P44)
s(P38,P45) s(P44,P45)
s(P41,P46) s(P45,P46)
s(P42,P47)
s(P46,P48) s(P47,P48)
s(P44,P49) s(P48,P49)
s(P49,P50) s(P32,P50)
s(P33,P51)
s(P51,P52)
s(P51,P53)
s(P34,P54) s(P52,P54)
s(P53,P55)
s(P52,P56) s(P55,P56)
s(P53,P57)
s(P57,P58)
s(P55,P59) s(P58,P59)
s(P59,P60)
s(P56,P61) s(P60,P61)
s(P54,P62) s(P61,P62)
s(P50,P63) s(P27,P63)
s(P29,P64) s(P63,P64)
s(P19,P65) s(P58,P65)
s(P60,P66) s(P65,P66) s(P67,P66)
s(P62,P67) s(P15,P67)
s(P31,P68) s(P47,P68) s(P64,P68)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P18,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P20,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P1,P20,MA19) m(P20,P21,MB19) b(P20,MA19,MB19)
color(#90EE90) m(P21,P20,MA110) m(P20,P22,MB110) b(P20,MA110,MB110)
color(#D3D3D3) m(P20,P22,MA111) m(P22,P24,MB111) b(P22,MA111,MB111)
color(#FFB6C1) m(P24,P22,MA112) m(P22,P26,MB112) b(P22,MA112,MB112)
color(#FFA07A) m(P22,P26,MA113) m(P26,P27,MB113) b(P26,MA113,MB113)
color(#20B2AA) m(P24,P28,MA114) m(P28,P29,MB114) b(P28,MA114,MB114)
color(#87CEFA) m(P27,P26,MA115) m(P26,P32,MB115) b(P26,MA115,MB115)
pen(2)
color(limegreen) s(P66,P67)
color(limegreen) s(P68,P64)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
https://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_slash_3_5_68.png
Etwas Taillen-Statistik: 32 Kreise mit 5 Knoten, 2 Kreise mit 7 Knoten und ein Kreis mit 14 Knoten.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1648, eingetragen 2019-01-25
|
na was meinste, kann man den in einen regelmässiges 16eck hinein drücken/schieben/ziehen ?
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1649, vom Themenstarter, eingetragen 2019-01-25
|
\quoteon(2019-01-25 15:31 - haribo in Beitrag No. 1648)
na was meinste, kann man den in einen regelmässiges 16eck hinein drücken/schieben/ziehen ?
\quoteoff
Vielleicht klappt das sogar. Das wäre dann die schönste Präsentationsform. Stefan findet dafür bestimmt eine günstigere Eingabe.
68 Knoten, 68×Grad 3, 0 Dreiecke,
102 Kanten, minimal 0.99999999999791433503, maximal 1.00000000000000133227
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=0.99999999999791433503
|P68-P64|=0.99999999999792543726
\geo
ebene(471.32,443.25)
x(8.84,14.41)
y(8.1,13.34)
form(.)
#//Eingabe war:
#
##1622
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[286.79706815434696,-95.89075926066492];
#P[2]=[236.84446791663976,-27.596377953959855]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7); M(11,5,6,fuenfterWinkel); M
#
#(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9); M(15,10,9,siebenterWinkel);
#N(16,15,14);
#N(17,12,16); M(18,11,12,achterWinkel); N(19,17,18); M(20,1,2,neunterWinkel);
#M(21,20,1,zehnterWinkel);
#M(22,20,21,elfterWinkel); N(23,2,21); M(24,22,20,zwölfterWinkel); N(25,24,21);
#M(26,22,24,dreizehnterWinkel);
#M(27,26,22,vierzehnterWinkel); N(28,27,24); M(29,28,24,fuenfzehnterWinkel);
#N(30,25,29); N(31,23,30);
#M(32,26,27,sechzehnterWinkel);
#A(18,32,ab(32,18,[1,32]));
#N(63,50,27); N(64,29,63); N(65,19,58); N(66,60,65); N(67,62,15); N(68,31,47);
#RA(66,67); RA(68,64);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.38950949647957067157,8.86671561452733847375,P1)
p(12.79914497856743160753,9.67385236625554867373,P2)
p(12.54783732588271760733,8.32672676534359723632,P3)
p(12.13834607850296620768,9.23904081122877229859,P4)
p(11.57336089250911292936,8.10223694196743515761,P5)
p(11.57016904389131362052,9.10223184800566187391,P6)
p(12.97360807596312959333,8.68918865328187628450,P7)
p(12.07813567994331194200,8.24085510310363211772,P8)
p(11.87975456498469917221,9.22098006106959289241,P9)
p(12.77376937865594541677,9.66901746233913605977,P10)
p(10.59888445913551180411,8.32672676534360256539,P11)
p(10.68209061578070340204,9.32325912081247309970,P12)
p(10.91138297685084701527,8.34990152303307553439,P13)
p(10.88806444514355398212,9.34962960910399232262,P14)
p(12.05664179000769742345,10.36595936924354077746,P15)
p(11.88759240762871272068,9.38035178692830662328,P16)
p(11.24711798144148211520,10.14833128496203507041,P17)
p(9.74865054551958465368,8.85313183003936288173,P18)
p(10.58864484481405732197,9.39572705408099650981,P19)
p(13.94750259193468444607,9.69656120584202341206,P20)
p(12.97089452107508300571,9.91158835745754984714,P21)
p(14.11284489696585353613,10.68279744638836525894,P22)
p(12.08318652184355634915,10.37199525152013990237,P23)
p(13.11324316966038594501,10.71101777182810010913,P24)
p(13.94178890581279262051,10.15109638171724881772,P25)
p(13.84454913718192692329,11.64613403620625575741,P26)
p(12.90227455300273184946,11.31129286787427723482,P27)
p(13.90217362277647694668,11.32550026966350742441,P28)
p(12.97120907645301279842,10.96039067859700466556,P29)
p(12.96012972806953733595,9.96045205646092668417,P30)
p(12.89333582444027115343,10.95821885007452678451,P31)
p(13.20225795981728467154,12.41259476154027119321,P32)
p(9.56139900885730043001,12.39901097705229560120,P33)
p(10.15176352676943949405,11.59187422532408540121,P34)
p(10.40307117945415349425,12.93899982623603506227,P35)
p(10.81256242683390489390,12.02668578035086177636,P36)
p(11.37754761282775817222,13.16348964961219891734,P37)
p(11.38073946144555748106,12.16349474357397220103,P38)
p(9.97730042937374150824,12.57653793829775601409,P39)
p(10.87277282539355915958,13.02487148847600195722,P40)
p(11.07115394035217192936,12.04474653051004118254,P41)
p(10.17713912668092568481,11.59670912924049801518,P42)
p(12.35202404620136107383,12.93899982623602973320,P43)
p(12.26881788955616769954,11.94246747076715919889,P44)
p(12.03952552848602230995,12.91582506854655854056,P45)
p(12.06284406019331711946,11.91609698247564175233,P46)
p(10.89426671532917367813,10.89976722233609152113,P47)
p(11.06331609770815838090,11.88537480465132922802,P48)
p(11.70379052389538898638,11.11739530661759900454,P49)
p(12.36226366052281377961,11.86999953749863756514,P50)
p(9.00340591340218665550,11.56916538573760888653,P51)
p(9.98001398426178809586,11.35413823412208422781,P52)
p(8.83806360837101578909,10.58292914519126881601,P53)
p(10.86772198349331475242,10.89373134005949417258,P54)
p(9.83766533567648338021,10.55470881975153396581,P55)
p(9.00911959952407848107,11.11463020986238525722,P56)
p(9.10635936815494417829,9.61959255537337654118,P57)
p(10.04863395233413925212,9.95443372370535506377,P58)
p(9.04873488256039415489,9.94022632191612665054,P59)
p(9.97969942888385830315,10.30533591298262940938,P60)
p(9.99077877726733198926,11.30527453511870739078,P61)
p(10.05757268089659817178,10.30750774150510729044,P62)
p(13.29481932226266138741,12.23102576612608416440,P63)
p(12.40126370043265069398,11.78207326229524021244,P64)
p(9.65608918307420971416,9.03470082545354813419,P65)
p(10.54964480490422040759,9.48365332928439386251,P66)
p(11.05685156067294272475,10.34547773535467740658,P67)
p(11.89405694466392837683,10.92024885622494423387,P68)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15)
s(P15,P16) s(P14,P16)
s(P12,P17) s(P16,P17)
s(P11,P18) s(P57,P18)
s(P17,P19) s(P18,P19)
s(P1,P20)
s(P20,P21)
s(P20,P22)
s(P2,P23) s(P21,P23)
s(P22,P24)
s(P24,P25) s(P21,P25)
s(P22,P26)
s(P26,P27)
s(P27,P28) s(P24,P28)
s(P28,P29)
s(P25,P30) s(P29,P30)
s(P23,P31) s(P30,P31)
s(P26,P32) s(P43,P32)
s(P33,P34)
s(P33,P35)
s(P35,P36)
s(P35,P37)
s(P37,P38)
s(P34,P39) s(P36,P39)
s(P36,P40) s(P38,P40)
s(P40,P41)
s(P39,P42) s(P41,P42)
s(P37,P43)
s(P43,P44)
s(P38,P45) s(P44,P45)
s(P41,P46) s(P45,P46)
s(P42,P47)
s(P46,P48) s(P47,P48)
s(P44,P49) s(P48,P49)
s(P49,P50) s(P32,P50)
s(P33,P51)
s(P51,P52)
s(P51,P53)
s(P34,P54) s(P52,P54)
s(P53,P55)
s(P52,P56) s(P55,P56)
s(P53,P57)
s(P57,P58)
s(P55,P59) s(P58,P59)
s(P59,P60)
s(P56,P61) s(P60,P61)
s(P54,P62) s(P61,P62)
s(P50,P63) s(P27,P63)
s(P29,P64) s(P63,P64)
s(P19,P65) s(P58,P65)
s(P60,P66) s(P65,P66) s(P67,P66)
s(P62,P67) s(P15,P67)
s(P31,P68) s(P47,P68) s(P64,P68)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P18,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P20,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P1,P20,MA19) m(P20,P21,MB19) b(P20,MA19,MB19)
color(#90EE90) m(P21,P20,MA110) m(P20,P22,MB110) b(P20,MA110,MB110)
color(#D3D3D3) m(P20,P22,MA111) m(P22,P24,MB111) b(P22,MA111,MB111)
color(#FFB6C1) m(P24,P22,MA112) m(P22,P26,MB112) b(P22,MA112,MB112)
color(#FFA07A) m(P22,P26,MA113) m(P26,P27,MB113) b(P26,MA113,MB113)
color(#20B2AA) m(P24,P28,MA114) m(P28,P29,MB114) b(P28,MA114,MB114)
color(#87CEFA) m(P27,P26,MA115) m(P26,P32,MB115) b(P26,MA115,MB115)
pen(2)
color(limegreen) s(P66,P67)
color(limegreen) s(P68,P64)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
https://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_16eckfast.png
Es wird wahrscheinlich sogar im reglm. 16-eck unendlich viele Variationen geben, also nicht nur eine starre Version.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1650, eingetragen 2019-01-25
|
frage an stefan: wenn man von p1-p3 ausgehend einen neues regelmässiges sechzehneck drumherum legt, kann man dann evt. punkt für punkt aussenherum dran schieben/ziehen (also entsprechende verbindungs-linien auf null schrumpfen) bis slash´s graph hineinpasst?
oder ist das falsch gedacht
schönes wochenende
haribo
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4244
Wohnort: Raun
| Beitrag No.1651, eingetragen 2019-01-26
|
Punkt für Punkt hat nur für die ersten 6 Eckpunkte geklappt, dann ungültiger Graph. Also im Prinzip kann das schon funktionieren, wenn der Graph mitmacht. Ich will noch eine andere Variante versuchen, bei der die Annäherung der Eckpunkte nur allmählich erfolgt, erst der eine etwas, und wenn es nicht mehr weitergeht bei einem anderen Eckpunkt allmählich weitermachen. Siehe gleich folgenden #1622.
\quoteon(2019-01-21 23:30 - haribo in Beitrag No. 1636)
@stefan, in #1618 hatte ich den graph in ein exaktes 19eck konstruiert, und die innereien auch weitgehend symetrisch belassen (alle roten linien)
danach lediglich den angegebenen einen winkel varieiirt um dannach nur einfache doppel-knie?(hüft?)-linien zu konstruieren bis zur anzupassenden untersten diagonale, also alles viel symetrischer als du es bisher hergestellt hast
soll ich die konstruktions reihenfolge mal durchnumerieren oder kannst du es so verstehen
ansich ist es ja auch egal ist ja sowiso hochgradig beweglich...
\quoteoff
Die grobe Reihenfolge als Hinweis ist schon hilfreich um nicht in eine abwegige Variante zu geraten. Aus der Pixelgrafik kann man das exakte 19-Eck auch nicht so einfach herauslesen, weil das eventuell eine zu einschränkende Bedingung ist, bei der sich der Graph irgendwann nicht mehr fortsetzen lässt. Jetzt also #1618 nochmal symmetrisch wie es besser nicht geht:
94 Knoten, 94×Grad 3, 0 Dreiecke,
141 Kanten, minimal 0.99999999999999500400, maximal 1.00000000000000133227
einzustellende Kanten, Abstände und Winkel:
|P58-P59|=1.00000000000000133227
|P88-P89|=0.99999999999999500400
|P94-P48|=1.00000000000000022204
$
%Eingabe war:
%
%#1618 im regelmäßigen 19-Eck
%
%
%
%
%
%
%P[1]=[41.28,66.96]; P[2]=[95.03,76.24]; D=ab(1,2); A(2,1,Bew(1));
%M(3,1,2,180*17/19);
%M(4,3,1,180*17/19);
%M(5,4,3,180*17/19);
%M(6,5,4,180*17/19);
%M(7,6,5,180*17/19);
%M(8,7,6,180*17/19);
%M(9,8,7,180*17/19);
%M(10,9,8,180*17/19);
%M(11,10,9,180*17/19);
%M(12,11,10,180*17/19);
%M(13,12,11,180*17/19);
%M(14,13,12,180*17/19);
%M(15,14,13,180*17/19);
%M(16,15,14,180*17/19);
%M(17,16,15,180*17/19);
%M(18,17,16,180*17/19);
%M(19,18,17,180*17/19); A(2,19);
%M(20,1,2,90*17/19);
%M(21,3,1,90*17/19);
%M(22,4,3,90*17/19);
%M(23,5,4,90*17/19);
%M(24,6,5,90*17/19);
%M(25,7,6,90*17/19);
%M(26,8,7,90*17/19);
%M(27,9,8,90*17/19);
%M(28,10,9,90*17/19);
%M(29,11,10,90*17/19);
%M(30,12,11,90*17/19);
%M(31,13,12,90*17/19);
%M(32,14,13,90*17/19);
%M(33,15,14,90*17/19);
%M(34,16,15,90*17/19);
%M(35,17,16,90*17/19);
%M(36,18,17,90*17/19);
%M(37,19,18,90*17/19);
%M(38,2,19,90*17/19); N(39,20,21); N(40,21,22); N(41,22,23); N(42,23,24); N(43,24,25); N(44,25,26); N(45,26,27); N(46,27,28); N(47,28,29); N(48,29,30); N(49,30,31); N(50,31,32); N(51,32,33); N(52,33,34); N(53,34,35); N(54,35,36); N(55,36,37); N(56,37,38); N(57,38,20);
%M(58,39,20,blauerWinkel); M(59,57,20,360-blauerWinkel); RA(58,59);
%M(60,41,22,blauerWinkel); N(61,60,40);
%M(62,43,24,blauerWinkel); N(63,62,42);
%M(64,45,26,blauerWinkel); N(65,64,44);
%M(66,47,28,orangerWinkel); N(67,66,46);
%M(68,49,31,360-orangerWinkel); N(69,50,68);
%M(70,52,33,blauerWinkel); N(71,70,51);
%M(72,54,35,blauerWinkel); N(73,72,53);
%M(74,56,37,blauerWinkel); N(75,74,55); N(76,61,58); N(77,63,60); N(78,65,62); N(79,67,64); N(80,71,69); N(81,73,70); N(82,75,72); N(83,59,74); N(84,76,77); N(85,78,79); N(86,80,81); N(87,82,83);
%M(88,84,76,gruenerWinkel); M(89,87,83,360-gruenerWinkel); RA(88,89); N(90,85,88); N(91,66,90); N(92,89,86); N(93,92,68); N(94,91,93); RA(94,48);
%
%
%
%
%
%
%
%
%
%
%
%
%
%Ende der Eingabe.
\begin{tikzpicture}[draw=grey,font=\sffamily\scriptsize]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/4.56873213868107796998/0.00000000000000000000,
2/6.04686352565954088334/0.25520110271925838807,
3/3.08782632478458118896/0.23857487371379970664,
4/1.76462520752700902094/0.94507243442318522586,
5/0.74251815954399458253/2.04293270898614132136,
6/0.13226633910942228733/3.41318550159642875030,
7/0.00000000000000000000/4.90734266051198009251,
8/0.36005225238194260573/6.36348907332722024677,
9/1.17340584792334445829/7.62382868177403594245,
10/2.35192130406592614378/8.55178413309324803038,
11/3.76788818458520857746/9.04679705542204182223,
12/5.26786450698702779505/9.05522511770920779384,
13/6.68930456220844416038/8.57615500863107449447,
14/7.87817326435126297213/7.66150140804489954149,
15/8.70563824233971317312/6.41038122588709757821,
16/9.08203082636671865657/4.95837274702429464668,
17/8.96656303962026690613/3.46282362037419355616,
18/8.37174760846164289774/2.08579979964501660561,
19/7.36204201436925043112/0.97652318253883751975,
20/4.56030407639391199837/1.49997632240181810737,
21/3.56689643386271582060/1.66001492893521662708,
22/2.67927880811318130938/2.13394113656600392659,
23/1.99363834170179732297/2.87039768697459196645,
24/1.58427481797222591275/3.78957808562343645420,
25/1.49554912665009931416/4.79187487376552567753,
26/1.73707607311111966730/5.76867364216859623838,
27/2.28268246502952409926/6.61412308768164347583,
28/3.07324338388550621914/7.23660564438353937078,
29/4.02308928730446702104/7.56866566844357890886,
30/5.02928963327322708921/7.57431930381271012465,
31/5.98280700149905797502/7.25295389137350188236,
32/6.78031298978830676560/6.63939436006188543615,
33/7.33538544972942663236/5.80012940545252586588,
34/7.58787366745116997890/4.82610640791487099932,
35/7.51041662680502764005/3.82287587275613649496,
36/7.11140800001482631387/2.89915339518641879124,
37/6.43408656305004011955/2.15503863868141998239,
38/5.55185060333074797967/1.67116798323854087727,
39/3.83884509618359093253/0.18487292727507620427,
40/2.45751471685310729498/0.65042481113254446701,
41/1.30219307717321841622/1.53926905075606179629,
42/0.49807720346552847301/2.75508558094302014041,
43/0.13230552778961082727/4.16612181531043290761,
44/0.24451508673727004317/5.61947008338154585516,
45/0.82254623348582611708/6.95763754928896549501,
46/1.80376032420771537090/8.03561300429401725864,
47/3.08182758706790682623/8.73658108133433231046,
48/4.51824960287863230946/8.98458101262220942829,
49/5.95736775784276417767/8.75273815748719741237,
50/7.24323126965101593555/8.06617628669571828937,
51/8.23649687457081647324/6.99929503205309000435,
52/8.82952883220528583763/5.66770753186815401392,
53/8.95806292810580906405/4.21571195349486771420,
54/8.60817049856957261511/2.80065454788272516495,
55/7.81776781747725646454/1.57587874180774800692,
56/6.67250727968645307442/0.67410799821287303857,
57/5.29649563501499986984/0.19306316958138264317,
58/3.80925498099262904717/1.68458104057012225674,
59/5.30923130339444959702/1.69300910285728911653,
60/2.19998210710797836853/2.74092410014785903272,
61/3.38885080925079673619/1.82627049956168607814,
62/1.57885902780699405312/4.56296305760696796483,
63/1.95525161183400109088/3.11095457874416547739,
64/2.20782513529677348885/6.38230950008794195583,
65/1.61300970413814970250/5.00528567935876367301,
66/3.98424822368780562343/7.53840037935214102305,
67/2.67173146284052176469/6.81224629618868871006,
68/5.06846834276122937268/7.54449239197932630674,
69/6.38906219859366419911/6.83313322254547284018,
70/7.46802235816866666340/5.03818380621806305442,
71/6.85777053773409406290/6.40843659882835137154,
72/7.14708911086777831656/3.14012645910867593813,
73/7.50714136324971992309/4.59627287192391520421,
74/5.72801673260190469250/1.83941379776418911796,
75/6.90653218874448704412/2.76736924908340053975,
76/4.07285580110140799093/3.16123760444608992159,
77/3.31498142637519199738/3.74430663838223098949,
78/3.07504046926453256106/4.66992610841443855918,
79/3.43647440009935811744/5.52183231613704528229,
80/5.63886823732519548713/5.53420711976813528565,
81/6.00985242096847827042/4.68641622066533347635,
82/5.78032802088047503730/3.75815892014670493992,
83/5.02905358425059656469/3.16661028557103385594,
84/2.82697061386665637883/2.32591126089584054881,
85/1.94223452732789603203/5.65316092162695227330,
86/7.13153799321714210180/5.68231856377392752222,
87/6.28424686835438617294/2.34533699394348893463,
88/3.79923348014701423025/3.46814806596399449745,
89/5.29920980254882501015/3.47657612825116180133,
90/3.20662864324526042381/4.84612466492373172855,
91/4.10989013740301878386/6.04367160478533715917,
92/5.87629257014307171403/4.86112496427889873019,
93/4.95963098652603306959/6.04844612602103914867,
94/4.52667766516580094560/7.48460469022039021070}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Punkte als \fill[red] (p-1) circle (1.125pt)
%Kanten als \draw[line width=0] (p-1) -- (p-2);
\foreach \i/\j in {
2/1, 2/19,
3/1,
4/3,
5/4,
6/5,
7/6,
8/7,
9/8,
10/9,
11/10,
12/11,
13/12,
14/13,
15/14,
16/15,
17/16,
18/17,
19/18,
20/1,
21/3,
22/4,
23/5,
24/6,
25/7,
26/8,
27/9,
28/10,
29/11,
30/12,
31/13,
32/14,
33/15,
34/16,
35/17,
36/18,
37/19,
38/2,
39/20, 39/21,
40/21, 40/22,
41/22, 41/23,
42/23, 42/24,
43/24, 43/25,
44/25, 44/26,
45/26, 45/27,
46/27, 46/28,
47/28, 47/29,
48/29, 48/30,
49/30, 49/31,
50/31, 50/32,
51/32, 51/33,
52/33, 52/34,
53/34, 53/35,
54/35, 54/36,
55/36, 55/37,
56/37, 56/38,
57/38, 57/20,
58/39, 58/59,
59/57,
60/41,
61/60, 61/40,
62/43,
63/62, 63/42,
64/45,
65/64, 65/44,
66/47,
67/66, 67/46,
68/49,
69/50, 69/68,
70/52,
71/70, 71/51,
72/54,
73/72, 73/53,
74/56,
75/74, 75/55,
76/61, 76/58,
77/63, 77/60,
78/65, 78/62,
79/67, 79/64,
80/71, 80/69,
81/73, 81/70,
82/75, 82/72,
83/59, 83/74,
84/76, 84/77,
85/78, 85/79,
86/80, 86/81,
87/82, 87/83,
88/84, 88/89,
89/87,
90/85, 90/88,
91/66, 91/90,
92/89, 92/86,
93/92, 93/68,
94/91, 94/93, 94/48}
\draw[line width=0] (p-\i) -- (p-\j);
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-58) -- (p-59);
\draw[green,very thick] (p-88) -- (p-89);
\draw[green,very thick] (p-94) -- (p-48);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
39/61.25/91.13/blue,
41/23.36/53.24/blue,
43/345.46/375.34/blue,
45/307.57/337.45/blue,
47/269.67/306.99/orange,
52/174.94/204.81/blue,
54/137.04/166.92/blue,
56/99.15/129.03/blue,
84/33.84/49.60/green}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/233,
2/332,
3/294,
4/275,
5/256,
6/157,
7/218,
8/119,
9/100,
10/81,
11/143,
12/43,
13/24,
14/86,
15/346,
16/327,
17/29,
18/289,
19/270,
20/273,
21/254,
22/235,
23/216,
24/197,
25/178,
26/159,
27/140,
28/121,
29/102,
30/83,
31/64,
32/45,
33/27,
34/8,
35/349,
36/330,
37/311,
38/292,
39/83,
40/64,
41/45,
42/27,
43/8,
44/349,
45/330,
46/311,
47/292,
48/273,
49/254,
50/235,
51/216,
52/197,
53/178,
54/159,
55/140,
56/121,
57/102,
58/223,
59/323,
60/185,
61/285,
62/147,
63/247,
64/108,
65/209,
66/64,
67/167,
68/121,
69/18,
70/336,
71/77,
72/298,
73/39,
74/260,
75/1,
76/239,
77/230,
78/164,
79/150,
80/35,
81/22,
82/315,
83/306,
84/55,
85/340,
86/206,
87/131,
88/239,
89/306,
90/283,
91/346,
92/263,
93/199,
94/355}
\node[anchor=\a] (P\i) at (p-\i) {\i};
\end{tikzpicture}
$
\quoteon(2019-01-20 22:52 - haribo in Beitrag No. 1632)
-die frage ist ob om nman evtl die beweglichkeit des #1625 soweit ausnutzen kann das man zwei aussen freie zweier knoten in eine entfernung von 1 zueinander ziehen kann, dabei also alles dazwischen nach innen drücken... sozusagen ein gummiband spannen... vorstellen kann ich es mir nicht aber ein bischen in die rchtung muss es ja gehen, nur wie weit?
also fals es geht dann drei solche gummis rundherum anordnen
https://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_dreier-girth5-t3.png
\quoteoff
Ein (ideales) Gummiband würde alle Abstände auf 0 bringen wegen der hohen Beweglichkeit. Das richtige Hilfsmittel sind einstellbare Abstandshalter. Für die symmetrische Eingabe waren 6 bewegliche Winkel nötig. Damit müssen die zwei Abstände (grün) P21-P22 und P2-P52 auf 1 gebracht, werden. Mit den vier übrigen Winkeln stelle ich vier Abstände P40-P49, P2-P33, P7-P18, P24-P25 erstmal auf den schon vorhandenen Wert.
60 Knoten, 6×Grad 2, 54×Grad 3, 0 Dreiecke,
87 Kanten, minimal 0.99999999999999689138, maximal 1.00000000000000577316
einzustellende Kanten, Abstände und Winkel:
|P21-P22|=0.99999999999999789058
|P2-P52|=0.99999999999999733546
|P40-P49|=5.88681884600314120348
|P2-P33|=5.56706980349423652399
|P7-P18|=1.61674134846586770031
|P24-P14|=1.73771742243240678860
$
%Eingabe war:
%
%#1632
%
%
%
%
%
%
%
%
%
%P[1]=[43.29,62]; P[2]=[79.8,79.39]; D=ab(1,2); A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel); N(5,4,2); M(6,1,3,orangerWinkel); M(7,6,1,vierterWinkel); N(8,7,3); M(9,6,7,fuenfterWinkel); M(10,9,6,sechsterWinkel); N(11,10,7); A(10,11,ab(10,11,[1,11],"gespiegelt")); N(21,8,19); N(22,4,15); RA(21,22,"",1*D); A(13,16,ab(2,5,[1,22])); A(33,36,ab(2,5,[1,12],14,15,[17,22])); RA(2,52,"",1*D); A(5,54);
%
%//einstellbare Abstandshalter:
%R(40,49,"brown",5.8868*D);
%R(2,33,"blue",5.567*D);
%R(7,18,"orange",1.6167*D);
%R(24,14,"orange",1.7377*D);
%
%
%Ende der Eingabe.
\begin{tikzpicture}[draw=grey,font=\sffamily\scriptsize]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/3.68883033198349696846/0.30596685098738207742,
2/4.59164970951664930254/0.73598681744318872333,
3/3.43357311035191914428/1.27284003336701934117,
4/3.42175482347554327234/2.27277019497597265740,
5/4.21328873342261278623/1.66164494643529536688,
6/2.69808536100262852386/0.17023033240775378716,
7/2.39236992639502110691/1.12235326199336271635,
8/2.79131470046223384429/2.03932821652835993831,
9/1.71268106127162678121/0.00000000000000000000,
10/0.78034961487636078648/0.36160485901396743902,
11/1.39281258175608102512/1.15210414060813248760,
12/0.00000000000000000000/3.16399850521778525092,
13/0.19088502926988346053/4.14561090611776972281,
14/0.99998396802637135039/3.15833602429212989549,
15/1.97117136469949616462/3.39665312511218875358,
16/1.18170897224363935507/4.01045205871982801682,
17/0.11603243591054487882/2.17075308045275416902,
18/1.11433705190917131667/2.11254746495188694411,
19/1.90259899719138458885/2.72788729433066290397,
20/0.19733042256986321750/1.17406324034945419577,
21/1.84041713183206123716/1.72982245895150055226,
22/2.45288009871178003252/2.52032174054566349142,
23/0.26988650295119864797/5.14248540531823561395,
24/1.23485185194565794120/4.88010805256079827075,
25/2.10672591734747882697/4.39037790842047659368,
26/0.64770771513041791589/6.06836397814915962101,
27/1.62512807698101968690/5.85705984605554252909,
28/2.21977929520880179481/5.05307605973879248040,
29/0.99298607263613447582/7.00686430091849654644,
30/1.77231078987175427741/7.63348458873690649540,
31/2.15067176596578768510/6.70782645974479585504,
32/4.58942968632654046957/6.90809035595132847618,
33/5.34408844754081879813/6.25197287095147746783,
34/4.08453384998329216415/6.04491007672614966140,
35/3.80532881511315723699/5.08467856896191872096,
36/4.73162548066109955869/5.46147358935731297436,
37/3.67123769833208468683/7.30422603117232061010,
38/3.12167784866611164318/6.46877168075267583447,
39/3.26044680022740696046/5.47844689661235051403,
40/2.76742998377911852970/7.73216482950047279132,
41/2.42718823084477985930/6.03133038935780962930,
42/2.80554920693881415517/5.10567226036570520620,
43/6.16790635139265486231/5.68511833820681733442,
44/5.45819822402977283815/4.98062250858461830205,
45/4.59814244550432871250/4.47042249111598799516,
46/6.78083011019430426103/4.89497628395552197844,
47/6.10912518295130890778/4.15415748646352955831,
48/5.11552919065631339635/4.04116631824528127481,
49/7.42095605241959077603/4.12670629359393625890,
50/7.57396278157923763530/3.13848114676156164649,
51/6.58313883860548187954/3.27363999415950646110,
52/5.53719350000081167451/1.06148173334332418527,
53/5.04210536831768774135/1.93032449349415480278,
54/4.35012300651469718815/2.65223890043832488672,
55/6.33935305208472321681/1.65859148288735669396,
56/5.89060828575206762991/2.55225144880787491175,
57/4.96357738890855770819/2.92723640356942027552,
58/7.16186277997836917564/2.22734252466250604030,
59/5.85901782365050927126/3.37241774620312551036,
60/4.86819388067675529186/3.50757659360106766044}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Kanten als \draw[gray,thick] (p-1) -- (p-2);
\foreach \i/\j in {
2/1, 2/52,
3/1,
4/3,
5/4, 5/2, 5/54,
6/1,
7/6,
8/7, 8/3,
9/6,
10/9, 10/20,
11/10, 11/7, 11/18,
13/12, 13/23,
14/12,
15/14,
16/13, 16/15, 16/25,
17/12,
18/17,
19/14, 19/18,
20/17,
21/8, 21/19, 21/22,
22/4, 22/15,
24/23,
25/24,
26/23,
27/26,
28/24, 28/27,
29/26,
30/29, 30/40,
31/27, 31/30, 31/38,
33/32, 33/43,
34/32,
35/34,
36/33, 36/35, 36/45,
37/32,
38/37,
39/34, 39/38,
40/37,
41/28, 41/39, 41/42,
42/25, 42/35,
44/43,
45/44,
46/43,
47/46,
48/44, 48/47,
49/46,
50/49, 50/58,
51/47, 51/50, 51/56,
53/52,
54/53,
55/52,
56/55,
57/53, 57/56,
58/55,
59/48, 59/57, 59/60,
60/45, 60/54}
\draw[gray,thick] (p-\i) -- (p-\j);
%Punkte als \fill[red] (p-1) circle (1.125pt)
\foreach \i in {1,...,60}
\fill[red] (p-\i) circle (1.125pt);
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-21) -- (p-22);
\draw[green,very thick] (p-2) -- (p-52);
\draw[brown,very thick] (p-40) -- (p-49);
\draw[blue,very thick] (p-2) -- (p-33);
\draw[orange,very thick] (p-7) -- (p-18);
\draw[orange,very thick] (p-24) -- (p-14);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
1/25.47/104.79/blue,
3/284.79/450.68/green,
1/104.79/187.80/orange,
6/7.80/107.80/violet,
6/107.80/189.80/teal,
9/9.80/158.80/lime}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/248,
2/341,
3/30,
4/41,
5/295,
6/331,
7/56,
8/101,
9/267,
10/198,
11/235,
12/222,
13/221,
14/80,
15/69,
16/175,
17/138,
18/54,
19/9,
20/203,
21/55,
22/358,
23/128,
24/270,
25/281,
26/211,
27/296,
28/341,
29/147,
30/78,
31/115,
32/102,
33/101,
34/320,
35/309,
36/55,
37/18,
38/294,
39/249,
40/83,
41/295,
42/351,
43/8,
44/150,
45/161,
46/91,
47/176,
48/221,
49/27,
50/318,
51/355,
52/342,
53/200,
54/189,
55/258,
56/174,
57/129,
58/323,
59/175,
60/231}
\node[anchor=\a] (P\i) at (p-\i) {\i};
\end{tikzpicture}
$
Anschließend verrigere ich einen der zusätzlichen vier Abstände um ein Zehntel (im großen Eingabefenster eintragen, dann Button "Feinjustieren(6)") und das wiederhole ich. Immer wenn der Graph nicht mehr zu zeichnen geht, setze ich mit einem anderen Abstand fort, Bisheriges Ergebnis
60 Knoten, 6×Grad 2, 54×Grad 3, 0 Dreiecke,
87 Kanten, minimal 0.99999999999997501998, maximal 1.00000000000000466294
einzustellende Kanten, Abstände und Winkel:
|P21-P22|=0.99999999999999955591
|P2-P52|=0.99999999999997501998
|P40-P49|=5.50000000000000266454
|P2-P33|=3.69999999999999307221
|P7-P18|=0.10000000000000586198
|P24-P14|=0.09999999999999424627
$
%Eingabe war:
%
%#1632 zusammengezogen
%
%
%
%
%
%
%
%
%P[1]=[64.67080359521894,132.18348988321037]; P[2]=[114.25796869456322,152.42673672087557]; D=ab(1,2); A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel); N(5,4,2); M(6,1,3,orangerWinkel); M(7,6,1,vierterWinkel); N(8,7,3); M(9,6,7,fuenfterWinkel); M(10,9,6,sechsterWinkel); N(11,10,7); A(10,11,ab(10,11,[1,11],"gespiegelt")); N(21,8,19); N(22,4,15); RA(21,22,"",1*D); A(13,16,ab(2,5,[1,22])); A(33,36,ab(2,5,[1,12],14,15,[17,22])); RA(2,52,"",1*D); A(5,54);
%
%//einstellbare Abstandshalter:
%R(40,49,"brown",5.5*D);
%R(2,33,"blue",3.7*D);
%R(7,18,"orange",0.1*D);
%R(24,14,"orange",0.1*D);
%
%
%Ende der Eingabe.
\begin{tikzpicture}[draw=grey,font=\sffamily\scriptsize]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/3.93661990618804402686/2.44926734915978272511,
2/4.86244411240657914419/2.82722176331553587403,
3/4.08376748871425299114/3.43838189710490960138,
4/3.21480092872907041723/3.93325270613239563744,
5/4.10799378263090986252/3.48357890687488280790,
6/3.73417298340568404313/1.46997411245488596165,
7/2.85818987816565694970/1.95231589929699578256,
8/3.26340579066083913418/2.86653691429320378603,
9/3.21546936613930256499/0.61501998653071066059,
10/2.42695784677654469164/0.00000000000000000000,
11/2.61815464216649651519/0.98155172325894923802,
12/1.94697662078636235528/2.83683064421965802637,
13/1.23070273634845950284/3.53464990625835895344,
14/2.18184070780647498822/3.80885886429776165940,
15/3.17301936988908295234/3.94139135024793896278,
16/2.17634986151407927579/3.85984448595795814896,
17/1.76705512693052657625/1.85314967152135201545,
18/2.76003470583975651920/1.97143557883599185310,
19/2.72758799502404780668/2.97090904569603964092,
20/1.92693736083717181984/0.86601357589875760379,
21/2.81155986798340462585/1.97444092048997088540,
22/3.00275666337334579126/2.95599264374892189977,
23/1.36629671532638452547/4.52541439536004919120,
24/2.14932124983651817729/3.90342357681431817440,
25/3.01237522203827268186/4.40853528828691398900,
26/0.61942735597683973303/5.19038519176001145183,
27/1.47513914930890144284/5.70783792076279272720,
28/2.06426981672161646841/4.89980013902616740040,
29/0.13836717248937735469/6.06707276430966846448,
30/0.00000000000000000000/7.05745376451983652544,
31/0.75445032977567028087/6.40109662096048470659,
32/2.69675801712348706118/6.05471437745709373246,
33/3.65922416751806478530/6.32611612642832188413,
34/3.42112710539643716245/5.36530200162198323000,
35/3.04031427401468690164/4.44064985759428498824,
36/3.46802737212810763268/5.34456440316937531065,
37/1.93482605247529226844/6.70237144817224894666,
38/1.54077486366484150970/5.78328295374036471799,
39/2.42256763178199774345/5.31164589614598714462,
40/0.99999999972021491601/7.05747741980659082373,
41/1.51761498481241252634/5.73715818356286355595,
42/2.27206531458808358437/5.08080104000351973070,
43/4.44945439475867399182/5.71330605148237680169,
44/3.51928227772232604664/5.34618232208298671537,
45/3.52519486550574789874/4.34619980158289997973,
46/5.39877067689058431910/6.02762849178730597544,
47/5.41904198879854437365/5.02783397594241154849,
48/4.42469540889064205658/4.92165074268283664338,
49/6.39853447764443128420/6.00589504516182071114,
50/7.32541316949656451385/5.63053403148235620534,
51/6.37976604433094340862/5.30533945178275967436,
52/5.10863637836324269159/3.79644277432544674511,
53/4.14940320307017529444/3.51382693008245938771,
54/3.53903737236932114385/4.30594658815998609924,
55/6.05048983686728103493/4.13246667630858688369,
56/5.45156144676850473729/4.93326926342584304308,
57/4.60221538946704900042/4.40543285416017571521,
58/6.82543365571571758466/4.76449680029684241589,
59/5.42319616347728494787/4.97638869194936805940,
60/4.47754903831166650718/4.65119411224976442298}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Kanten als \draw[gray,thick] (p-1) -- (p-2);
\foreach \i/\j in {
2/1, 2/52,
3/1,
4/3,
5/4, 5/2, 5/54,
6/1,
7/6,
8/7, 8/3,
9/6,
10/9, 10/20,
11/10, 11/7, 11/18,
13/12, 13/23,
14/12,
15/14,
16/13, 16/15, 16/25,
17/12,
18/17,
19/14, 19/18,
20/17,
21/8, 21/19, 21/22,
22/4, 22/15,
24/23,
25/24,
26/23,
27/26,
28/24, 28/27,
29/26,
30/29, 30/40,
31/27, 31/30, 31/38,
33/32, 33/43,
34/32,
35/34,
36/33, 36/35, 36/45,
37/32,
38/37,
39/34, 39/38,
40/37,
41/28, 41/39, 41/42,
42/25, 42/35,
44/43,
45/44,
46/43,
47/46,
48/44, 48/47,
49/46,
50/49, 50/58,
51/47, 51/50, 51/56,
53/52,
54/53,
55/52,
56/55,
57/53, 57/56,
58/55,
59/48, 59/57, 59/60,
60/45, 60/54}
\draw[gray,thick] (p-\i) -- (p-\j);
%Punkte als \fill[red] (p-1) circle (1.125pt)
\foreach \i in {1,...,60}
\fill[red] (p-\i) circle (1.125pt);
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-21) -- (p-22);
\draw[green,very thick] (p-2) -- (p-52);
\draw[brown,very thick] (p-40) -- (p-49);
\draw[blue,very thick] (p-2) -- (p-33);
\draw[orange,very thick] (p-7) -- (p-18);
\draw[orange,very thick] (p-24) -- (p-14);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
1/22.21/81.54/blue,
3/261.54/510.34/green,
1/81.54/258.32/orange,
6/78.32/151.16/violet,
6/151.16/238.75/teal,
9/58.75/217.95/lime}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/234,
2/353,
3/5,
4/117,
5/59,
6/297,
7/116,
8/143,
9/321,
10/81,
11/170,
12/289,
13/233,
14/158,
15/46,
16/104,
17/226,
18/47,
19/20,
20/202,
21/81,
22/171,
23/114,
24/245,
25/357,
26/177,
27/356,
28/23,
29/201,
30/321,
31/50,
32/169,
33/113,
34/38,
35/286,
36/344,
37/106,
38/287,
39/260,
40/82,
41/321,
42/51,
43/354,
44/125,
45/237,
46/57,
47/236,
48/263,
49/81,
50/201,
51/290,
52/49,
53/278,
54/166,
55/346,
56/167,
57/140,
58/322,
59/201,
60/291}
\node[anchor=\a] (P\i) at (p-\i) {\i};
\end{tikzpicture}
$
Läst sich vielleicht noch um paar Zehntel verbessern. Nach dieser Methode versuche ich auch nochmal den vorhergehenden Beitrag.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1652, eingetragen 2019-01-26
|
sieht schick aus stefan, klar gummiband sollte sozusagen anschlagen, also aufhören zu ziehen, wenn es irgendwo überschneidungen gibt...
war also eher mechanisch gedacht
lg haribo
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1653, eingetragen 2019-01-26
|
fals du ein bild hast für die ersten 5 od 6 geklappten hingezogenen punkte bei slash´s graph würde ich es gerne sehen... evtl kann man mit der zugreihenfolge noch was verbessern
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1654, eingetragen 2019-01-26
|
#1651/1 der mich interessierende winkel ist : 41/60/61
na ja irgendwann solte ich wohl nochmal lernen winkel selber herauszulesen
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1655, vom Themenstarter, eingetragen 2019-01-26
|
\quoteon(2019-01-26 09:28 - haribo in Beitrag No. 1654)
#1651/1 der mich interessierende winkel ist : 41/60/61
na ja irgendwann solte ich wohl nochmal lernen winkel selber herauszulesen
\quoteoff
Genau 89 Grad. :-)
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1656, vom Themenstarter, eingetragen 2019-01-26
|
Idee für einen mit 3er-Symmetrie. Leider kein Streichholzgraph.
60 Knoten, 60×Grad 3, 0 Dreiecke,
90 Kanten, minimal 0.70483514695743187950, maximal 1.00002746826527411095
nicht passende Kanten:
|P15-P60|=0.70483514695743187950
|P36-P61|=0.70483514695743276768
|P55-P62|=0.70483514695743210154
\geo
ebene(581.7,555)
x(9.32,14.34)
y(8.53,13.32)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 60
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[463.89933065049,-0.74035394419856];
#P[2]=[356.6712500486028,43.22390418430409]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#N(17,12,16); M(18,11,12,achterWinkel); N(19,18,17); M(20,1,2,neunterWinkel);
#M(21,20,1,zehnterWinkel);
#A(18,19,ab(20,21,[1,21]));
#A(39,40,ab(20,21,[1,21]));
#//RA(58,1);
#N(60,23,19); N(61,42,40); N(62,2,59);
#RA(15,60); RA(36,61); RA(55,62);
#
#
#//ergänzt von Button "Knoten zusammenfassen":
#C(20,58); C(21,59);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(14.00289448667338731980,9.99361163397829521671,P1)
p(13.07764483809985378571,10.37297041905457462008,P2)
p(13.49355237800253171088,9.13304750717848179420,P3)
p(12.75192788241104935310,9.80386276307139858943,P4)
p(12.59994570933447199934,8.68419661689087973855,P5)
p(12.07438451879446184023,9.53495241910333923840,P6)
p(13.73471947168350482116,9.61914489156103691414,P7)
p(12.75667801203585050018,8.80387404500076442559,P8)
p(12.18837228288113827546,9.62669152063550903620,P9)
p(12.96464084105190472940,10.25709387278489614914,P10)
p(11.61142543758816358945,8.53310832367593974368,P11)
p(11.11915379070929077443,9.40354995048336661512,P12)
p(11.71616320217170148510,8.60131571871230526938,P13)
p(11.20248228793703404449,9.45929702290898610784,P14)
p(12.03956486982334794789,10.63687597801833462086,P15)
p(12.18462151882387445312,9.64745262647424617342,P16)
p(11.46501566786373160767,10.34183538782703948300,P17)
p(10.61142543758816358945,8.53310832367565019752,P18)
p(11.03822055272594759856,9.43747185575134572844,P19)
p(14.12760381178581781114,10.98580495396689649112,P20)
p(13.13101814842283587836,10.90323973381115862935,P21)
p(9.81451547956902636827,9.13720642730612730986,P22)
p(10.60567464888065281059,9.74881673527529457601,P23)
p(9.32391613851024381177,10.00859169603213061350,P24)
p(10.27567143915540981425,10.31544972133671578263,P25)
p(9.38200319934394677546,11.00690321723365450168,P26)
p(10.38155993174695090886,11.03667465837826711095,P27)
p(9.62430527525821943868,9.55668617415626719946,P28)
p(9.40728074099600597435,10.81133034744568632846,P29)
p(10.40401444215083159861,10.89208880819253266736,P30)
p(10.56182461463228250409,9.90461934058283688387,P31)
p(9.74541703507853185329,11.93853103132932425012,P32)
p(10.74537741984465455403,11.92962996968551792065,P33)
p(9.75211748961421598381,11.81372176894620373844,P34)
p(10.75199155213798007935,11.82959183801429858818,P35)
p(11.35326355128145436879,10.51586757948061112700,P36)
p(10.42386946924646906609,10.88495651223035665112,P37)
p(11.38502550600804674730,11.16096207919736116310,P38)
p(10.24541703507828316333,12.80455643511390739775,P39)
p(10.81522127054316406713,11.98275925715563516860,P40)
p(11.16703631820984732315,13.19265165147203333618,P41)
p(11.30112679747175619127,12.20168255842658666666,P42)
p(12.16697776793948726493,13.18183050954584345504,P43)
p(11.95684696288580539658,12.20415722834834149069,P44)
p(13.00249737577384223641,12.63236987863191984616,P45)
p(12.52850183391084826212,11.75184263527484951339,P46)
p(11.62542153751053852773,13.14763864703914997278,P47)
p(12.82048753142040808939,12.70826532031000510869,P48)
p(12.39205955942029113714,11.80468938392841415919,P49)
p(11.45798082876807555408,12.16175649938872105338,P50)
p(13.62760381178556912118,11.85183035775119186894,P51)
p(13.11991507389831745911,10.99028979258756955062,P52)
p(13.51616559266634354231,11.90843222509794685493,P53)
p(13.02997244437724688737,11.03458085183316939037,P54)
p(11.59161786334746047089,11.17072615525751011489,P55)
p(12.37595529638191926836,11.79106057405185303821,P56)
p(12.13440511058048265625,10.82067224573205344029,P57)
p(11.38502022578461847502,10.37541107913759397263,P60)
p(11.45410062867216893778,11.21345231856956559113,P61)
p(12.14532542999547715112,10.73460631504929807534,P62)
nolabel()
s(P2,P1) s(P3,P1) s(P20,P1)
s(P7,P2) s(P62,P2)
s(P4,P3) s(P5,P3)
s(P7,P4) s(P8,P4)
s(P6,P5) s(P11,P5)
s(P8,P6) s(P13,P6)
s(P10,P7)
s(P9,P8)
s(P10,P9) s(P14,P9)
s(P15,P10)
s(P12,P11) s(P18,P11)
s(P13,P12) s(P17,P12)
s(P14,P13)
s(P16,P14)
s(P60,P15) s(P16,P15)
s(P17,P16)
s(P19,P17)
s(P22,P18) s(P19,P18)
s(P60,P19)
s(P51,P20) s(P21,P20)
s(P57,P21) s(P62,P21)
s(P23,P22) s(P24,P22)
s(P28,P23) s(P60,P23)
s(P25,P24) s(P26,P24)
s(P28,P25) s(P29,P25)
s(P27,P26) s(P32,P26)
s(P29,P27) s(P34,P27)
s(P31,P28)
s(P30,P29)
s(P31,P30) s(P35,P30)
s(P36,P31)
s(P33,P32) s(P39,P32)
s(P34,P33) s(P38,P33)
s(P35,P34)
s(P37,P35)
s(P61,P36) s(P37,P36)
s(P38,P37)
s(P40,P38)
s(P41,P39) s(P40,P39)
s(P61,P40)
s(P42,P41) s(P43,P41)
s(P47,P42) s(P61,P42)
s(P44,P43) s(P45,P43)
s(P47,P44) s(P48,P44)
s(P46,P45) s(P51,P45)
s(P48,P46) s(P53,P46)
s(P50,P47)
s(P49,P48)
s(P50,P49) s(P54,P49)
s(P55,P50)
s(P52,P51)
s(P53,P52) s(P57,P52)
s(P54,P53)
s(P56,P54)
s(P62,P55) s(P56,P55)
s(P57,P56)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) b(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P18,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P20,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P1,P20,MA19) m(P20,P21,MB19) b(P20,MA19,MB19)
pen(2)
color(red) s(P15,P60)
color(red) s(P36,P61)
color(red) s(P55,P62)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
Die Eingabe ist etwas unglücklich, da "zumachen" nicht so wollte wie ich wollte. ;-)
@ Stefan: "limegreen" der nicht passenden Kanten wird schwarz angezeigt, daher auf "red" gesetzt. :-?
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1657, vom Themenstarter, eingetragen 2019-01-26
|
64 Knoten und 3er-Symmetrie, aber leider 3 Rauten.
64 Knoten, 64×Grad 3, 0 Dreiecke,
96 Kanten, minimal 0.99999999999997768452, maximal 1.00000000000001598721
einzustellende Kanten, Abstände und Winkel:
|P21-P61|=0.99999999999998223643
|P40-P63|=0.99999999999997768452
|P59-P65|=0.99999999999998978595
|P56-P66|=1.00000000000001598721
\geo
ebene(546.77,540.79)
x(9.7,14.68)
y(7.53,12.46)
form(.)
#//Eingabe war:
#
#3-reg. girth 4 mit 64
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[423.8924230022264,-202.17849561604595];
#P[2]=[353.9432678545224,-117.58237178222004]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12);
#A(17,19,ab(18,20,[1,21]));
#A(38,39,ab(18,20,[1,21]));
#RA(57,1);
#N(60,19,23); N(61,60,36); RA(21,61);
#N(62,39,42); N(63,62,55); RA(40,63);
#N(64,58,2); N(65,64,15); RA(59,65);
#N(66,37,16);
#RA(56,66);
#
#//ergänzt von Button "Knoten zusammenfassen":
#C(18,57); C(20,58);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.86165214765240349948,8.15815763755528244872,P1)
p(13.22441663565745706421,8.92882676386860474338,P2)
p(12.94959286337605774975,7.74809927345900195661,P3)
p(12.65065285078344459180,8.70237117856316544362,P4)
p(11.97366307344906743992,7.53001432410884596891,P5)
p(11.91111666167002880456,8.52805638052408809813,P6)
p(13.28676204757789491850,7.93077213128956959309,P7)
p(12.49310565689837559944,7.71485971954157978558,P8)
p(12.07265638561574760956,8.62217576716661149305,P9)
p(13.03379365662318178920,8.89824667523260437463,P10)
p(10.99607788280626863298,7.74055456975296074518,P11)
p(11.04935524390332624023,8.73913432259923972367,P12)
p(11.26702144738418986947,7.76311105245542343312,P13)
p(11.08029276008079122562,8.74552257383429498816,P14)
p(12.52436405209805414529,9.75875900985272615173,P15)
p(12.07295510727169229881,8.86644182155545301782,P16)
p(10.15498235486038680619,8.28144116865280288664,P17)
p(14.40459231390597238942,8.99792902065222399699,P18)
p(11.03697776939626429282,8.75269915398322240208,P19)
p(13.55547321960561646392,9.52613046299647336923,P20)
p(11.78183250393619729834,9.41992582044181325784,P21)
p(9.69918908685402314518,9.17152683691180747871,P22)
p(10.68522588415119045635,9.33805441533635871565,P23)
p(9.80009776865052373296,10.16642252890071773663,P24)
p(10.77599148688481278668,9.94817622146148217155,P25)
p(10.09919555729373463748,11.12064499396258021591,P26)
p(10.99479853808411888849,10.67579074727117216526,P27)
p(9.78971251201278391818,9.78308902109336742114,P28)
p(9.99955507378641428318,10.57837182317169499868,P29)
p(10.99553845593229439714,10.48883354929259326127,P30)
p(10.75405424005957222278,9.51842880204310937131,P31)
p(10.77032135386195577098,11.86198848060064214849,P32)
p(11.60847810698308890665,11.31655905602085887551,P33)
p(10.65438405861335091629,11.61606622933302368494,P34)
p(11.59854173674967370289,11.28657225546365339142,P35)
p(11.75399458437301625224,9.52935161369167360590,P36)
p(11.20692970348725125973,10.36644182155546545232,P37)
p(11.65929065304872125353,12.31995527536134105162,P38)
p(11.62641433281320146875,11.32049584768667749302,P39)
p(11.83182220877878698673,10.34181939221668500295,P40)
p(12.65802408730865025177,12.26964099019927800782,P41)
p(12.30922280200643115222,11.33244428546140980529,P42)
p(13.46917468978849363737,11.68480366230665268290,P43)
p(12.79222098414682307066,10.94877806464172564915,P44)
p(14.14600669107226948995,10.94866614659495063222,P45)
p(13.31295012206092920337,10.39547833687111655365,P46)
p(13.14239076222439983610,11.88546431228343180919,P47)
p(13.72620459113028701381,11.30609392195309759188,P48)
p(13.15067048026703311336,10.48831614820717383907,P49)
p(12.43101742513232466081,11.18264998739065951838,P50)
p(14.45246608514684893976,9.99678241431277214701,P51)
p(13.56103197092865997320,9.54363208604628177056,P52)
p(14.29745981581753255796,10.22014818287793147533,P53)
p(13.54003082498461196792,9.56723063536843021382,P54)
p(11.94050668534401182797,10.31121484112197705940,P55)
p(12.93898051105613511425,10.36644182155546012325,P56)
p(12.60521060910009438771,9.83758025200787855624,P59)
p(10.05547359974540277960,8.56125839302053037727,P60)
p(10.80032833428536065412,9.22848505947909458769,P61)
p(11.95137385532511764552,12.26622377300602018124,P62)
p(12.15678173129065875457,11.28754731753601880939,P63)
p(14.21201786674456357673,8.77184329863983691666,P64)
p(13.26175525623905571138,9.08329308765125453817,P65)
p(12.07295510727168164067,9.86644182155545301782,P66)
nolabel()
s(P2,P1) s(P3,P1) s(P18,P1)
s(P7,P2) s(P64,P2)
s(P4,P3) s(P5,P3)
s(P7,P4) s(P8,P4)
s(P6,P5) s(P11,P5)
s(P8,P6) s(P13,P6)
s(P10,P7)
s(P9,P8)
s(P10,P9) s(P14,P9)
s(P15,P10)
s(P12,P11) s(P17,P11)
s(P13,P12) s(P21,P12)
s(P14,P13)
s(P16,P14)
s(P16,P15) s(P65,P15)
s(P66,P16)
s(P22,P17) s(P19,P17)
s(P51,P18) s(P20,P18)
s(P21,P19) s(P60,P19)
s(P59,P20) s(P64,P20)
s(P61,P21)
s(P23,P22) s(P24,P22)
s(P28,P23) s(P60,P23)
s(P25,P24) s(P26,P24)
s(P28,P25) s(P29,P25)
s(P27,P26) s(P32,P26)
s(P29,P27) s(P34,P27)
s(P31,P28)
s(P30,P29)
s(P31,P30) s(P35,P30)
s(P36,P31)
s(P33,P32) s(P38,P32)
s(P34,P33) s(P40,P33)
s(P35,P34)
s(P37,P35)
s(P37,P36) s(P61,P36)
s(P66,P37)
s(P41,P38) s(P39,P38)
s(P40,P39) s(P62,P39)
s(P63,P40)
s(P42,P41) s(P43,P41)
s(P47,P42) s(P62,P42)
s(P44,P43) s(P45,P43)
s(P47,P44) s(P48,P44)
s(P46,P45) s(P51,P45)
s(P48,P46) s(P53,P46)
s(P50,P47)
s(P49,P48)
s(P50,P49) s(P54,P49)
s(P55,P50)
s(P52,P51)
s(P53,P52) s(P59,P52)
s(P54,P53)
s(P56,P54)
s(P56,P55) s(P63,P55)
s(P66,P56)
s(P65,P59)
s(P61,P60)
s(P63,P62)
s(P65,P64)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) b(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
pen(2)
color(green) s(P21,P61)
color(green) s(P40,P63)
color(green) s(P59,P65)
color(green) s(P56,P66)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1658, vom Themenstarter, eingetragen 2019-01-26
|
Eventuell geht diese sehr knappe Konstruktion mit 60 Knoten. Das wäre dann ein echter 3-reg. girth 5.
62 Knoten, 1×Grad 1, 1×Grad 2, 59×Grad 3, 1×Grad 4, 0 Dreiecke,
92 Kanten, minimal 0.89799749469174161565, maximal 1.01654498563394168897
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=1.01654498563394168897
|P57-P1|=1.01047471476121497602
|P15-P60|=0.89799749469174450223
|P36-P62|=0.89799749469174161565
|P55-P64|=0.89810356149368764100
nicht passende Kanten:
|P15-P60|=0.89799749469174450223
|P21-P16|=1.01654498563394168897
|P36-P62|=0.89799749469174161565
|P40-P37|=1.01654498563394035671
|P55-P64|=0.89810356149368764100
|P57-P1|=1.01047471476121497602
|P59-P56|=1.01654498563394013466
\geo
ebene(676.37,645)
x(9.07,14.08)
y(8.04,12.81)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 60 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[454.18956019256836,-228.36245588348953];
#P[2]=[368.1581549857342,-124.31654720728966]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12);
#RA(21,16);
#A(17,19,ab(18,20,[1,21]));
#A(38,39,ab(18,20,[1,21]));
#RA(57,1);
#N(60,23,19); N(62,42,39); N(64,2,58);
#RA(15,60); RA(36,62); RA(55,64);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.36418679011744004015,8.30851691721781016042,P1)
p(12.72695127812249182853,9.07918604353112890237,P2)
p(12.40171254010500589970,8.03714389338714063626,P3)
p(12.08414330402288072719,8.98537898042738270021,P4)
p(11.40171361515050563185,8.03861021185217694551,P5)
p(11.33916720337146344377,9.03665226826741907473,P6)
p(12.54212141340204667017,8.09641551023893590866,P7)
p(11.64795778763771139097,8.08552221666116821552,P8)
p(11.42301955825590198401,9.05989524223329212305,P9)
p(12.42258873849226574748,9.08924577751976059403,P10)
p(10.42149081456513037836,8.23650730938663855341,P11)
p(10.40498099237743012679,9.23637101298395002402,P12)
p(10.68840009773300891993,8.27737486558843293949,P13)
p(10.44052108168374104480,9.24616586131581286168,P14)
p(11.91547296161416369387,9.95112372064240346958,P15)
p(11.42642708225544012635,9.07886565797846145642,P16)
p(9.54462989218231960820,8.71725144382612171512,P17)
p(13.88942103570953179315,9.15947460550630943033,P18)
p(10.39363859778687704249,9.24563030204025615433,P19)
p(13.00798577143706324932,9.63177945927866296927,P20)
p(11.03167718392490392887,10.01563469332577938076,P21)
p(9.06906730857791565370,9.59693333466820597266,P22)
p(10.05487062842292722564,9.76483751741108285671,P23)
p(9.31393498390842644596,10.56648984234490207257,P24)
p(10.29419230912330007754,10.36876382897644610637,P25)
p(9.81399565260109163489,11.43248021620978782664,P26)
p(10.71021889388143044641,10.98887690040955611437,P27)
p(9.29527245325072115634,10.41523017748271584537,P28)
p(9.73183114367805757183,11.19565555078714780279,P29)
p(10.68853936445122165821,10.90460679146143263551,P30)
p(10.21540271467527105642,10.02361773895351859665,P31)
p(10.47444319546686308797,12.18335240448324086060,P32)
p(11.34928269474357520608,11.69893951189544800684,P33)
p(10.37673226874746035264,11.93163173113531527747,P34)
p(11.34004505976407806145,11.66325053458129268336,P35)
p(11.21535632221307565715,10.03325012038976460360,P36)
p(10.70328181427299796269,10.89219115347522759407,P37)
p(11.32848477969712774893,12.70355714533578783687,P38)
p(11.36296540722478098928,11.70415177896771652399,P39)
p(11.71209821902207792732,10.76707852690760525149,P40)
p(12.32813104555146210828,12.67696122152249316173,P41)
p(11.98194826377682176144,11.73879413533646953738,P42)
p(13.04633004651044814182,11.98112345665088440683,P43)
p(12.38601356562266531114,11.23013600997285976746,P44)
p(13.54747813612353724011,11.11576191817280268026,P45)
p(12.71596960506151319237,10.56024993560980362872,P46)
p(12.92453855224567504933,12.07274555109062319502,P47)
p(13.38319968595324205296,11.30510161155154058576,P48)
p(12.65374432873604959582,10.62107318975378333903,P49)
p(12.12616710417262488875,11.47058026572311106861,P50)
p(13.86885126289011083145,10.16880927237034626387,P51)
p(13.01263814898929460639,9.65218648581881666360,P52)
p(13.69941650724984150145,10.37905338328006799031,P53)
p(12.98631334537651227379,9.67799426984792887652,P54)
p(11.63574853441434342471,10.59909324548916487174,P55)
p(12.63563002240188026803,10.61448837393372990334,P56)
p(13.89373684631377514620,9.16911896645672364059,P57)
p(13.01033093468572943152,9.63772754010920884582,P58)
p(12.02400421929829299472,9.80252927102558579975,P59)
p(11.02049977127547641942,10.02476127252756654684,P60)
p(11.72558361746691701910,10.77221399477781105247,P62)
p(12.02170958138239242885,9.78815300269012134038,P64)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15) s(P60,P15)
s(P15,P16) s(P14,P16)
s(P11,P17) s(P22,P17)
s(P1,P18)
s(P17,P19)
s(P18,P20)
s(P19,P21) s(P12,P21) s(P16,P21)
s(P22,P23)
s(P22,P24)
s(P24,P25)
s(P24,P26)
s(P26,P27)
s(P23,P28) s(P25,P28)
s(P25,P29) s(P27,P29)
s(P29,P30)
s(P28,P31) s(P30,P31)
s(P26,P32)
s(P32,P33)
s(P27,P34) s(P33,P34)
s(P30,P35) s(P34,P35)
s(P31,P36) s(P62,P36)
s(P35,P37) s(P36,P37)
s(P32,P38) s(P41,P38)
s(P38,P39)
s(P33,P40) s(P37,P40) s(P39,P40)
s(P41,P42)
s(P41,P43)
s(P43,P44)
s(P43,P45)
s(P45,P46)
s(P42,P47) s(P44,P47)
s(P44,P48) s(P46,P48)
s(P48,P49)
s(P47,P50) s(P49,P50)
s(P45,P51)
s(P51,P52)
s(P46,P53) s(P52,P53)
s(P49,P54) s(P53,P54)
s(P50,P55) s(P64,P55)
s(P54,P56) s(P55,P56)
s(P51,P57) s(P1,P57)
s(P57,P58)
s(P52,P59) s(P56,P59) s(P58,P59)
s(P23,P60) s(P19,P60)
s(P42,P62) s(P39,P62)
s(P2,P64) s(P58,P64)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) b(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
pen(2)
color(limegreen) s(P21,P16)
color(limegreen) s(P57,P1)
color(limegreen) s(P15,P60)
color(limegreen) s(P36,P62)
color(limegreen) s(P55,P64)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
Detail Mitte
https://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_detail_3_5_60.png
Hier mit Überschneidungen.
60 Knoten, 60×Grad 3, 0 Dreiecke,
90 Kanten, minimal 0.99999999999999822364, maximal 1.00000000000002353673
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=1.00000000000002353673
|P15-P60|=1.00000000000000022204
|P36-P62|=0.99999999999999822364
|P55-P64|=1.00000000000000288658
\geo
ebene(602.07,574.02)
x(9.2,14.23)
y(8.03,12.83)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 60 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[419.3320164680902,-192.98972297229767];
#P[2]=[336.4525932635061,-106.65900290468555]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12);
#RA(21,16);
#A(17,19,ab(18,20,[1,21]));
#A(38,39,ab(18,20,[1,21]));
#RA(57,1);
#N(60,23,19); N(62,42,39); N(64,2,58);
#RA(15,60); RA(36,62); RA(55,64);
#
#
#//ergänzt von Button "Knoten zusammenfassen":
#C(18,57); C(20,58);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.50393715986178122535,8.38737841319701971088,P1)
p(12.81139693076016783380,9.10875766925854790657,P2)
p(12.56283278163684613560,8.04926223599477808079,P3)
p(12.13181541382747319346,8.95160586712799499765,P4)
p(11.56302799611390064172,8.02950392520121880580,P5)
p(11.42676726950505639024,9.02017693602973125166,P6)
p(12.68276237214053736579,8.11706560499225915351,P7)
p(11.68876594265416990481,8.05510870255185729150,P8)
p(11.67392238755925859550,9.05499853091903439406,P9)
p(12.67199796937975087019,9.11700766713046384382,P10)
p(10.57588746782090538545,8.18935878875383949094,P11)
p(10.52073639296936491405,9.18783681001555940782,P12)
p(10.81225317338810398837,8.23127109521375288637,P13)
p(10.68822959631839708550,9.22355036655364735054,P14)
p(12.15240216714531840125,9.97141986408247227303,P15)
p(11.67932527267151776584,9.09039872250014724386,P16)
p(9.68164315993125512705,8.63693796365696009332,P17)
p(14.02551980333417880331,9.24057917856725019590,P18)
p(10.51007975708070851795,9.19702081869131404801,P19)
p(13.12625552407558515711,9.67798488960623615185,P20)
p(11.16821954629532065439,9.94991657366177761901,P21)
p(9.20354094432850544649,9.51524216576221171238,P22)
p(10.17454382039171534302,9.75430996927614302194,P23)
p(9.38127593455335073713,10.49932055351888493533,P24)
p(10.37823712596249770002,10.42142072794749729781,P25)
p(9.86406712823173137394,11.37505605200379044106,P26)
p(10.79014548575726273327,10.99772479737091934737,P27)
p(9.38003057931549477644,10.36155679697848341902,P28)
p(9.82337254260549386231,11.25336140740490620260,P29)
p(10.69672431250458899399,10.76627138901598712550,P30)
p(10.25138800882017164895,9.87090801215679114478,P31)
p(10.49607576513329298962,12.15001739483440523770,P32)
p(11.38835863409213366992,11.69854061607099637854,P33)
p(10.41419003447517788175,11.92436253599982087792,P34)
p(11.33554087963909395853,11.53563046874045738832,P35)
p(11.25112857780109898442,9.89368507811555986109,P36)
p(10.72468033515654006749,10.74389225746448595089,P37)
p(11.33081285474910160360,12.70066609520491596186,P38)
p(11.40164053685824008255,11.70317752913157782757,P39)
p(11.72459749245682125718,10.75676387494515573451,P40)
p(12.33049771382424530941,12.67556265846989305146,P41)
p(12.05203506686264880443,11.71511559889443709892,P42)
p(13.09386710182433510852,12.02960044791546145859,P43)
p(12.52792327822456108777,11.20515664235363573198,P44)
p(13.61088069366889996559,11.17362326022411700421,P45)
p(12.82106306275221285773,10.56028150402847742839,P46)
p(12.97518286655849983902,12.09956083545838190219,P47)
p(13.52583733275486643777,11.26971312747236275698,P48)
p(12.66732911795068261540,10.75691331749410473151,P49)
p(12.11458983981461123847,11.59026755814187126248,P50)
p(13.96601258506033182982,10.23880705384088329879,P51)
p(13.12888079095303339727,9.69180581134257046472,P52)
p(13.81153261015125011113,10.42254960621555248679,P53)
p(13.01420534205703916086,9.81900240213502151221,P54)
p(11.63444507306811459557,10.71307829523109589331,P55)
p(12.63397021018647592427,10.74389225746449483267,P56)
p(12.14515877926238829332,9.87150278882219467391,P59)
p(11.15243409773400706797,9.96342860899870963465,P60)
p(11.74419198259609053991,10.76367845674091938690,P62)
p(12.14134973768442904429,9.85107617168949722952,P64)
nolabel()
s(P2,P1) s(P3,P1) s(P18,P1)
s(P7,P2) s(P64,P2)
s(P4,P3) s(P5,P3)
s(P7,P4) s(P8,P4)
s(P6,P5) s(P11,P5)
s(P8,P6) s(P13,P6)
s(P10,P7)
s(P9,P8)
s(P10,P9) s(P14,P9)
s(P15,P10)
s(P12,P11) s(P17,P11)
s(P13,P12) s(P21,P12)
s(P14,P13)
s(P16,P14)
s(P60,P15) s(P16,P15)
s(P21,P16)
s(P22,P17) s(P19,P17)
s(P51,P18) s(P20,P18)
s(P21,P19) s(P60,P19)
s(P59,P20) s(P64,P20)
s(P23,P22) s(P24,P22)
s(P28,P23) s(P60,P23)
s(P25,P24) s(P26,P24)
s(P28,P25) s(P29,P25)
s(P27,P26) s(P32,P26)
s(P29,P27) s(P34,P27)
s(P31,P28)
s(P30,P29)
s(P31,P30) s(P35,P30)
s(P36,P31)
s(P33,P32) s(P38,P32)
s(P34,P33) s(P40,P33)
s(P35,P34)
s(P37,P35)
s(P62,P36) s(P37,P36)
s(P40,P37)
s(P41,P38) s(P39,P38)
s(P40,P39) s(P62,P39)
s(P42,P41) s(P43,P41)
s(P47,P42) s(P62,P42)
s(P44,P43) s(P45,P43)
s(P47,P44) s(P48,P44)
s(P46,P45) s(P51,P45)
s(P48,P46) s(P53,P46)
s(P50,P47)
s(P49,P48)
s(P50,P49) s(P54,P49)
s(P55,P50)
s(P52,P51)
s(P53,P52) s(P59,P52)
s(P54,P53)
s(P56,P54)
s(P64,P55) s(P56,P55)
s(P59,P56)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
pen(2)
color(green) s(P21,P16)
color(green) s(P15,P60)
color(green) s(P36,P62)
color(green) s(P55,P64)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
Ein zusätzlicher Winkel könnte helfen. Oder die Punkte in einem N(...) tauschen.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1659, vom Themenstarter, eingetragen 2019-01-26
|
Rekord! 3-reg. girth 5 mit 66 Knoten. Beweglich und asymmetrisch. :-)
66 Knoten, 66×Grad 3, 0 Dreiecke,
99 Kanten, minimal 0.99999999999998590017, maximal 1.00000000000000688338
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=1.00000000000000000000
|P57-P18|=0.99999999999998590017
|P36-P61|=0.99999999999999156231
|P66-P60|=0.99999999999999777955
|P15-P65|=1.00000000000000688338
\geo
ebene(650.45,638.59)
x(7.66,13.02)
y(7.8,13.06)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 60 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[240.60122957264008,-203.12560776993575];
#P[2]=[163.50632174744456,-109.49689848210647]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12);
#RA(21,16);
#A(17,19,ab(18,20,[1,21]));
#A(38,39,ab(18,20,[1,21]));
#RA(57,18);
#N(60,23,19); N(61,42,39); N(62,58,20);
#RA(36,61);
#N(63,20,2);
#M(64,62,58,zwölfterWinkel); N(65,63,64); N(66,64,55);
#RA(66,60);
#RA(15,65);
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(11.98377355401591870532,8.32521550470400839572,P1)
p(11.34812077882200043177,9.09719060105638988034,P2)
p(11.13398099374949268281,7.79809824591253963888,P3)
p(10.79707181413712646645,8.73963539583967907731,P4)
p(10.13398099374949268281,7.79809824591253786252,P5)
p(10.07348267286900522777,8.79626654493362103437,P6)
p(11.58671709397615678938,8.12607176260516439470,P7)
p(10.36257079516035517486,7.83896405483445590789,P8)
p(10.34496444658107172643,8.83880905106622449807,P9)
p(11.31341855466473589331,9.08800102633002104824,P10)
p(9.19629020924649509539,8.14556909743558499315,P11)
p(9.36121213314694067265,9.13187572268808445131,P12)
p(9.32553178771917856693,8.13251246893589829767,P13)
p(9.38846111531933402716,9.13053045460939927125,P14)
p(10.70771199394010508854,9.88368913249671443566,P15)
p(10.37057337383032162847,8.94223411454287031574,P16)
p(8.38812244777967030984,8.73452144637877658795,P17)
p(12.53135990446136638354,9.16196468385259521483,P18)
p(9.23461959043167368577,9.26691471031249314194,P19)
p(11.71726043634922298509,9.74269014051824200351,P20)
p(10.02433946266047115614,9.88038233244664532151,P21)
p(7.82218663475210185254,9.55897075078313207541,P22)
p(8.77778801882404735579,9.85363326071573730758,P23)
p(7.65748726967740722671,10.54531456464521177452,P24)
p(8.65642396485487353175,10.49921164686416119594,P25)
p(8.03744582194523182750,11.47031807737288744420,P26)
p(8.98374185924952683990,11.14701665488577830843,P27)
p(7.78884297149823190409,10.00191573901220287723,P28)
p(7.98839218874120415848,11.24334439449889266882,P29)
p(8.91994200515568458343,10.87973067152058703755,P30)
p(8.78247303677294866020,9.88922459746965820671,P31)
p(8.71514121312916678619,12.20566082519056649858,P32)
p(9.56481481067186933842,11.67835182883374223195,P33)
p(8.65395734285328721569,12.09107288877510377745,P34)
p(9.55321694915653196745,11.65365757071761443342,P35)
p(9.74863071792482394073,10.14717679294631835774,P36)
p(9.00588022125290876829,10.81674508647104993031,P37)
p(9.56699445736729892076,12.72944136156144878669,P38)
p(9.73782626783763127776,11.74414115729301322233,P39)
p(10.00522515390723299333,10.78055523184124631086,P40)
p(10.54464511220168532191,12.93967741247064928700,P41)
p(10.45412005052139114980,11.94378323475507563955,P42)
p(11.51959553709453132342,12.71725513615539604473,P43)
p(11.09739563569322839953,11.81075238201907851021,P44)
p(12.23085853421160784649,12.01432914507807581117,P45)
p(11.57225031039025786583,11.26184312692565647751,P46)
p(10.96703999227593939736,12.80221968164588020045,P47)
p(12.03954542771210611818,12.14594452005155567065,P48)
p(11.34925113707098098814,11.42241581135489347787,P49)
p(10.48526204940422879019,11.92592634390885208973,P50)
p(12.65355699928895738537,11.10805876179213136368,P51)
p(11.84295357534346848638,10.52246326224670980309,P52)
p(12.57081009036060237349,11.20819272314736991802,P53)
p(11.82451800651261919484,10.54257411945165934242,P54)
p(10.35676886254304740476,10.93421595224692310921,P55)
p(11.25833628947616915639,11.36685457129657450537,P56)
p(12.81438690990503914691,10.12107662423784582018,P57)
p(11.83807175247783760597,10.33742983863018949364,P58)
p(10.84515089299097212461,10.45620764293664706202,P59)
p(9.73867085510969943130,10.13058844649791367942,P60)
p(10.34520891886394799997,10.94973174443825314484,P61)
p(12.71144512924510117102,9.85037856334785288936,P62)
p(12.33854060743997749228,8.95910163306714402154,P63)
p(11.73031056691766060851,10.04370463661926571319,P64)
p(11.35129622363428225640,9.11831383939602346800,P65)
p(10.73098896976761551514,10.00687604080730785938,P66)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15) s(P65,P15)
s(P15,P16) s(P14,P16)
s(P11,P17) s(P22,P17)
s(P1,P18)
s(P17,P19)
s(P18,P20)
s(P19,P21) s(P12,P21) s(P16,P21)
s(P22,P23)
s(P22,P24)
s(P24,P25)
s(P24,P26)
s(P26,P27)
s(P23,P28) s(P25,P28)
s(P25,P29) s(P27,P29)
s(P29,P30)
s(P28,P31) s(P30,P31)
s(P26,P32)
s(P32,P33)
s(P27,P34) s(P33,P34)
s(P30,P35) s(P34,P35)
s(P31,P36) s(P61,P36)
s(P35,P37) s(P36,P37)
s(P32,P38) s(P41,P38)
s(P38,P39)
s(P33,P40) s(P37,P40) s(P39,P40)
s(P41,P42)
s(P41,P43)
s(P43,P44)
s(P43,P45)
s(P45,P46)
s(P42,P47) s(P44,P47)
s(P44,P48) s(P46,P48)
s(P48,P49)
s(P47,P50) s(P49,P50)
s(P45,P51)
s(P51,P52)
s(P46,P53) s(P52,P53)
s(P49,P54) s(P53,P54)
s(P50,P55)
s(P54,P56) s(P55,P56)
s(P51,P57) s(P18,P57)
s(P57,P58)
s(P52,P59) s(P56,P59) s(P58,P59)
s(P23,P60) s(P19,P60)
s(P42,P61) s(P39,P61)
s(P58,P62) s(P20,P62)
s(P20,P63) s(P2,P63)
s(P62,P64)
s(P63,P65) s(P64,P65)
s(P64,P66) s(P55,P66) s(P60,P66)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
color(#D3D3D3) m(P58,P62,MA111) m(P62,P64,MB111) f(P62,MA111,MB111)
pen(2)
color(green) s(P21,P16)
color(green) s(P57,P18)
color(green) s(P36,P61)
color(green) s(P66,P60)
color(green) s(P15,P65)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1660, eingetragen 2019-01-27
|
https://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_medaille-jan-19.png
die medaillenprägung selbst zeigt einen dreier girth-4 mit 75 hölzern
einen moment lang glaubte ich damit nen girth 5er gefunden zu haben, tya so kanns gehen
wie ist der rekord in der kategorie dreier girth-4,
ist es giuseppe´s 48er?
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1661, vom Themenstarter, eingetragen 2019-01-27
|
Danke für die schnieke Medallie! :-)
Der kleinste 3-reg. girth 4 ist der mit 20 Knoten unten auf der Math Magic Seite.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1662, eingetragen 2019-01-27
|
aha, da war noch einer drunter, 30 hölzer, dann lohnt es grad wenig nen 42er zu basteln...
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1663, vom Themenstarter, eingetragen 2019-01-28
|
Hier das Paper dazu aus Geombinatorics 2009.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1664, eingetragen 2019-01-28
|
hast du das paper verstanden, bzw kannst du nachvollziehen, ob die 30 hölzer fürn 3.reg. girth 4 das absolute minimum (floor) darstellen?
ist das ggfls. absolut zu verstehen oder könnte es weitere 30er varianten geben?
ich hab als persönliches minimum noch ne 33er lösung dafür gefunden...
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1665, vom Themenstarter, eingetragen 2019-01-28
|
Ich verstehe es so, dass 30 als untere Grenze nicht bewiesen wurde. Eine andere Lösung könnte es wohl auch noch geben. Ich habe das Paper aber auch nur grob gelesen.
Ruhig alles Lösungen posten, auch wenn kein Rekord. Schaden kann das nie.
Hier eine weitere 66 Knoten Lösung für girth 5. Punktsymmetrischer Rahmen, aber innen asymmetrisch.
66 Knoten, 66×Grad 3, 0 Dreiecke,
99 Kanten, minimal 0.99999999999999611422, maximal 1.00000000000000466294
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=0.99999999999999900080
|P65-P66|=0.99999999999999744649
\geo
ebene(572.77,555)
x(9.33,14.55)
y(8.45,13.51)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 66 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[393.89975128127605,-112.19253639277946];
#P[2]=[317.48424155961885,-33.5328113883549]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12); N(22,20,2);
#M(23,18,20,zwölfterWinkel); M(24,23,18,dreizehnterWinkel);
#N(25,24,20); N(26,22,15); N(27,26,25);
#M(28,17,19,vierzehnterWinkel);
#RA(21,16);
#M(29,28,17,fuenfzehnterWinkel); M(30,28,29,sechzehnterWinkel);
#N(31,29,19); N(32,27,31);
#A(30,23,ab(23,30,[1,31]));
#N(62,55,29); N(63,24,60); N(64,61,58);
#N(65,63,32); N(66,64,62);
#RA(65,66);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.59180527793916226642,8.97696369939261273885,P1)
p(12.89500455582175675318,9.69422847174426038919,P2)
p(12.74201271767273446756,8.44984644060114575836,P3)
p(12.40510353806037180391,9.39138359052828697315,P4)
p(11.74201271767273446756,8.44984644060114931108,P5)
p(11.59988674696423593957,9.43969501914746622617,P6)
p(13.15359762220932537957,8.72824212297100920921,P7)
p(11.94769227442174042153,8.50212832014946684467,P8)
p(11.86342919769027659527,9.49857186290527621964,P9)
p(12.84682858561413887344,9.68002611011644553685,P10)
p(10.76375823767994432956,8.65725466699064227782,P11)
p(10.78348809275522413031,9.65706001445519213178,P12)
p(10.95848381703991591962,8.67249082111118241301,P13)
p(10.87810323959930158821,9.66925506744544627225,P14)
p(12.33456870171033514794,10.53885660057591877603,P15)
p(11.87790248722216546184,9.64921848957513361711,P16)
p(9.87853107310352562820,9.12241363669454230489,P17)
p(14.09707282376473003183,9.83992644895681500827,P18)
p(10.62691417661663706440,9.78568034803778807884,P19)
p(13.30530649125907594055,10.45075054369321776448,P20)
p(11.33669219005546580092,10.49010576753855339405,P21)
p(13.89364688245428425262,9.64213717249022472799,P22)
p(14.32115842836476105049,10.81449591380323482781,P23)
p(13.34074645688439098024,11.01145369145614871798,P24)
p(14.28084892982969478226,10.67056171390002994315,P25)
p(12.89604596736021591141,9.71136443737536403376,P26)
p(13.28151440992564857879,10.63408545685317996288,P27)
p(9.42610431399105763717,10.01421519962151407412,P28)
p(10.42602547017865610712,10.02677232542537666404,P29)
p(9.32627243825116991616,11.00921951950472710280,P30)
p(11.28520813465183714186,10.53844130930925970802,P31)
p(12.28515401671044671161,10.54884481612326219135,P32)
p(10.05562558867676870022,12.84675173391534919176,P33)
p(10.75242631079417421347,12.12948696156370331778,P34)
p(10.90541814894319827545,13.37386899270681439589,P35)
p(11.24232732855555916274,12.43233184277967318110,P36)
p(11.90541814894319649909,13.37386899270681261953,P37)
p(12.04754411965169680343,12.38402041416049392808,P38)
p(10.49383324440660736343,13.09547331033695272140,P39)
p(11.69973859219419054511,13.32158711315849508594,P40)
p(11.78400166892565437138,12.32514357040268571097,P41)
p(10.80060228100179209321,12.14368932319151639376,P42)
p(12.88367262893598308438,13.16646076631732320550,P43)
p(12.86394277386070683633,12.16665541885276979883,P44)
p(12.68894704957601327067,13.15122461219678129396,P45)
p(12.76932762701663115479,12.15446036586251388201,P46)
p(11.31286216490559581871,11.28485883273204137822,P47)
p(11.76952837939376550480,12.17449694373282653714,P48)
p(13.76889979351240533845,12.70130179661341962571,P49)
p(9.55035804285120093482,11.98378898435114692234,P50)
p(13.02051668999929390225,12.03803508527017029905,P51)
p(10.34212437535685502610,11.37296488961474416612,P52)
p(12.31073867656046516572,11.33360966576941031292,P53)
p(9.75378398416164849039,12.18157826081773720261,P54)
p(10.30668440973153998641,10.81226174185181321263,P55)
p(9.36658193678623618439,11.15315371940793198746,P56)
p(10.75138489925571505523,12.11235099593259789685,P57)
p(10.36591645669028238785,11.18962997645478196773,P58)
p(14.22132655262487332948,11.80950023368645140920,P59)
p(13.22140539643727485952,11.79694310788258349021,P60)
p(12.36222273196409560114,11.28527412399870044624,P61)
p(11.27365260285875159241,10.55736467737225581232,P62)
p(12.37377826375717937424,11.26635075593570611829,P63)
p(11.36586233874889195761,11.20003348326878978014,P64)
p(13.25481423517822143765,10.79330148042396686492,P65)
p(12.25601230342247482952,10.74436579690994975067,P66)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15)
s(P15,P16) s(P14,P16)
s(P11,P17)
s(P1,P18)
s(P17,P19)
s(P18,P20)
s(P19,P21) s(P12,P21) s(P16,P21)
s(P20,P22) s(P2,P22)
s(P18,P23) s(P59,P23)
s(P23,P24)
s(P24,P25) s(P20,P25)
s(P22,P26) s(P15,P26)
s(P26,P27) s(P25,P27)
s(P17,P28)
s(P28,P29)
s(P28,P30) s(P50,P30)
s(P29,P31) s(P19,P31)
s(P27,P32) s(P31,P32)
s(P33,P34)
s(P33,P35)
s(P35,P36)
s(P35,P37)
s(P37,P38)
s(P34,P39) s(P36,P39)
s(P36,P40) s(P38,P40)
s(P40,P41)
s(P39,P42) s(P41,P42)
s(P37,P43)
s(P43,P44)
s(P38,P45) s(P44,P45)
s(P41,P46) s(P45,P46)
s(P42,P47)
s(P46,P48) s(P47,P48)
s(P43,P49)
s(P33,P50)
s(P49,P51)
s(P50,P52)
s(P44,P53) s(P48,P53) s(P51,P53)
s(P34,P54) s(P52,P54)
s(P30,P55)
s(P52,P56) s(P55,P56)
s(P47,P57) s(P54,P57)
s(P56,P58) s(P57,P58)
s(P49,P59)
s(P59,P60)
s(P51,P61) s(P60,P61)
s(P55,P62) s(P29,P62)
s(P24,P63) s(P60,P63)
s(P61,P64) s(P58,P64)
s(P63,P65) s(P32,P65) s(P66,P65)
s(P64,P66) s(P62,P66)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) b(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
color(#D3D3D3) m(P20,P18,MA111) m(P18,P23,MB111) b(P18,MA111,MB111)
color(#FFB6C1) m(P18,P23,MA112) m(P23,P24,MB112) b(P23,MA112,MB112)
color(#FFA07A) m(P19,P17,MA113) m(P17,P28,MB113) b(P17,MA113,MB113)
color(#20B2AA) m(P17,P28,MA114) m(P28,P29,MB114) b(P28,MA114,MB114)
color(#87CEFA) m(P29,P28,MA115) m(P28,P30,MB115) b(P28,MA115,MB115)
pen(2)
color(green) s(P21,P16)
color(green) s(P65,P66)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
Selber Graph mit verzogenem Haus, also Variation. Beweglich sind die girth 5er ja alle, da sie nur bewegliche Untergraphen besitzen.
66 Knoten, 66×Grad 3, 0 Dreiecke,
99 Kanten, minimal 0.99999999999999189537, maximal 1.00000000000012123635
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=1.00000000000000222045
|P65-P66|=1.00000000000012123635
\geo
ebene(581.56,555)
x(9.29,14.54)
y(8.47,13.47)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 60 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[391.63422333847257,-111.57495608189052];
#P[2]=[314.4023290813584,-32.07487048456011]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12); N(22,20,2);
#M(23,18,20,zwölfterWinkel); M(24,23,18,dreizehnterWinkel);
#N(25,24,20); N(26,22,15); N(27,26,25);
#M(28,17,19,vierzehnterWinkel);
#RA(21,16);
#M(29,28,17,fuenfzehnterWinkel); M(30,28,29,sechzehnterWinkel);
#N(31,29,19); N(32,27,31);
#A(30,23,ab(23,30,[1,31]));
#N(62,55,29); N(63,24,60); N(64,61,58);
#N(65,63,32); N(66,64,62);
#RA(65,66);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.53339785658565830317,8.99334969424347896449,P1)
p(12.83659713446825278993,9.71061446659512661483,P2)
p(12.68360529631923228067,8.46623243545201198401,P3)
p(12.34669611670686606431,9.40776958537915319880,P4)
p(11.68360529631923228067,8.46623243545201198401,P5)
p(11.54147932561073019997,9.45608101399833067546,P6)
p(13.09519020085582141633,8.74462811782187721121,P7)
p(11.88928485306823645828,8.51851431500033129396,P8)
p(11.80501905887331481892,9.51495762795330435324,P9)
p(12.78841855931560012039,9.69641126536480157938,P10)
p(10.70008211213786353255,8.64701447598077166390,P11)
p(10.70663254355982374477,9.64699302167472083624,P12)
p(10.92260245317732270109,8.67059300214388883887,P13)
p(10.81632886016518213523,9.66492992865737754471,P14)
p(12.27316444985066645756,10.55344872235224151780,P15)
p(11.81632832757019357928,9.66389784838283283364,P16)
p(9.80880091824692179614,9.10046550246140384388,P17)
p(14.03866540241122606858,9.85631244380768301028,P18)
p(10.54837697657431760945,9.77353849549329822821,P19)
p(13.20718720161017500914,10.41186982301585217670,P20)
p(11.24880881509514729544,10.48725779576920480451,P21)
p(13.83352741029038490694,9.63231998946418421781,P22)
p(14.31512665572667764025,10.81733750873327970510,P23)
p(13.32089887753434709339,10.92462742005183073957,P24)
p(14.20605974755187261849,10.45934230940480524907,P25)
p(12.83814868390196295422,9.72834702239430981763,P26)
p(13.22453617566567807273,10.65068356954428807626,P27)
p(9.34930344317057482328,9.98864457809787786857,P28)
p(10.23081559436917231665,10.46080591417826965994,P29)
p(9.29374881635574290328,10.98710022730792879031,P30)
p(11.22982036717509224388,10.50540932112205538829,P31)
p(12.22725302158215043846,10.57702007396330046163,P32)
p(10.07547761549676224035,12.81108804179772775456,P33)
p(10.77227833761416952996,12.09382326944608188057,P34)
p(10.92527017576319003922,13.33820530058919651140,P35)
p(11.26217935537555447922,12.39666815066205529661,P36)
p(11.92527017576319181558,13.33820530058919295868,P37)
p(12.06739614647169034356,12.34835672204287604359,P38)
p(10.51368527122660267992,13.05980961821932950784,P39)
p(11.71959061901418408524,13.28592342104087720145,P40)
p(11.80385641320910750096,12.28948010808790058945,P41)
p(10.82045691276682219950,12.10802647067640513967,P42)
p(12.90879335994455878733,13.15742326006043327880,P43)
p(12.90224292852260035147,12.15744471436648410645,P44)
p(12.68627301890509961879,13.13384473389731610382,P45)
p(12.79254661191723840830,12.13950780738383450341,P46)
p(11.33571102223175408596,11.25098901368896697761,P47)
p(11.79254714451222696425,12.14053988765837743813,P48)
p(13.80007455383550052375,12.70397223357980109881,P49)
p(9.57021006967119625131,11.94812529223352548513,P50)
p(13.06049849550810293408,12.03089924054791381991,P51)
p(10.40168827047224553439,11.39256791302535631871,P52)
p(12.36006665698727324809,11.31717994027200191454,P53)
p(9.77534806179203741294,12.17211774657702427760,P54)
p(10.28797659454807345014,10.87981031598937775584,P55)
p(9.40281572453054792504,11.34509542663640324633,P56)
p(10.77072678818045936566,12.07609071364689867778,P57)
p(10.38433929641674247080,11.15375416649692041915,P58)
p(14.25957202891184749660,11.81579315794332885048,P59)
p(13.37805987771325000324,11.34363182186293350640,P60)
p(12.37905510490732829965,11.29902841491915133076,P61)
p(11.22781654432412601352,10.53819522732240088203,P62)
p(12.38105892775829630637,11.26624250871880938973,P63)
p(11.38177195082380777080,11.22536491933805713472,P64)
p(13.21728560575174604708,10.71785857112395490276,P65)
p(12.21811424482007168990,10.67715732428571762114,P66)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15)
s(P15,P16) s(P14,P16)
s(P11,P17)
s(P1,P18)
s(P17,P19)
s(P18,P20)
s(P19,P21) s(P12,P21) s(P16,P21)
s(P20,P22) s(P2,P22)
s(P18,P23) s(P59,P23)
s(P23,P24)
s(P24,P25) s(P20,P25)
s(P22,P26) s(P15,P26)
s(P26,P27) s(P25,P27)
s(P17,P28)
s(P28,P29)
s(P28,P30) s(P50,P30)
s(P29,P31) s(P19,P31)
s(P27,P32) s(P31,P32)
s(P33,P34)
s(P33,P35)
s(P35,P36)
s(P35,P37)
s(P37,P38)
s(P34,P39) s(P36,P39)
s(P36,P40) s(P38,P40)
s(P40,P41)
s(P39,P42) s(P41,P42)
s(P37,P43)
s(P43,P44)
s(P38,P45) s(P44,P45)
s(P41,P46) s(P45,P46)
s(P42,P47)
s(P46,P48) s(P47,P48)
s(P43,P49)
s(P33,P50)
s(P49,P51)
s(P50,P52)
s(P44,P53) s(P48,P53) s(P51,P53)
s(P34,P54) s(P52,P54)
s(P30,P55)
s(P52,P56) s(P55,P56)
s(P47,P57) s(P54,P57)
s(P56,P58) s(P57,P58)
s(P49,P59)
s(P59,P60)
s(P51,P61) s(P60,P61)
s(P55,P62) s(P29,P62)
s(P24,P63) s(P60,P63)
s(P61,P64) s(P58,P64)
s(P63,P65) s(P32,P65) s(P66,P65)
s(P64,P66) s(P62,P66)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) b(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
color(#D3D3D3) m(P20,P18,MA111) m(P18,P23,MB111) b(P18,MA111,MB111)
color(#FFB6C1) m(P18,P23,MA112) m(P23,P24,MB112) b(P23,MA112,MB112)
color(#FFA07A) m(P19,P17,MA113) m(P17,P28,MB113) b(P17,MA113,MB113)
color(#20B2AA) m(P17,P28,MA114) m(P28,P29,MB114) b(P28,MA114,MB114)
color(#87CEFA) m(P29,P28,MA115) m(P28,P30,MB115) b(P28,MA115,MB115)
pen(2)
color(green) s(P21,P16)
color(green) s(P65,P66)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1666, vom Themenstarter, eingetragen 2019-01-29
|
68 Knoten punktsymmetrisch
68 Knoten, 68×Grad 3, 0 Dreiecke,
102 Kanten, minimal 0.99999999999999567013, maximal 1.00000000000000421885
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=1.00000000000000421885
|P15-P68|=1.00000000000000088818
|P46-P67|=1.00000000000000133227
\geo
ebene(642.95,555)
x(9.02,14.78)
y(8.48,13.45)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 68 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[369.33124381336756,-124.90049041764968];
#P[2]=[305.2302280258478,-33.40122749777217]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12); N(22,20,2);
#M(23,18,20,zwölfterWinkel); M(24,23,18,dreizehnterWinkel);
#N(25,24,20);
#M(26,17,19,vierzehnterWinkel);
#RA(21,16);
#M(27,22,2,fuenfzehnterWinkel); N(28,27,25);
#M(29,26,17,sechzehnterWinkel); M(30,26,29,siebzehnterWinkel);
#N(31,29,19);
#A(30,23,ab(23,30,[1,31]));
#N(61,29,54); N(62,59,24);
#N(63,58,61); N(64,28,62);
#N(65,63,31); N(66,64,60);
#N(67,27,66); N(68,57,65);
#
#RA(15,68); RA(46,67);
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.30590518944588929173,8.88200853203554530069,P1)
p(12.73213331314127039207,9.70102369304410494522,P2)
p(12.39100663927982992618,8.47832469175451208798,P3)
p(12.05409745966746548618,9.41986184168165152641,P4)
p(11.39100663927982992618,8.47832469175451208798,P5)
p(11.40822047349977097497,9.47817652273320732093,P6)
p(12.74942958031852668910,8.70117328466206529924,P7)
p(11.64609555294590670371,8.50688076624165567807,P8)
p(11.66521835468161150118,9.50669790875011244680,P9)
p(12.64715092208426128195,9.69592907181275975859,P10)
p(10.47295806865839118416,8.87479262485873121591,P11)
p(10.70330600011503285884,9.84790095925611375094,P12)
p(10.62965178979361269285,8.85061711936802630873,P13)
p(10.72457750038314827634,9.84610147859677553583,P14)
p(12.12661928883866835349,10.54977145702836693886,P15)
p(11.70384619697047767772,9.64353588456819643682,P16)
p(9.69721507904699286939,9.50584160399487743121,P17)
p(14.06638288700077588089,9.53137258364420780765,P18)
p(10.56547933236515390831,10.00194359593792192697,P19)
p(13.21746957467935956743,10.05990469067601544850,P20)
p(11.37564549237044531083,10.58814389718509652027,P21)
p(13.54163320305015005829,9.11390366422758546605,P22)
p(14.55586166260542668738,10.40338779465407093028,P23)
p(13.55743684758019540482,10.45949384372039681068,P24)
p(14.12242258304189768126,9.63439317184768562186,P25)
p(9.31513732223348966954,10.42997178300017324659,P26)
p(12.77933641639236839183,9.76113129732989648346,P27)
p(13.52023522445654890589,10.43274797089382488480,P28)
p(10.30785780478081647971,10.30953074542991032558,P29)
p(9.02456132605073690911,11.38682369967401264432,P30)
p(11.18771058888478009408,10.78477707977085486846,P31)
p(10.27451779921027430476,12.90820296229253649756,P32)
p(10.84828967551489320442,12.08918780128397685303,P33)
p(11.18941634937633367031,13.31188680257357148662,P34)
p(11.52632552898869811031,12.37034965264642849547,P35)
p(12.18941634937633544666,13.31188680257356793390,P36)
p(12.17220251515639262152,12.31203497159487447732,P37)
p(10.83099340833763513103,13.08903820966601827536,P38)
p(11.93432743571025866913,13.28333072808642612017,P39)
p(11.91520463397455209531,12.28351358557796757509,P40)
p(10.93327206657190409089,12.09428242251532203966,P41)
p(13.10746491999777241233,12.91541886946935058234,P42)
p(12.87711698854113251400,11.94231053507196982366,P43)
p(12.95077119886255090364,12.93959437496005726587,P44)
p(12.85584548827301532015,11.94411001573130626241,P45)
p(11.45380369981749524300,11.24044003729971663574,P46)
p(11.87657679168568591876,12.14667560975988713778,P47)
p(13.88320790960917072709,12.28436989033320081433,P48)
p(9.51404010165538771560,12.25883891068387399059,P49)
p(13.01494365629100968818,11.78826789839016164763,P50)
p(10.36295341397680402906,11.73030680365206634974,P51)
p(12.20477749628571650931,11.20206759714298527797,P52)
p(10.03878978560601176184,12.67630783010049810855,P53)
p(10.02298614107596819167,11.33071765060768676392,P54)
p(9.45800040561426591523,12.15581832248039795275,P55)
p(14.26528566642267392695,11.36023971132791032801,P56)
p(10.80108657226379520466,12.02908019699818709114,P57)
p(10.06018776419961469060,11.35746352343425868980,P58)
p(13.27256518387534711678,11.48068074889817324902,P59)
p(12.39271239977138350241,11.00543441455722870614,P60)
p(9.34866403812140589480,10.59228031307190320831,P61)
p(14.23175895053475770169,11.19793118125618036629,P62)
p(10.32885604744387997300,10.39423076154408143168,P63)
p(13.25156694121228362349,11.39598073278400214292,P64)
p(10.39329555338246002805,11.39215237673957936693,P65)
p(13.18712743527370356844,10.39805911758850420767,P66)
p(12.20358915679838496260,10.57875902011699587035,P67)
p(11.37683383185777863389,11.21145247421108770425,P68)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15) s(P68,P15)
s(P15,P16) s(P14,P16)
s(P11,P17)
s(P1,P18)
s(P17,P19)
s(P18,P20)
s(P19,P21) s(P12,P21) s(P16,P21)
s(P20,P22) s(P2,P22)
s(P18,P23) s(P56,P23)
s(P23,P24)
s(P24,P25) s(P20,P25)
s(P17,P26)
s(P22,P27)
s(P27,P28) s(P25,P28)
s(P26,P29)
s(P26,P30) s(P49,P30)
s(P29,P31) s(P19,P31)
s(P32,P33)
s(P32,P34)
s(P34,P35)
s(P34,P36)
s(P36,P37)
s(P33,P38) s(P35,P38)
s(P35,P39) s(P37,P39)
s(P39,P40)
s(P38,P41) s(P40,P41)
s(P36,P42)
s(P42,P43)
s(P37,P44) s(P43,P44)
s(P40,P45) s(P44,P45)
s(P41,P46) s(P67,P46)
s(P45,P47) s(P46,P47)
s(P42,P48)
s(P32,P49)
s(P48,P50)
s(P49,P51)
s(P43,P52) s(P47,P52) s(P50,P52)
s(P33,P53) s(P51,P53)
s(P30,P54)
s(P51,P55) s(P54,P55)
s(P48,P56)
s(P53,P57)
s(P55,P58) s(P57,P58)
s(P56,P59)
s(P50,P60) s(P59,P60)
s(P29,P61) s(P54,P61)
s(P59,P62) s(P24,P62)
s(P58,P63) s(P61,P63)
s(P28,P64) s(P62,P64)
s(P63,P65) s(P31,P65)
s(P64,P66) s(P60,P66)
s(P27,P67) s(P66,P67)
s(P57,P68) s(P65,P68)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
color(#D3D3D3) m(P20,P18,MA111) m(P18,P23,MB111) b(P18,MA111,MB111)
color(#FFB6C1) m(P18,P23,MA112) m(P23,P24,MB112) b(P23,MA112,MB112)
color(#FFA07A) m(P19,P17,MA113) m(P17,P26,MB113) b(P17,MA113,MB113)
color(#20B2AA) m(P2,P22,MA114) m(P22,P27,MB114) b(P22,MA114,MB114)
color(#87CEFA) m(P17,P26,MA115) m(P26,P29,MB115) b(P26,MA115,MB115)
color(#778899) m(P29,P26,MA116) m(P26,P30,MB116) b(P26,MA116,MB116)
pen(2)
color(green) s(P21,P16)
color(green) s(P15,P68)
color(green) s(P46,P67)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1667, vom Themenstarter, eingetragen 2019-01-29
|
Rekord mit 64 Knoten! :-) ...was für eine stundenlange Friemelarbeit. Der Graph ist aus einer Skizze entstanden ausgehend vom #1656 bzw. #1658. Rahmen ist zu zwei Drittel rotationssymmetrisch, das letzte Drittel wurde von Hand eingepasst. Insgesamt also asymmetrisch. Achtung fürs Programm: 20 Winkel benutzt! Es müssen im Quellcode also zwei ergänzt werden.
64 Knoten, 64×Grad 3, 0 Dreiecke,
96 Kanten, minimal 0.99999999999999900080, maximal 1.00000000000000199840
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=1.00000000000000044409
|P15-P41|=1.00000000000000022204
|P63-P64|=1.00000000000000133227
\geo
ebene(597.95,555)
x(9.21,14.69)
y(8.44,13.53)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 64 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[352.96229739997636,-143.7717302458613];
#P[2]=[302.75470262519616,-47.08204725967377]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel); M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel); N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12);
#RA(21,16);
#A(17,19,ab(18,20,[1,21]));
#N(41,23,19); N(42,39,36);
#RA(15,41);
#M(43,38,39,zwölfterWinkel); M(44,43,38,dreizehnterWinkel); N(45,42,43);
#M(46,44,43,vierzehnterWinkel); N(47,46,45);
#M(48,44,46,fuenfzehnterWinkel); M(49,48,44,sechzehnterWinkel); N(50,49,46);
#M(51,48,49,siebzehnterWinkel); M(52,51,48,achtzehnterWinkel); N(53,49,52);
#N(54,51,18); N(55,2,20); N(56,55,47);
#M(57,54,18,neunzehnterWinkel); N(58,57,20); N(59,52,57);
#M(60,59,57,zwanzigsterWinkel);
#N(61,58,60); N(62,60,53);
#N(63,56,61); N(64,62,50);
#RA(63,64);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.23972758990958098479,8.68036545388095071019,P1)
p(12.77888819937679798500,9.56784900647974367871,P2)
p(12.26913702449826182317,8.43962917839564497058,P3)
p(11.98344865709328921355,9.39795175286077721921,P4)
p(11.26913702449826182317,8.43962917839564497058,P5)
p(11.41795986974955035009,9.42849305210694055290,P6)
p(12.57199202192824927238,8.58948610256464917256,P7)
p(11.64898134497633819251,8.45554440084931258070,P8)
p(11.73159489453454540353,9.45212605903362401705,P9)
p(12.72365142379302049847,9.57791891557017649461,P10)
p(10.30882638267613060634,8.71856191437900740482,P11)
p(10.51394627279004012621,9.69729876904406928873,P12)
p(10.71461889752227492068,8.71764041140959555776,P13)
p(10.76710938833751818322,9.71626183536062093538,P14)
p(12.19645023806685024681,10.42765941111509242489,P15)
p(11.75013331825658013940,9.53278444382017831060,P16)
p(9.58125136492058970816,9.40459004320320168802,P17)
p(13.93974891433274088115,9.39448739399541388195,P18)
p(10.26956184890526735387,10.13000625313842206765,P19)
p(12.99975052982187939676,9.73566628712476855867,P20)
p(11.23517262422974027913,10.38999823489414353617,P21)
p(9.20626479773178552080,10.33162028781658925425,P22)
p(10.20395680684639216906,10.39952209153975992706,P23)
p(9.37333989747832951878,11.31756446019385009549,P24)
p(10.36599666240877581913,11.19659939483272736993,P25)
p(9.77285394090202608197,12.23429153468617158751,P26)
p(10.61991541026036500739,11.70279659855931342349,P27)
p(9.38972297256987253888,10.98005913869468130883,P28)
p(9.63569071587614978114,11.87971960713732855197,P29)
p(10.51627883065057744716,11.40583716167430061716,P30)
p(10.23525603270642925224,10.44613606912743719590,P31)
p(10.41221671939735848866,13.00319675477166825317,P32)
p(11.22750301618624568789,12.42413867973232832753,P33)
p(10.24925214427882025348,12.63156392316321863234,P34)
p(11.14374475255590724032,12.18448118614728947762,P35)
p(11.22486042867220490393,10.58995240855106700906,P36)
p(10.58281419514933929804,11.35661832928779979568,P37)
p(11.33179371619138819938,13.39610660062345814936,P38)
p(11.72181269152696714286,12.47529978110147652615,P39)
p(11.57437931512998119388,11.48622779205104293965,P40)
p(11.19899753744426185165,10.49899040031827546215,P41)
p(11.68874783927469884759,11.47584657281930198280,P42)
p(12.33102663960539047139,13.35694584519781180632,P43)
p(13.18243955596389049845,12.83244985297488405251,P44)
p(11.90520512724660129322,12.45213866153243387203,P45)
p(12.35404354988638075952,12.27230696306657442562,P46)
p(11.76873815598601424881,11.46149404021005224763,P47)
p(13.88242305457575120897,12.11829083589878663929,P48)
p(12.89969482740373507568,12.30334550760243672585,P49)
p(12.68149927661250231381,11.32744043967066716050,P50)
p(14.36012899275863929915,11.23977103724607218282,P51)
p(13.36013179662230321298,11.23740297486035899510,P52)
p(13.87737398542088129716,12.09324204742415354019,P53)
p(14.46520676030640473186,10.24530702946741911319,P54)
p(12.29017016201314582702,10.44029079820880845375,P55)
p(11.29973860706119381803,10.57829563491919522278,P56)
p(13.52731219653453820229,10.59222746306448925679,P57)
p(13.99943874050496006589,9.71069667717068618629,P58)
p(14.35641950545488754187,11.15131696421332740954,P59)
p(13.51296105393083912816,10.61412254824024792299,P60)
p(13.00044056280585991203,9.75544755374174066276,P61)
p(13.06602050352628552332,11.50868620969988675995,P62)
p(12.29297625225237844404,10.46219662469485278677,P63)
p(13.29038206705916635997,10.53418023803574143926,P64)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15) s(P41,P15)
s(P15,P16) s(P14,P16)
s(P11,P17) s(P22,P17)
s(P1,P18)
s(P17,P19)
s(P18,P20)
s(P19,P21) s(P12,P21) s(P16,P21)
s(P22,P23)
s(P22,P24)
s(P24,P25)
s(P24,P26)
s(P26,P27)
s(P23,P28) s(P25,P28)
s(P25,P29) s(P27,P29)
s(P29,P30)
s(P28,P31) s(P30,P31)
s(P26,P32)
s(P32,P33)
s(P27,P34) s(P33,P34)
s(P30,P35) s(P34,P35)
s(P31,P36)
s(P35,P37) s(P36,P37)
s(P32,P38)
s(P38,P39)
s(P33,P40) s(P37,P40) s(P39,P40)
s(P23,P41) s(P19,P41)
s(P39,P42) s(P36,P42)
s(P38,P43)
s(P43,P44)
s(P42,P45) s(P43,P45)
s(P44,P46)
s(P46,P47) s(P45,P47)
s(P44,P48)
s(P48,P49)
s(P49,P50) s(P46,P50)
s(P48,P51)
s(P51,P52)
s(P49,P53) s(P52,P53)
s(P51,P54) s(P18,P54)
s(P2,P55) s(P20,P55)
s(P55,P56) s(P47,P56)
s(P54,P57)
s(P57,P58) s(P20,P58)
s(P52,P59) s(P57,P59)
s(P59,P60)
s(P58,P61) s(P60,P61)
s(P60,P62) s(P53,P62)
s(P56,P63) s(P61,P63) s(P64,P63)
s(P62,P64) s(P50,P64)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
color(#D3D3D3) m(P39,P38,MA111) m(P38,P43,MB111) b(P38,MA111,MB111)
color(#FFB6C1) m(P38,P43,MA112) m(P43,P44,MB112) b(P43,MA112,MB112)
color(#FFA07A) m(P43,P44,MA113) m(P44,P46,MB113) b(P44,MA113,MB113)
color(#20B2AA) m(P46,P44,MA114) m(P44,P48,MB114) b(P44,MA114,MB114)
color(#87CEFA) m(P44,P48,MA115) m(P48,P49,MB115) b(P48,MA115,MB115)
color(#778899) m(P49,P48,MA116) m(P48,P51,MB116) b(P48,MA116,MB116)
color(#B0C4DE) m(P48,P51,MA117) m(P51,P52,MB117) b(P51,MA117,MB117)
color(#B0C4DE) m(P18,P54,MA118) m(P54,P57,MB118) b(P54,MA118,MB118)
color(#B0C4DE) m(P57,P59,MA119) m(P59,P60,MB119) b(P59,MA119,MB119)
pen(2)
color(green) s(P21,P16)
color(green) s(P15,P41)
color(green) s(P63,P64)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1668, eingetragen 2019-01-30
|
sehr beeindruckend! insbesondere der "6er-canale-smale"
versuch doch mal als text beispielhaft aufzuschreiben welche schritte du beim frimeln nacheinander ausführst
haribo
https://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_3reg-girth5-96.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1669, vom Themenstarter, eingetragen 2019-01-30
|
\quoteon(2019-01-30 00:12 - haribo in Beitrag No. 1668)
versuch doch mal als text beispielhaft aufzuschreiben welche schritte du beim frimeln nacheinander ausführst
\quoteoff
Das kann ich leider nicht genau beschreiben. Ich habe nach meiner Ideen-Skizze die Kanten so angeordnet wie sie im Graph zu sehen sind, aber die drei Messkanten ohne Einheitslänge. Der große rote 6er in der Mitte (dein Bild), der aussieht wie ein verknicktes Dreieck, war in meiner Skizze sehr viel kleiner und der "canale-smale" viel breiter (siehe frühes Zwischenstadium). Im Grunde ging es darum P63-P64 von 0,5 auf 1 zu bekommen bzw. das rechte Drittel so in den Graph zu integrieren, dass die beiden anderen deckungsgleichen Drittel (lila und beige) nicht zerstört werden.
https://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_winkler_3reg_girth5_64_fl_chen.png
Ich habe die 20 Winkel viele Stunden lang immer wieder geändert, wobei ich jetzt nicht sagen kann welcher Winkel welche anderen Winkel wie beeinflusst hat. Das ergab sich dann beim probieren. Der Graph ist immer wieder kaputt gegangen durch Überschneidungen und überdehnte Kanten. Ich hatte es fast schon aufgegeben, bis es dann endlich gelang den "canale-smale" so harscharf einzupassen. Die Überschneidung von P59 war die letzte Hürde, also ihn vom Rand zu bekommen. Ich habe wohl ca. 10 Stunden an dem Ding gesessen. Die letzte Stunde hatte ich die Winkel nur mit 0,01 Grad Schritten geändert, so empfindlich war der Graph. Das schließlich der "canale-smale" zum Erfolg führte, wusste ich anfangs nicht. Das ergab sich erst beim probieren.
Ich hatte immer wieder Zwischenstadien abgespeichert. Hier sind zwei davon. Man kann eigentlich nur mal selbst probieren diese Graphen zurechtzuziehen, um ein Gefühl für die "Friemelei" zu bekommen.
Frühes Zwischenstadium
64 Knoten, 64×Grad 3, 0 Dreiecke,
96 Kanten, minimal 0.71193237131820907848, maximal 1.00000000000000288658
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=1.00000000000000088818
|P15-P41|=1.00000000000000088818
|P63-P64|=0.71193237131820907848
nicht passende Kanten:
|P63-P64|=0.71193237131820907848
\geo
ebene(476.42,465)
x(8.04,13.36)
y(9.16,14.36)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 64 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[190.7339508848542,-53.44420765484719];
#P[2]=[149.58361642962797,26.07866756673414]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel); M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel); N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12);
#RA(21,16);
#A(17,19,ab(18,20,[1,21]));
#N(41,23,19); N(42,39,36);
#RA(15,41);
#M(43,38,39,zwölfterWinkel); M(44,43,38,dreizehnterWinkel); N(45,42,43);
#M(46,44,43,vierzehnterWinkel); N(47,46,45);
#M(48,44,46,fuenfzehnterWinkel); M(49,48,44,sechzehnterWinkel); N(50,49,46);
#M(51,48,49,siebzehnterWinkel); M(52,51,48,achtzehnterWinkel); N(53,49,52);
#N(54,51,18); N(55,2,20); N(56,55,47);
#M(57,54,18,neunzehnterWinkel); N(58,57,20); N(59,52,57);
#M(60,59,57,zwanzigsterWinkel); N(61,58,60); N(62,60,53);
#N(63,62,50); N(64,56,61);
#RA(63,64);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(12.13017667350487727163,9.40311830194806397287,P1)
p(11.67059681288338879313,10.29125475076160967092,P2)
p(11.15958610809355811000,9.16238202646275823327,P3)
p(10.87389774068858550038,10.12070460092789225826,P4)
p(10.15958610809355811000,9.16238202646275823327,P5)
p(10.30981169721431633945,10.15103377120067307260,P6)
p(11.46341868930917406999,9.31295151295021028659,P7)
p(10.54035147492202817432,9.17797086938266559741,P8)
p(10.56451761210601070218,10.17767882564469594797,P9)
p(11.55590170471119293438,10.30866577510685466734,P10)
p(9.19040965459807956961,9.40874964200897245803,P11)
p(9.36238466045112005531,10.39385095525642022096,P12)
p(9.61954215735133466580,9.42748144943164589904,P13)
p(9.59615028515750623228,10.42720782215333663601,P14)
p(11.02425730058840258607,11.15563344129306955210,P15)
p(10.58186934203414608646,10.25880966031589203169,P16)
p(8.44032940269057441185,10.07009646153589343953,P17)
p(12.83121041281592766836,10.11624640849524325859,P18)
p(9.10259212432156594730,10.81936816628518549521,P19)
p(11.88991649971513986372,10.45383457351203837504,P20)
p(10.05904624703619099080,11.11125086728371691436,P21)
p(8.03762536647344560947,10.98542670752060423922,P22)
p(9.03282320540326821856,11.08331062545102341232,P23)
p(8.17356002221965383114,11.97614451263322088437,P24)
p(9.16953460905128459046,11.88650845746811590686,P25)
p(8.54399863105914647576,12.90500146452681562437,P26)
p(9.40666531891470469873,12.39922860477223842679,P27)
p(8.20086621778094482238,11.63815075625123185432,P28)
p(8.41742824339508466380,12.54555019722320885478,P29)
p(9.33706185819294809392,12.15277288813597067474,P30)
p(9.09148305271794221483,11.18339625838803463864,P31)
p(9.13185928063355589757,13.71396367420162576423,P32)
p(9.98317130183959378087,13.18930393441774562291,P33)
p(8.99029120285191751805,13.30842198105306550815,P34)
p(9.92755924673945600034,12.95981243742693145293,P35)
p(10.07513647094464914744,11.36346833509876042001,P36)
p(9.40599304729468244091,12.10660161963525816020,P37)
p(10.02401455659844486945,14.16569253487803692337,P38)
p(10.47465310712475172750,13.27298603396099352381,P39)
p(10.39146284844751377818,12.27645235120801459061,P40)
p(10.02545216354297252792,11.20450365933699998777,P41)
p(10.49052589818415803791,12.27311201464456758004,P42)
p(11.02376320422080269168,14.18811220430614206123,P43)
p(11.92921839891302937531,13.76367034679811851561,P44)
p(10.65114075271441151926,13.26012917179241767940,P45)
p(11.05027356696279916548,13.28674689131707253864,P46)
p(10.91590369996251830287,12.29581564302467455718,P47)
p(12.54741637287770039677,12.97764791392105543366,P48)
p(11.55870006270095728951,13.12744797396939056000,P49)
p(11.01630569393087277774,12.28732396602383758477,P50)
p(12.99024752949895500365,12.08104289122405816670,P51)
p(11.99032766078424039335,12.09370212301541336331,P52)
p(12.53896551060126718369,12.92976223434004268142,P53)
p(13.07920604378285922564,11.08500755915174806887,P54)
p(11.19031773049025524358,11.16837048030681067701,P55)
p(10.26172639438603262363,11.53947441522555017457,P56)
p(12.15438713103659829073,11.46541520711222617024,P57)
p(12.84689230467698806137,10.74400229866014200297,P58)
p(12.98749761677573388852,12.01852181397160990173,P59)
p(11.99240813159898166873,11.91954243990475603709,P60)
p(11.86393375064442601285,10.92782961179455014644,P61)
p(11.54566473653792080256,12.81420457667445234051,P62)
p(11.93539544667054386196,11.89327571211458867140,P63)
p(11.24632335947297789858,11.71431381679618333180,P64)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15) s(P41,P15)
s(P15,P16) s(P14,P16)
s(P11,P17) s(P22,P17)
s(P1,P18)
s(P17,P19)
s(P18,P20)
s(P19,P21) s(P12,P21) s(P16,P21)
s(P22,P23)
s(P22,P24)
s(P24,P25)
s(P24,P26)
s(P26,P27)
s(P23,P28) s(P25,P28)
s(P25,P29) s(P27,P29)
s(P29,P30)
s(P28,P31) s(P30,P31)
s(P26,P32)
s(P32,P33)
s(P27,P34) s(P33,P34)
s(P30,P35) s(P34,P35)
s(P31,P36)
s(P35,P37) s(P36,P37)
s(P32,P38)
s(P38,P39)
s(P33,P40) s(P37,P40) s(P39,P40)
s(P23,P41) s(P19,P41)
s(P39,P42) s(P36,P42)
s(P38,P43)
s(P43,P44)
s(P42,P45) s(P43,P45)
s(P44,P46)
s(P46,P47) s(P45,P47)
s(P44,P48)
s(P48,P49)
s(P49,P50) s(P46,P50)
s(P48,P51)
s(P51,P52)
s(P49,P53) s(P52,P53)
s(P51,P54) s(P18,P54)
s(P2,P55) s(P20,P55)
s(P55,P56) s(P47,P56)
s(P54,P57)
s(P57,P58) s(P20,P58)
s(P52,P59) s(P57,P59)
s(P59,P60)
s(P58,P61) s(P60,P61)
s(P60,P62) s(P53,P62)
s(P62,P63) s(P50,P63) s(P64,P63)
s(P56,P64) s(P61,P64)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
color(#D3D3D3) m(P39,P38,MA111) m(P38,P43,MB111) b(P38,MA111,MB111)
color(#FFB6C1) m(P38,P43,MA112) m(P43,P44,MB112) b(P43,MA112,MB112)
color(#FFA07A) m(P43,P44,MA113) m(P44,P46,MB113) b(P44,MA113,MB113)
color(#20B2AA) m(P46,P44,MA114) m(P44,P48,MB114) b(P44,MA114,MB114)
color(#87CEFA) m(P44,P48,MA115) m(P48,P49,MB115) b(P48,MA115,MB115)
color(#778899) m(P49,P48,MA116) m(P48,P51,MB116) b(P48,MA116,MB116)
color(#B0C4DE) m(P48,P51,MA117) m(P51,P52,MB117) b(P51,MA117,MB117)
color(#B0C4DE) m(P18,P54,MA118) m(P54,P57,MB118) b(P54,MA118,MB118)
color(#B0C4DE) m(P57,P59,MA119) m(P59,P60,MB119) b(P59,MA119,MB119)
pen(2)
color(green) s(P21,P16)
color(green) s(P15,P41)
color(green) s(P63,P64)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
Spätes Zwischenstadium
64 Knoten, 64×Grad 3, 0 Dreiecke,
96 Kanten, minimal 0.99999999999999722444, maximal 1.00004196104836262649
einzustellende Kanten, Abstände und Winkel:
|P21-P16|=0.99999999999999833467
|P15-P41|=0.99999999999999811262
|P63-P64|=1.00004196104836262649
\geo
ebene(502.48,465)
x(7.92,13.45)
y(9.17,14.29)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 64 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[177.30235791976293,-53.11538904000298];
#P[2]=[135.38344234342668,27.547540445620484]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel); M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel); N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,17,11,zehnterWinkel); N(20,19,12);
#M(20,18,1,elfterWinkel); N(21,19,12);
#RA(21,16);
#A(17,19,ab(18,20,[1,21]));
#N(41,23,19); N(42,39,36);
#RA(15,41);
#M(43,38,39,zwölfterWinkel); M(44,43,38,dreizehnterWinkel); N(45,42,43);
#M(46,44,43,vierzehnterWinkel); N(47,46,45);
#M(48,44,46,fuenfzehnterWinkel); M(49,48,44,sechzehnterWinkel); N(50,49,46);
#M(51,48,49,siebzehnterWinkel); M(52,51,48,achtzehnterWinkel); N(53,49,52);
#N(54,51,18); N(55,2,20); N(56,55,47);
#M(57,54,18,neunzehnterWinkel); N(58,57,20); N(59,52,57);
#M(60,59,57,zwanzigsterWinkel);
#N(61,58,60); N(62,60,53);
#N(63,56,61); N(64,62,50);
#RA(63,64);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(11.95041551704689375413,9.41570388463481933172,P1)
p(11.48928626666848273885,10.30303686297240339798,P2)
p(10.97982495163557459250,9.17496760914951359211,P3)
p(10.69413658423060198288,10.13329018361464761711,P4)
p(9.97982495163557459250,9.17496760914951359211,P5)
p(10.12832479001564678356,10.16388004106706866025,P6)
p(11.28245437246654780949,9.32466036716884971725,P7)
p(10.35945785303391808441,9.19095789249618100314,P8)
p(10.44879798474335075298,10.18695906762909331178,P9)
p(11.44094698080281169439,10.31202053099093163269,P10)
p(9.02050918036387905374,9.45730296115026902726,P11)
p(9.22909747253953938184,10.43530650120891500876,P12)
p(9.42359562065237277295,9.45440361591359668125,P13)
p(9.48470790464559954103,10.45253451351427287364,P14)
p(10.91437237981114805052,11.16214945626666299461,P15)
p(10.46745399359361172742,10.26757472151237138291,P16)
p(8.29561116450772573216,10.14615916284102326017,P17)
p(12.65020354590989448695,10.13005443909672642633,P18)
p(8.98636278192666004827,10.86925127525349132895,P19)
p(11.71009377009972496353,10.47092627634080130861,P20)
p(9.95307037061507671183,11.12513491672403809218,P21)
p(7.92375131843593472070,11.07444804830689122355,P22)
p(8.92166652602029053298,11.13898670704623938832,P23)
p(8.09447048228843613060,12.05976777666591637228,P24)
p(9.08667323408864291423,11.93513351444201830986,P25)
p(8.49737109362592590855,12.97501151326501300787,P26)
p(9.34263632731659932062,12.44066454292284618077,P27)
p(8.10954626281836787882,11.72247679102096995507,P28)
p(8.35905177224819162518,12.62111238311740635254,P29)
p(9.23464041575122607242,12.13805490478949877797,P30)
p(8.94936469973283088564,11.17960941032974986342,P31)
p(9.14228566687618560138,13.73926617841887320992,P32)
p(9.95335693085118400347,13.15431882629733983947,P33)
p(8.97722828609399314814,13.37151198660513706784,P34)
p(9.86613916184794348396,12.91343180261291934130,P35)
p(9.93959710254750206104,11.31903605203026152992,P36)
p(9.30090687066884846956,12.08850001330641532604,P37)
p(10.06481884463686959919,14.12518396231950212893,P38)
p(10.44832012256613928969,13.20164361678682496404,P39)
p(10.29302894425307179915,12.21377487553719021207,P40)
p(9.91703686626707892060,11.23510062777051388139,P41)
p(10.40819229345946794751,12.20244906249262584197,P42)
p(11.06424017967084694192,14.09116933195399035128,P43)
p(11.90528607782206904631,13.55020556495752614978,P44)
p(10.71338360425794178354,13.15474012294269101631,P45)
p(11.06805120386900043172,13.00336210853074447868,P46)
p(10.50552801796356838793,12.17658059850599450158,P47)
p(12.61425061095808253242,12.84496142938798257660,P48)
p(11.62697317527573481755,13.00396855184634503644,P49)
p(11.34855398159682060566,12.04350889491577802914,P50)
p(13.11350569878393201861,11.97850637730507017409,P51)
p(12.14646300039572324181,11.72389212103874633897,P52)
p(12.55675125091077504180,12.63584801442904570479,P53)
p(13.17629920538709242805,10.98047983681204264883,P54)
p(11.00028328413297096233,11.17531897506193416802,P55)
p(10.00918536153240445685,11.30845389841731751801,P56)
p(12.26591884049751612906,11.39425222741286702899,P57)
p(12.70972371355118823999,10.49812877907898212015,P58)
p(13.13180237114437964863,11.89449787842296935025,P59)
p(12.24816951734632120008,11.42631737937511360315,P60)
p(11.71320060715237687532,10.58144563459611831036,P61)
p(11.64539519095768049795,12.22422909845606575630,P62)
p(11.00904142658882634009,11.29148778012557130523,P63)
p(12.00908264312146123132,11.29270806426595363803,P64)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15) s(P41,P15)
s(P15,P16) s(P14,P16)
s(P11,P17) s(P22,P17)
s(P1,P18)
s(P17,P19)
s(P18,P20)
s(P19,P21) s(P12,P21) s(P16,P21)
s(P22,P23)
s(P22,P24)
s(P24,P25)
s(P24,P26)
s(P26,P27)
s(P23,P28) s(P25,P28)
s(P25,P29) s(P27,P29)
s(P29,P30)
s(P28,P31) s(P30,P31)
s(P26,P32)
s(P32,P33)
s(P27,P34) s(P33,P34)
s(P30,P35) s(P34,P35)
s(P31,P36)
s(P35,P37) s(P36,P37)
s(P32,P38)
s(P38,P39)
s(P33,P40) s(P37,P40) s(P39,P40)
s(P23,P41) s(P19,P41)
s(P39,P42) s(P36,P42)
s(P38,P43)
s(P43,P44)
s(P42,P45) s(P43,P45)
s(P44,P46)
s(P46,P47) s(P45,P47)
s(P44,P48)
s(P48,P49)
s(P49,P50) s(P46,P50)
s(P48,P51)
s(P51,P52)
s(P49,P53) s(P52,P53)
s(P51,P54) s(P18,P54)
s(P2,P55) s(P20,P55)
s(P55,P56) s(P47,P56)
s(P54,P57)
s(P57,P58) s(P20,P58)
s(P52,P59) s(P57,P59)
s(P59,P60)
s(P58,P61) s(P60,P61)
s(P60,P62) s(P53,P62)
s(P56,P63) s(P61,P63) s(P64,P63)
s(P62,P64) s(P50,P64)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) f(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P17,MA19) m(P17,P19,MB19) b(P17,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P20,MB110) b(P18,MA110,MB110)
color(#D3D3D3) m(P39,P38,MA111) m(P38,P43,MB111) b(P38,MA111,MB111)
color(#FFB6C1) m(P38,P43,MA112) m(P43,P44,MB112) b(P43,MA112,MB112)
color(#FFA07A) m(P43,P44,MA113) m(P44,P46,MB113) b(P44,MA113,MB113)
color(#20B2AA) m(P46,P44,MA114) m(P44,P48,MB114) b(P44,MA114,MB114)
color(#87CEFA) m(P44,P48,MA115) m(P48,P49,MB115) b(P48,MA115,MB115)
color(#778899) m(P49,P48,MA116) m(P48,P51,MB116) b(P48,MA116,MB116)
color(#B0C4DE) m(P48,P51,MA117) m(P51,P52,MB117) b(P51,MA117,MB117)
color(#B0C4DE) m(P18,P54,MA118) m(P54,P57,MB118) b(P54,MA118,MB118)
color(#B0C4DE) m(P57,P59,MA119) m(P59,P60,MB119) b(P59,MA119,MB119)
pen(2)
color(green) s(P21,P16)
color(green) s(P15,P41)
color(green) s(P63,P64)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1670, eingetragen 2019-01-30
|
danke für den versuch, sascha beschreibt es in dem paper, also dass er auch keinen schimmer von nem plan hat "wie" neues gefunden wird
immerhin formuliert er dass es nahezua ausgeschlossen ist streichholzgraphen mittels streichhölzern zu finden, dass gilt erst recht bei solch kleinen spitzen winkeln
darum ist es wichtig es versuchen zu beschreiben was man wie machte nachdemn man neues gefunden hat... wir wissen zusammen mehr darüber als alle anderen
ganz genau kann man das selten aber wir haben die methoden ja im laufe der zeit verändert, und du hast jetzt sprünge gemacht weil du wieder die bürostreifenmethode zwischengeschoben hattest
wiso kann man deinen graph nicht dreifach rotationssymetrisch ausführen, entsprechend der zwei farbflächen? wo genau klemmt er dann?
haribo
https://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_Unbenannt-2.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1671, vom Themenstarter, eingetragen 2019-01-30
|
\quoteon(2019-01-30 10:28 - haribo in Beitrag No. 1670)
wiso kann man deinen graph nicht dreifach rotationssymetrisch ausführen, entsprechend der zwei farbflächen? wo genau klemmt er dann?
\quoteoff
Das war ja meine Idee in #1656 bzw. #1658. Ich habe es nicht geschafft die Überschneidungen in der Mitte wegzubekommen. Ob das aber nur sehr schwierig ist oder unmöglich kann ich nicht beurteilen. Vielleicht kann man geometrisch begründen, dass es unmöglich ist ohne Überschneidungen.
Meine beste Methode um auf neue Ideen zu kommen ist immer mit einem bekannten Graphen im CAD zu arbeiten und dann mit Teilen davon zu experimentieren, wie Spiegelung, Drehung, etc. So ist auch die Idee für den 64er entstanden. Viele 4/4 Ideen haben so zwar nicht zum Erfolg geführt (wegen der vielen starren Untergraphen), aber die 3er sind so beweglich, das vieles passend gemacht werden kann. Ob der 64er so wie er jetzt ist funktioniert, wusste ich nicht. Das hätte wie so oft auch nichts werden können.
Bei Stefans Programm ist auch immer die Art der Eingabe wichtig. Besonders schwierig war bei den letzten Graphen die eine Messkante im Rahmen außen. Ich weiß aber nicht, ob man das bei einem 3er anders machen kann, wie z.B. mit der "zumachen" Funktion.
Was ich bis jetzt zu den 3ern gelernt habe ist, dass ihr Rahmen aus "Häusern" und "M"'s bestehen muss, die beide nur eine Außenkante besitzen. Somit ist beim Rahmen schon viel mehr nöglich als bei den 4ern, die ja nur das Dreieck als Rahmenelement mit einer Außenkante bsitzen. Zu viele Häuser nebeneinander führen zu zu vielen Kanten in der Mitte. Zu viele M's verbrauchen zu viele Kanten, da es die Häuser sind, die engere Rahmenkurven ermöglichen.
Beim 64er gibt es bei P44 ein Haus im Rahmen, dass seitlich sehr eingeknickt ist. Das hat mich gewundert, da es anfangs so nicht geplant war. Wenn also mehrere Häuser nebeneinander im Rahmen sind, ist das eine weitere Option, da man sich so einem verdrehten M annähert.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1672, eingetragen 2019-01-31
|
der dreier symetrische könnte evtl in ein regelmässiges 15-eck passen, wenn du dich noch an #1603 erinnerst sind ab nem 14eck aussen umlaufend M´s möglich...
neben den M´s und H´s möchte ich aber die L´s einführen, nahezu gleichseitige dreiecke mit einem abstehenden ast, welcher ja nahezu in jede richtung zeigen kann
die L´s sind hier als blau gefüllt dargestellt und füllen so den ganzen mittelraum aus
diese objekte im inneren erinnern, so komprimiert angeordnet, erinnern an leicht ausgewickelte standart dreieck-muster wie es z.B kite´s regelmässig bei den reg-4 waren, könnte man ja mal versuchen einen kite entsprechend zu öffnen... und evtl gar keine H´s und M´s zu benutzen, also ein neues standart bauteil für reg3-girth5 suchen
https://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_dreier-girth5-ls.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1673, vom Themenstarter, eingetragen 2019-01-31
|
Bis jetzt habe ich den 60er mit 3er-Rotation noch nicht realisieren können.
H, M und L sind ab jetzt fester Bestandteil unseres Graphen-Jargons. 8-)
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1674, vom Themenstarter, eingetragen 2019-01-31
|
Neue Eingabe lässt die Winkel besser steuern, da sie sich anders beeinflussen. Leider noch keinen Erfolg erzielt.
60 Knoten, 60×Grad 3, 0 Dreiecke,
90 Kanten, minimal 0.88708390895240096796, maximal 1.00000000000000799361
passende Kanten:
|P16-P19|=0.99999999999999888978
|P18-P51|=1.00000000000000799361
|P21-P57|=1.00000000000000044409
nicht passende Kanten:
|P36-P59|=|P55-P60|=|P58-P15|=0.88708390895240119001
\geo
ebene(601.54,555)
x(9.25,14.38)
y(8.55,13.29)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 60 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[366.13271137112906,-143.9856303591166];
#P[2]=[317.0502619344012,-37.61524191589956]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,12,11,zehnterWinkel); N(20,17,19);
#M(21,18,1,elfterWinkel); RA(16,19);
#A(17,20,ab(18,21,[1,21]));
#A(38,40,ab(18,21,[1,16],18));
#N(57,52,56);
#RA(18,51); RA(21,57);
#N(58,23,20); N(59,42,40); N(60,2,21);
#RA(58,15); RA(36,59); RA(55,60);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(13.12537540369750921343,8.77091247617557456806,P1)
p(12.70639868990347309818,9.67890945485906684098,P2)
p(12.15034218558009726507,8.54885342194088515555,P3)
p(12.05275928582094913111,9.54408082192271578492,P4)
p(11.15034218558009726507,8.54885342194088515555,P5)
p(11.34509013706963465040,9.52970674195903733050,P6)
p(12.57001963681367584513,8.68825272628032685418,P7)
p(11.71791808282511127004,8.60180625006146826195,P8)
p(11.67130798803713176426,9.60071940898162878852,P9)
p(12.66787969520892787045,9.68345291165555011048,P10)
p(10.19547472947537158916,8.84588564455669512654,P11)
p(10.61998135516216912322,9.75131047564319075605,P12)
p(10.71208291082548669237,8.75556085679094309171,P13)
p(10.68330382495439856427,9.75514665311681383741,P14)
p(12.12711507569434665754,10.52462686886134157760,P15)
p(11.67572924077779283891,9.63229799000742481496,P16)
p(9.64367511898930729330,9.67986237676655036921,P17)
p(13.72160027866312503875,9.57372995136668869520,P18)
p(11.24276146714619706302,10.53370739033365666160,P19)
p(10.24423490647224177508,10.47944222997600505209,P20)
p(12.72886391968803820873,9.69404005721356654135,P21)
p(9.24652722835452500760,10.59761700245053006597,P22)
p(10.24236403535096506801,10.50646299084854362604,P23)
p(9.54173505530564369792,11.55305006599124695299,P24)
p(10.45241871611182205015,11.13994563616670419037,P25)
p(10.04173505530564725063,12.41907546977568621571,P26)
p(10.79380497208290456967,11.75999213644169216764,P27)
p(9.45261966851668944400,11.11989907965774193599,P28)
p(9.80380560103779252756,11.90106391012546716013,P29)
p(10.69219482023120448844,11.44197285682457732037,P30)
p(10.26555828170499040652,10.53754969038401512194,P31)
p(10.77640623388585083831,13.09749883270149695136,P32)
p(11.34827382598059308805,12.27715289523867170374,P33)
p(10.43987858241421484706,12.69526541773229411092,P34)
p(11.31993481823006142406,12.22039593903141430076,P35)
p(11.26441860740438016819,10.58527860974857404130,P36)
p(10.71733204724467825031,11.42235464912171494234,P37)
p(11.77455107538775003206,13.15838294707586086929,P38)
p(11.71445937395309044859,11.34661103994355180191,P39)
p(12.16672764687990415666,12.23849298801952834026,P40)
p(12.76792384098814636673,13.04344579658299529967,P41)
p(12.19106374778574419793,12.22660282950149124304,P42)
p(13.44774923215443962476,12.31007178727696960152,P43)
p(12.63464847110741295921,11.72794881711967818205,P44)
p(13.94774923215443962476,11.44404638349252856244,P45)
p(13.00093136388764492040,11.12227639680837221192,P46)
p(13.11718716770981529862,12.60382346927103291989,P47)
p(13.61810278917727856651,11.90910511502216806434,P48)
p(12.77632366477184788778,11.36928300940289560117,P49)
p(12.20638849612626586350,12.19097267316953470129,P50)
p(14.16794550967896171301,10.46859079795091140852,P51)
p(13.17157129189742192921,10.38351190432723925028,P52)
p(13.98786497980048082468,10.96114900068586628379,P53)
p(13.13658782985572415214,10.43643268306087357189,P54)
p(11.74829278994145731474,11.30206979659918609116,P55)
p(12.74676518501771127490,11.35732263607996195276,P56)
p(12.18260563194089840522,10.53165684493188969384,P57)
p(11.24081959693951304757,10.56201919241862974275,P58)
p(11.73994904888895796091,11.33413684783089614427,P59)
p(12.15905782721174333005,10.51581923495956871761,P60)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15)
s(P15,P16) s(P14,P16) s(P19,P16)
s(P11,P17) s(P22,P17)
s(P1,P18) s(P51,P18)
s(P12,P19)
s(P17,P20) s(P19,P20)
s(P18,P21) s(P57,P21)
s(P22,P23)
s(P22,P24)
s(P24,P25)
s(P24,P26)
s(P26,P27)
s(P23,P28) s(P25,P28)
s(P25,P29) s(P27,P29)
s(P29,P30)
s(P28,P31) s(P30,P31)
s(P26,P32)
s(P32,P33)
s(P27,P34) s(P33,P34)
s(P30,P35) s(P34,P35)
s(P31,P36) s(P59,P36)
s(P35,P37) s(P36,P37) s(P39,P37)
s(P32,P38) s(P41,P38)
s(P33,P39)
s(P38,P40) s(P39,P40)
s(P41,P42)
s(P41,P43)
s(P43,P44)
s(P43,P45)
s(P45,P46)
s(P42,P47) s(P44,P47)
s(P44,P48) s(P46,P48)
s(P48,P49)
s(P47,P50) s(P49,P50)
s(P45,P51)
s(P51,P52)
s(P46,P53) s(P52,P53)
s(P49,P54) s(P53,P54)
s(P50,P55) s(P60,P55)
s(P54,P56) s(P55,P56)
s(P52,P57) s(P56,P57)
s(P23,P58) s(P20,P58) s(P15,P58)
s(P42,P59) s(P40,P59)
s(P2,P60) s(P21,P60)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) b(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P12,MA19) m(P12,P19,MB19) b(P12,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P21,MB110) b(P18,MA110,MB110)
pen(2)
color(green) s(P16,P19)
color(green) s(P18,P51)
color(green) s(P21,P57)
color(red) s(P58,P15)
color(red) s(P36,P59)
color(red) s(P55,P60)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
Bis jetzt scheint es keine Rolle zu spielen, ob die beiden H vertauscht sind, also schmal und breit.
Bis jetzt beste Näherung ohne Überschneidungen. Abweichungen < 0,05 Grad.
60 Knoten, 60×Grad 3, 0 Dreiecke,
90 Kanten, minimal 0.95331597762324105094, maximal 1.04773023072664162036
einzustellende Kanten, Abstände und Winkel:
|P16-P19|=0.97209140522856307687
|P18-P51|=1.04773023072664162036
|P21-P57|=0.98109954112148256566
|P58-P15|=0.95331597762324105094
nicht passende Kanten:
|P16-P19|=0.97209140522856307687
|P18-P51|=1.04773023072664162036
|P21-P57|=0.98109954112148256566
|P36-P59|=0.95331597762324149503
|P37-P39|=0.97209140522856285482
|P55-P60|=0.95897053140450005948
|P58-P15|=0.95331597762324105094
\geo
ebene(609.49,555)
x(7.95,13.11)
y(8.56,13.26)
form(.)
#//Eingabe war:
#
#3-reg. girth 5 mit 60 Knoten
#
#
#
#
#
#
#
#
#
#
#
#
#
#P[1]=[201.91661354278926,-165.5843147660599];
#P[2]=[153.4103683422432,-57.75370900186775]; D=ab(1,2);
#A(2,1,Bew(1)); M(3,1,2,blauerWinkel); M(4,3,1,gruenerWinkel);
#M(5,3,4,orangerWinkel);
#M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4); N(8,4,6);
#M(9,8,4,vierterWinkel); N(10,9,7);
#M(11,5,6,fuenfterWinkel);M(12,11,5,sechsterWinkel); N(13,6,12); N(14,13,9);
#M(15,10,9,siebenterWinkel);
#N(16,15,14);
#M(17,11,12,achterWinkel); M(18,1,2,neunterWinkel);
#M(19,12,11,zehnterWinkel); N(20,17,19);
#M(21,18,1,elfterWinkel); RA(16,19);
#A(17,20,ab(18,21,[1,21]));
#A(38,40,ab(18,21,[1,16],18));
#N(57,52,56);
#RA(18,51); RA(21,57);
#N(58,23,20); N(59,42,40); N(60,2,21);
#RA(58,15); A(36,59); A(55,60);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(11.70770905163659847403,8.59957123797977729396,P1)
p(11.29746765279141129668,9.51154820845301429699,P2)
p(10.70840648352080570760,8.56222987542853530840,P3)
p(10.53475830585387384986,9.54703762844074432792,P4)
p(9.70840648352080570760,8.56222987542853353204,P5)
p(9.91256083373343699350,9.54116858714099791428,P6)
p(10.87315304212116906513,8.60603337634270637579,P7)
p(10.23262381490114947269,8.59377231942297648004,P8)
p(10.29882545711231323082,9.59157858447072975139,P9)
p(11.29568444771927104853,9.51238165999711604570,P10)
p(8.77136807161532239263,8.91145618402175543338,P11)
p(9.26242387324772664670,9.78258430300492420884,P12)
p(9.26098470230201087361,8.78258533861196610815,P13)
p(9.31693323707990828098,9.78101899262018648074,P14)
p(10.88866730537648486177,10.42580217971358891305,P15)
p(10.30308734567996964415,9.61518752970914469813,P16)
p(8.29974046449937752357,9.79325400677144131123,P17)
p(12.35036295155611085761,9.36572785703246246669,P18)
p(9.94084003538286431478,10.51726213100426754465,P19)
p(8.94175155059124904255,10.55994936043881260446,P20)
p(11.36657166910803162807,9.54504520861664218501,P21)
p(7.95120023675007736585,10.73054782924146444145,P22)
p(8.94677542167269734819,10.63657947730161446032,P23)
p(8.41251446960087001514,11.61778465138608495977,P24)
p(9.35450196647494713886,11.28213668739268804586,P25)
p(8.90663759904154872515,12.48717658426316745590,P26)
p(9.65684163136945450390,11.82597017936455685572,P27)
p(8.36919179482723052388,11.45291099941749912716,P28)
p(8.67503243710484461815,12.01584041415000392306,P29)
p(9.50980539188808293716,11.46524608620749319243,P30)
p(8.94838114059226263919,10.63771795372079154163,P31)
p(9.67326448697779639474,13.12926942388465256784,P32)
p(10.18797421669154701362,12.27190491905721536625,P33)
p(9.31929431181436918052,12.76727874039073640233,P34)
p(10.15967901103003079299,12.22528837394110823311,P35)
p(9.94361815586857744620,10.54023316811865917941,P36)
p(9.52822492070572124589,11.44987510876395120363,P37)
p(10.67293450966369761090,13.10358196112232676001,P38)
p(10.49147607652048641569,11.31907407306178114936,P39)
p(11.02226073812112971950,12.16658079457464936013,P40)
p(11.66003198572611232464,12.94346146664640784252,P41)
p(11.08639993263640732835,12.12434836843097230030,P42)
p(12.20344248905838568930,12.10399435897144648777,P43)
p(11.44617504702650023773,11.45088945067685592960,P44)
p(12.71512715496188761222,11.24482103380403685833,P45)
p(11.76958647640349830965,10.91931707808101670309,P46)
p(12.08150940172780529736,12.22312662780333702983,P47)
p(12.41979275840310137369,11.67907479659939795624,P48)
p(11.52862986661206967653,11.22539131630212594359,P49)
p(11.08659629199347129713,12.12238982182479674066,P50)
p(12.89454941290652101316,10.26104887860038061831,P51)
p(11.89483364647466601127,10.23720802401058982412,P52)
p(12.75474248358066553521,10.74765566272293604300,P53)
p(11.86828691378175903992,10.28484196070829526093,P54)
p(10.51007417728919435262,11.30530827677748106908,P55)
p(11.50616494760002339603,11.21697268201763719730,P56)
p(10.91053414138125532418,10.41371435328199446246,P57)
p(9.94138546280466428584,10.53289309401303874836,P58)
p(10.50479600135887636725,11.31087626250322486499,P59)
p(10.89615193187444930345,10.42748799476262711039,P60)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4)
s(P3,P5)
s(P5,P6)
s(P2,P7) s(P4,P7)
s(P4,P8) s(P6,P8)
s(P8,P9)
s(P9,P10) s(P7,P10)
s(P5,P11)
s(P11,P12)
s(P6,P13) s(P12,P13)
s(P13,P14) s(P9,P14)
s(P10,P15)
s(P15,P16) s(P14,P16) s(P19,P16)
s(P11,P17) s(P22,P17)
s(P1,P18) s(P51,P18)
s(P12,P19)
s(P17,P20) s(P19,P20)
s(P18,P21) s(P57,P21)
s(P22,P23)
s(P22,P24)
s(P24,P25)
s(P24,P26)
s(P26,P27)
s(P23,P28) s(P25,P28)
s(P25,P29) s(P27,P29)
s(P29,P30)
s(P28,P31) s(P30,P31)
s(P26,P32)
s(P32,P33)
s(P27,P34) s(P33,P34)
s(P30,P35) s(P34,P35)
s(P31,P36) s(P59,P36)
s(P35,P37) s(P36,P37) s(P39,P37)
s(P32,P38) s(P41,P38)
s(P33,P39)
s(P38,P40) s(P39,P40)
s(P41,P42)
s(P41,P43)
s(P43,P44)
s(P43,P45)
s(P45,P46)
s(P42,P47) s(P44,P47)
s(P44,P48) s(P46,P48)
s(P48,P49)
s(P47,P50) s(P49,P50)
s(P45,P51)
s(P51,P52)
s(P46,P53) s(P52,P53)
s(P49,P54) s(P53,P54)
s(P50,P55) s(P60,P55)
s(P54,P56) s(P55,P56)
s(P52,P57) s(P56,P57)
s(P23,P58) s(P20,P58) s(P15,P58)
s(P42,P59) s(P40,P59)
s(P2,P60) s(P21,P60)
pen(2)
color(#0000FF) m(P2,P1,MA10) m(P1,P3,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P3,MA11) m(P3,P4,MB11) b(P3,MA11,MB11)
color(#FFA500) m(P4,P3,MA12) m(P3,P5,MB12) b(P3,MA12,MB12)
color(#EE82EE) m(P4,P8,MA13) m(P8,P9,MB13) b(P8,MA13,MB13)
color(#00FFFF) m(P6,P5,MA14) m(P5,P11,MB14) b(P5,MA14,MB14)
color(#32CD32) m(P5,P11,MA15) m(P11,P12,MB15) b(P11,MA15,MB15)
color(#ADD8E6) m(P9,P10,MA16) m(P10,P15,MB16) b(P10,MA16,MB16)
color(#F08080) m(P12,P11,MA17) m(P11,P17,MB17) b(P11,MA17,MB17)
color(#E0FFFF) m(P2,P1,MA18) m(P1,P18,MB18) b(P1,MA18,MB18)
color(#FAFAD2) m(P11,P12,MA19) m(P12,P19,MB19) b(P12,MA19,MB19)
color(#90EE90) m(P1,P18,MA110) m(P18,P21,MB110) b(P18,MA110,MB110)
pen(2)
color(red) s(P16,P19)
color(red) s(P18,P51)
color(red) s(P21,P57)
color(red) s(P58,P15)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1675, eingetragen 2019-01-31
|
die L´s entziehen sich jeder geschlossenen ordnung
aber es entstehen schöne graphiken... mit meist immer noch je 5 2er knoten
https://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_dreier-girth5-kompri.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1676, vom Themenstarter, eingetragen 2019-02-02
|
Kleiner 4/4 Ausflug. War dieser relativ einfache fast 112er schon mal am Start gewesen?
56 Knoten, 56×Grad 4, 42 Dreiecke,
112 Kanten, minimal 0.99999999999999711342, maximal 1.00268892297315215245
einzustellende Kanten, Abstände und Winkel:
|P25-P29|=1.00000000000000066613
|P28-P53|=1.00000000000000022204
|P29-P53|=1.00000000000000310862
|P23-P25|=1.00268892297315015405
nicht passende Kanten:
|P23-P25|=1.00268892297315015405
|P50-P52|=1.00268892297315215245
\geo
ebene(642.66,501.87)
x(6.86,13.82)
y(8.52,13.96)
form(.)
#//Eingabe war:
#
#Fast 4/4 fast mit 112
#
#
#
#
#
#P[1]=[208.00189416780356,-136.1912265513118];
#P[2]=[267.74773327447764,-65.79364382256227]; D=ab(1,2); A(2,1);
#N(3,1,2); N(4,3,2); N(5,4,2);
#M(6,1,3,blauerWinkel,3); M(12,11,10,gruenerWinkel,2);
#M(16,15,14,orange_angle,3);
#N(22,3,4); N(23,14,12); N(24,6,22); N(25,10,24);
#N(26,24,22); N(27,16,23); N(28,20,27); N(29,28,27);
#RA(25,29);
#A(5,21,ab(21,5,[1,29]));
#RA(28,53); A(26,55);
#RA(29,53); A(26,56);
#RA(23,25); A(50,52);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(12.25273595671589532685,8.52499961950408824407,P1)
p(12.89980506422693906643,9.28743097385991589476,P2)
p(11.91598558895749526698,9.46659358179069165828,P3)
p(12.56305469646853900656,10.22902493614651753262,P4)
p(13.54687417173798280601,10.04986232821574354546,P5)
p(11.75273595671589532685,9.39102502328852750679,P6)
p(11.25273595671589355049,8.52499961950408824407,P7)
p(10.75273595671589355049,9.39102502328852750679,P8)
p(10.25273595671589355049,8.52499961950409002043,P9)
p(9.75273595671589355049,9.39102502328852750679,P10)
p(9.25273595671589355049,8.52499961950409002043,P11)
p(9.14165688382112939792,9.51881119096260341905,P12)
p(8.33653035281050591720,8.92570810627765709455,P13)
p(8.22545127991574176463,9.91951967773617049318,P14)
p(7.42032474890511650756,9.32641659305122416868,P15)
p(8.17715224255948491816,9.98003126917841143495,P16)
p(7.23269158191981809125,10.30865576690200668963,P17)
p(7.98951907557418650185,10.96227044302919395591,P18)
p(7.04505841493452056312,11.29089494075278921059,P19)
p(7.80188590858888808555,11.94450961687997647687,P20)
p(6.85742524794922303499,12.27313411460357173155,P21)
p(11.57923522119909520711,10.40818754407729329614,P22)
p(9.03057781092636524534,10.51262276242111681768,P23)
p(10.82154940960971600816,9.75556804473932182020,P24)
p(10.02071244996617593870,10.35445047399308649005,P25)
p(10.63520724997264110812,10.73805295533174053446,P26)
p(8.14628457923934057305,10.97955474932340180771,P27)
p(8.78292769900522607429,11.75071331800740459528,P28)
p(9.13244904994867745529,10.81378491880356840227,P29)
p(8.15156346297131229051,13.79799682331522348022,P30)
p(7.50449435546026677457,13.03556546895939760589,P31)
p(8.48831383072971235038,12.85640286102862184237,P32)
p(7.84124472321866594626,12.09397150667279774439,P33)
p(8.65156346297131051415,12.93197141953078599386,P34)
p(9.15156346297130873779,13.79799682331522348022,P35)
p(9.65156346297131229051,12.93197141953078599386,P36)
p(10.15156346297131051415,13.79799682331522348022,P37)
p(10.65156346297130873779,12.93197141953078421750,P38)
p(11.15156346297131406686,13.79799682331522348022,P39)
p(11.26264253586607644309,12.80418525185671185795,P40)
p(12.06776906687670170015,13.39728833654165640610,P41)
p(12.17884813977146407638,12.40347676508314300747,P42)
p(12.98397467078208933344,12.99657984976808933197,P43)
p(12.22714717712772092284,12.34296517364090206570,P44)
p(13.17160783776738597339,12.01434067591730681102,P45)
p(12.41478034411301933915,11.36072599979011954474,P46)
p(13.35924100475268438970,11.03210150206652429006,P47)
p(12.60241351109831597910,10.37848682593933880014,P48)
p(8.82506419848811063389,11.91480889874202020451,P49)
p(11.37372160876084059566,11.81037368039819668297,P50)
p(9.58275001007748805648,12.56742839807999168045,P51)
p(10.38358696972102812595,11.96854596882622701060,P52)
p(9.76909216971456295653,11.58494348748757474254,P53)
p(12.25801484044786526795,11.34344169349591169293,P54)
p(11.62137172068197799035,10.57228312481190890537,P55)
p(11.27185036973852838571,11.50921152401574509838,P56)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5) s(P47,P5) s(P48,P5)
s(P1,P6)
s(P1,P7) s(P6,P7)
s(P7,P8) s(P6,P8)
s(P7,P9) s(P8,P9)
s(P9,P10) s(P8,P10)
s(P9,P11) s(P10,P11)
s(P11,P12)
s(P11,P13) s(P12,P13)
s(P13,P14) s(P12,P14)
s(P13,P15) s(P14,P15)
s(P15,P16)
s(P15,P17) s(P16,P17)
s(P17,P18) s(P16,P18)
s(P17,P19) s(P18,P19)
s(P19,P20) s(P18,P20)
s(P19,P21) s(P20,P21) s(P31,P21) s(P33,P21)
s(P3,P22) s(P4,P22)
s(P14,P23) s(P12,P23) s(P25,P23)
s(P6,P24) s(P22,P24)
s(P10,P25) s(P24,P25) s(P29,P25)
s(P24,P26) s(P22,P26) s(P55,P26) s(P56,P26)
s(P16,P27) s(P23,P27)
s(P20,P28) s(P27,P28) s(P53,P28)
s(P28,P29) s(P27,P29) s(P53,P29)
s(P30,P31)
s(P30,P32) s(P31,P32)
s(P31,P33) s(P32,P33)
s(P30,P34)
s(P30,P35) s(P34,P35)
s(P34,P36) s(P35,P36)
s(P35,P37) s(P36,P37)
s(P36,P38) s(P37,P38)
s(P37,P39) s(P38,P39)
s(P39,P40)
s(P39,P41) s(P40,P41)
s(P40,P42) s(P41,P42)
s(P41,P43) s(P42,P43)
s(P43,P44)
s(P43,P45) s(P44,P45)
s(P44,P46) s(P45,P46)
s(P45,P47) s(P46,P47)
s(P46,P48) s(P47,P48)
s(P32,P49) s(P33,P49)
s(P40,P50) s(P42,P50) s(P52,P50)
s(P34,P51) s(P49,P51)
s(P38,P52) s(P51,P52) s(P56,P52)
s(P49,P53) s(P51,P53)
s(P44,P54) s(P50,P54)
s(P48,P55) s(P54,P55)
s(P54,P56) s(P55,P56)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) f(P1,MA10,MB10)
color(#008000) m(P10,P11,MA11) m(P11,P12,MB11) b(P11,MA11,MB11)
color(#FFA500) m(P14,P15,MA12) m(P15,P16,MB12) f(P15,MA12,MB12)
pen(2)
color(green) s(P25,P29)
color(green) s(P28,P53)
color(green) s(P29,P53)
color(red) s(P23,P25)
color(blue)
color(orange)
color(red)
\geooff
\geoprint()
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4244
Wohnort: Raun
| Beitrag No.1677, eingetragen 2019-02-02
|
\quoteon(2019-01-26 08:01 - haribo in Beitrag No. 1652)
..., klar gummiband sollte sozusagen anschlagen, also aufhören zu ziehen, wenn es irgendwo überschneidungen gibt...
\quoteoff
Besser noch, schon kurz vor dem Anschlagen einen passend eingestellten Abstandshalter einfügen, damit der Graph gültig bleibt. Das ergibt dann folgenden Algorithmus:
(a) Gummiband einsetzen. Ich verwende eines, welches bei Länge 1 aufhört zu ziehen, so dass es bei einem weiteren benachbarten Knotenpunkt befestigt werden muss. Um das mit dem Streichholzprogramm zu simulieren, suche ich aus den übrigen beweglichen Winkeln einen aus, der den betreffenden Abstand deutlich verändert (wie würden sich die Knotenpunkte bewegen, wenn man den Graph sich selbst überlässt?), verändere diesen Winkel ein wenig in die Richtung, dass sich das Gummiband in Richtung Länge 1 verändert, und drücke dann Button "Feinjustieren(n)", um die ersten n bereits auf Länge 1 eingestellten Abstände wieder auf 1 zu bringen. Denn diese werden durch die Winkeländerung auch mit verstellt. Gleich Button "Feinjustieren(n+1)" für einschließlich Gummiband geht allgemein nicht unbedingt, weil dieser Button nur für schon sehr angenäherte Lösungen funktioniert.
(b) Dieses Winkelverstellen geht weiter. Entweder wird irgendwann das Gummiband auf fast Länge 1 gebracht, dann kann man "Feinjustieren(n+1)" einschließlich dem Gummiband anwenden. Oder nach irgendeinem solchen Teilschritt tritt eine Überschneidung auf oder es ist absehbar, dass eine solche auftreten wird. Dann setze ich an der Stelle den einstellbaren Abstandshalter R(j,k,"brown",abstand) ein. Dazu suche ich einen beweglichen Winkel, der einen großen Einfluss auf die Überschneidung hat und verwende ihn für ein "Feinjustieren(n+1)", um den Abstandshalter auf den vorgefundenen Abstand zu fixieren. Das verbraucht eine der bei 3-er Graphen reichlich vorhandenen Beweglichkeiten. Dann geht es mit dem Gummiband weiter, welches irgendwann mit einem "Feinjustieren(n+2)" auf Länge 1 gebracht wird. n+3 oder mehr, wenn sich noch weitere Überschneidungen anbahnen. Also immer vor Überschneidung den Abstand fixieren, eventuell dazu wieder paar Schritte zurückgehen.
(c) Wenn eine Ecke mittig auf eine Kante trifft und deshalb ein geeigneter Gegenpunkt für den Abstandshalter fehlt, setze ich anstelle von R(j,k) einen einzustellenden Winkel RW(k,i,j,h,winkel) ein.
(d) Man muss auch mit darauf achten. wenn zwei Punkte über zwei aneinandergereihte Kanten verbunden sind, dass dieser Abstand nicht größer 2 wird. Auch dann muss vorher schon ein Abstandshalter rein.
(e) Wenn irgendwann alle verfügbaren Beweglichkeiten für zusätzliche Abstandshalter verbraucht sind, geht es trotzdem noch weiter: Man kann die Abstandshalter einzeln durchgehen und probieren, wenn man einen solchen Abstand wieder ein wenig vergrößert, ob noch weitere Abstände auf 1 gebracht werden können. Immer gefolgt von "Feinjustieren(...)", um die schon erreichten Abstände 1 zu erhalten.
(f) wie fertig, wenn alle Kanten 1 sind ohne Überschneidungen. Man kann auch da noch experimentieren, ob man zu enge Abstände noch etwas vergrößern kann, damit es besser aussieht. Auch hier nur in kleinen Schritten, immer gefolgt von "Feinjustieren(...)".
Soweit der Algorithmus. Als Beispiel verwende ich den #1649
68 Knoten, 68×Grad 3, 0 Dreiecke,
102 Kanten, minimal 0.99999999999777411386, maximal 1.00000000000000199840
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=0.99999999999777411386
|P68-P64|=0.99999999999781885585
$
%Eingabe war:
%
%#1649
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%P[1]=[192.95101123918997,58.09544925593906]; P[2]=[148.85970033886332,118.37637126220461]; D=ab(1,2); A(2,1,Bew(1));
% M(3,1,2,blauerWinkel);
% M(4,3,1,gruenerWinkel);
% M(5,3,4,orangerWinkel);
% M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4);
% N(8,4,6);
% M(9,8,4,vierterWinkel);
% N(10,9,7);
% M(11,5,6,fuenfterWinkel);
% M(12,11,5,sechsterWinkel);
% N(13,6,12);
% N(14,13,9);
% M(15,10,9,siebenterWinkel);
% N(16,15,14);
% N(17,12,16);
% M(18,11,12,achterWinkel);
% N(19,17,18);
% M(20,1,2,neunterWinkel);
% M(21,20,1,zehnterWinkel);
% M(22,20,21,elfterWinkel);
% N(23,2,21);
% M(24,22,20,zwölfterWinkel);
% N(25,24,21);
% M(26,22,24,dreizehnterWinkel);
% M(27,26,22,vierzehnterWinkel);
% N(28,27,24);
% M(29,28,24,fuenfzehnterWinkel);
% N(30,25,29);
% N(31,23,30);
% M(32,26,27,sechzehnterWinkel);
% A(18,32,ab(32,18,[1,32]));
% N(63,50,27);
% N(64,29,63);
% N(65,19,58);
% N(66,60,65);
% N(67,62,15);
% N(68,31,47);
% RA(66,67);
% RA(68,64);
%
%
%Ende der Eingabe.
\usetikzlibrary{spy}
\tikzset{SpyStyle/.style={spy using outlines={rectangle, magnification=3, width=2cm, height=2cm, connect spies, blue!70!black}}}
\begin{tikzpicture}[SpyStyle,draw=grey,font=\sffamily\tiny]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/9.10/1.53,
2/7.922/3.143,
3/7.42/0.45,
4/6.60/2.27,
5/5.47/0.00,
6/5.46/2.00,
7/8.27/1.17,
8/6.48/0.28,
9/6.08/2.24,
10/7.871/3.134,
11/3.52/0.45,
12/3.69/2.44,
13/4.15/0.50,
14/4.10/2.49,
15/6.437/4.527,
16/6.10/2.56,
17/4.82/4.09,
18/1.82/1.50,
19/3.501/2.587,
20/10.22/3.19,
21/8.266/3.619,
22/10.55/5.16,
23/6.490/4.540,
24/8.55/5.22,
25/10.21/4.10,
26/10.01/7.09,
27/8.13/6.42,
28/10.13/6.45,
29/8.266/5.716,
30/8.244/3.716,
31/8.111/5.712,
32/8.73/8.62,
33/1.45/8.59,
34/2.627/6.979,
35/3.13/9.67,
36/3.95/7.85,
37/5.08/10.12,
38/5.09/8.12,
39/2.28/8.95,
40/4.07/9.85,
41/4.47/7.89,
42/2.678/6.989,
43/7.03/9.67,
44/6.86/7.68,
45/6.40/9.63,
46/6.45/7.63,
47/4.112/5.595,
48/4.45/7.57,
49/5.73/6.03,
50/7.048/7.536,
51/0.33/6.93,
52/2.284/6.504,
53/0.00/4.96,
54/4.059/5.583,
55/2.00/4.90,
56/0.34/6.02,
57/0.54/3.03,
58/2.42/3.70,
59/0.42/3.68,
60/2.283/4.406,
61/2.305/6.406,
62/2.439/4.411,
63/8.91/8.26,
64/7.126/7.360,
65/1.64/1.86,
66/3.423/2.763,
67/4.44/4.49,
68/6.11/5.64}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Punkte als \fill[red] (p-1) circle (1.125pt)
%Kanten als \draw[line width=0] (p-1) -- (p-2);
\foreach \i/\j in {
2/1,
3/1,
4/3,
5/3,
6/5,
7/2, 7/4,
8/4, 8/6,
9/8,
10/9, 10/7,
11/5,
12/11,
13/6, 13/12,
14/13, 14/9,
15/10,
16/15, 16/14,
17/12, 17/16,
18/11, 18/57,
19/17, 19/18,
20/1,
21/20,
22/20,
23/2, 23/21,
24/22,
25/24, 25/21,
26/22,
27/26,
28/27, 28/24,
29/28,
30/25, 30/29,
31/23, 31/30,
32/26, 32/43,
34/33,
35/33,
36/35,
37/35,
38/37,
39/34, 39/36,
40/36, 40/38,
41/40,
42/39, 42/41,
43/37,
44/43,
45/38, 45/44,
46/41, 46/45,
47/42,
48/46, 48/47,
49/44, 49/48,
50/49, 50/32,
51/33,
52/51,
53/51,
54/34, 54/52,
55/53,
56/52, 56/55,
57/53,
58/57,
59/55, 59/58,
60/59,
61/56, 61/60,
62/54, 62/61,
63/50, 63/27,
64/29, 64/63,
65/19, 65/58,
66/60, 66/65, 66/67,
67/62, 67/15,
68/31, 68/47, 68/64}
\draw[line width=0] (p-\i) -- (p-\j);
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-66) -- (p-67);
\draw[green,very thick] (p-68) -- (p-64);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
1/126.18/212.68/red!0!lime!0!blue!100!white,
3/32.68/114.17/red!0!lime!100!blue!100!white,
3/114.17/192.97/red!61!lime!100!blue!100!white,
8/86.55/101.44/red!100!lime!50!blue!50!white,
5/90.18/167.03/red!0!lime!50!blue!100!white,
11/347.03/445.23/red!0!lime!100!blue!100!white,
10/206.62/495.82/red!0!lime!43!blue!33!white,
11/85.23/148.24/red!100!lime!100!blue!50!white,
1/126.18/416.08/red!0!lime!50!blue!13!white,
20/236.08/527.58/red!50!lime!100!blue!18!white,
20/167.58/440.48/red!0!lime!100!blue!44!white,
22/260.48/538.38/red!0!lime!0!blue!18!white,
22/178.38/465.56/red!100!lime!87!blue!29!white,
26/285.56/559.56/red!78!lime!100!blue!53!white,
28/217.91/561.41/red!0!lime!52!blue!88!white,
26/199.56/489.96/red!0!lime!39!blue!48!white}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/274,
2/30,
3/336,
4/299,
5/311,
6/267,
7/126,
8/106,
9/157,
10/354,
11/299,
12/172,
13/79,
14/134,
15/111,
16/134,
17/95,
18/183,
19/307,
20/24,
21/266,
22/324,
23/187,
24/4,
25/172,
26/347,
27/36,
28/202,
29/256,
30/233,
31/67,
32/3,
33/94,
34/210,
35/156,
36/119,
37/131,
38/87,
39/306,
40/286,
41/337,
42/174,
43/119,
44/352,
45/259,
46/314,
47/291,
48/314,
49/275,
50/127,
51/204,
52/86,
53/144,
54/7,
55/184,
56/352,
57/167,
58/216,
59/22,
60/76,
61/53,
62/247,
63/227,
64/95,
65/47,
66/275,
67/33,
68/213}
\node[anchor=\a] (P\i) at (p-\i) {\i};
%Vergrößerungen als \spy[rectangle, magnification=3, width=2cm, h eight=2cm, blue!70!black] on (p-18) in node at (2.5 cm,-2);
%\spy[] on (p-1) in node at (2.5,-2);
\end{tikzpicture}
$
welcher in ein regelmäßiges 16 -Eck gepackt werden soll. Also 16-Eck herum zeichnen (ich habe auch etwas die Winkel variiert, um in der Mitte einen größeren Knick bei P67 und P68 zu erhalten) und ein erster einzustellender Abstand wäre P82-P21.
82 Knoten, 1×Grad 1, 13×Grad 2, 67×Grad 3, 1×Grad 4, 0 Dreiecke,
116 Kanten, minimal 0.99999999999999766853, maximal 1.00000000000000488498
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=1.00000000000000488498
|P68-P64|=1.00000000000000488498
|P82-P21|=1.01280649862391691762
$
%Eingabe war:
%
%#1649 die Mitten etwas mehr zusammen
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%P[1]=[192.95101123918997,58.09544925593906]; P[2]=[148.85970033886332,118.37637126220461]; D=ab(1,2); A(2,1,Bew(1));
% M(3,1,2,blauerWinkel);
% M(4,3,1,gruenerWinkel);
% M(5,3,4,orangerWinkel);
% M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4);
% N(8,4,6);
% M(9,8,4,vierterWinkel);
% N(10,9,7);
% M(11,5,6,fuenfterWinkel);
% M(12,11,5,sechsterWinkel);
% N(13,6,12);
% N(14,13,9);
% M(15,10,9,siebenterWinkel);
% N(16,15,14);
% N(17,12,16);
% M(18,11,12,achterWinkel);
% N(19,17,18);
% M(20,1,2,neunterWinkel);
% M(21,20,1,zehnterWinkel);
% M(22,20,21,elfterWinkel);
% N(23,2,21);
% M(24,22,20,zwölfterWinkel);
% N(25,24,21);
% M(26,22,24,dreizehnterWinkel);
% M(27,26,22,vierzehnterWinkel);
% N(28,27,24);
% M(29,28,24,fuenfzehnterWinkel);
% N(30,25,29);
% N(31,23,30);
% M(32,26,27,sechzehnterWinkel);
% A(18,32,ab(32,18,[1,32]));
% N(63,50,27);
% N(64,29,63);
% N(65,19,58);
% N(66,60,65);
% N(67,62,15);
% N(68,31,47);
% RA(66,67);
% RA(68,64);
%
%M(69,3,1,180*14/16);
%M(70,69,3,180*14/16);
%M(71,70,69,180*14/16);
%M(72,71,70,180*14/16);
%M(73,72,71,180*14/16);
%M(74,73,72,180*14/16);
%M(75,74,73,180*14/16);
%M(76,75,74,180*14/16);
%M(77,76,75,180*14/16);
%M(78,77,76,180*14/16);
%M(79,78,77,180*14/16);
%M(80,79,78,180*14/16);
%M(81,80,79,180*14/16);
%M(82,81,80,180*14/16);
%
%//R(69,6); R(70,12);
%R(82,21);
%//R(81,24); R(71,19);
%
%
%Ende der Eingabe.
\usetikzlibrary{spy}
\tikzset{SpyStyle/.style={spy using outlines={rectangle, magnification=3, width=2cm, height=2cm, connect spies, blue!70!black}}}
\begin{tikzpicture}[SpyStyle,draw=grey,font=\sffamily\tiny]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/9.20/1.54,
2/8.016/3.150,
3/7.52/0.45,
4/6.69/2.28,
5/5.568/0.000,
6/5.56/2.00,
7/8.37/1.18,
8/6.58/0.28,
9/6.18/2.24,
10/7.961/3.140,
11/3.615/0.431,
12/3.76/2.43,
13/4.25/0.49,
14/4.19/2.49,
15/6.434/4.430,
16/6.19/2.45,
17/4.96/4.02,
18/1.905/1.468,
19/3.538/2.622,
20/10.313/3.196,
21/8.360/3.626,
22/10.644/5.168,
23/6.585/4.546,
24/8.64/5.22,
25/10.30/4.10,
26/10.11/7.09,
27/8.24/6.38,
28/10.24/6.43,
29/8.368/5.727,
30/8.338/3.728,
31/8.202/5.723,
32/8.74/8.55,
33/1.45/8.49,
34/2.627/6.871,
35/3.13/9.57,
36/3.95/7.75,
37/5.08/10.02,
38/5.08/8.02,
39/2.28/8.84,
40/4.06/9.74,
41/4.47/7.78,
42/2.682/6.882,
43/7.03/9.59,
44/6.88/7.60,
45/6.39/9.53,
46/6.45/7.54,
47/4.210/5.591,
48/4.45/7.58,
49/5.68/6.00,
50/7.106/7.399,
51/0.33/6.83,
52/2.284/6.396,
53/0.00/4.85,
54/4.059/5.475,
55/2.00/4.80,
56/0.34/5.92,
57/0.54/2.93,
58/2.40/3.65,
59/0.40/3.59,
60/2.276/4.294,
61/2.306/6.294,
62/2.442/4.299,
63/8.91/8.26,
64/7.150/7.314,
65/1.73/1.76,
66/3.494/2.708,
67/4.43/4.47,
68/6.21/5.55,
69/5.548/0.095,
70/3.593/0.518,
71/1.949/1.657,
72/0.87/3.34,
73/0.51/5.31,
74/0.93/7.26,
75/2.07/8.91,
76/3.75/9.99,
77/5.72/10.35,
78/7.67/9.92,
79/9.32/8.78,
80/10.40/7.10,
81/10.759/5.135,
82/10.336/3.180}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Punkte als \fill[red] (p-1) circle (1.125pt)
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-66) -- (p-67);
\draw[green,very thick] (p-68) -- (p-64);
\draw[green,very thick] (p-82) -- (p-21);
%Kanten als \draw[line width=0] (p-1) -- (p-2);
\foreach \i/\j in {
2/1,
3/1,
4/3,
5/3,
6/5,
7/2, 7/4,
8/4, 8/6,
9/8,
10/9, 10/7,
11/5,
12/11,
13/6, 13/12,
14/13, 14/9,
15/10,
16/15, 16/14,
17/12, 17/16,
18/11, 18/57,
19/17, 19/18,
20/1,
21/20,
22/20,
23/2, 23/21,
24/22,
25/24, 25/21,
26/22,
27/26,
28/27, 28/24,
29/28,
30/25, 30/29,
31/23, 31/30,
32/26, 32/43,
34/33,
35/33,
36/35,
37/35,
38/37,
39/34, 39/36,
40/36, 40/38,
41/40,
42/39, 42/41,
43/37,
44/43,
45/38, 45/44,
46/41, 46/45,
47/42,
48/46, 48/47,
49/44, 49/48,
50/49, 50/32,
51/33,
52/51,
53/51,
54/34, 54/52,
55/53,
56/52, 56/55,
57/53,
58/57,
59/55, 59/58,
60/59,
61/56, 61/60,
62/54, 62/61,
63/50, 63/27,
64/29, 64/63,
65/19, 65/58,
66/60, 66/65, 66/67,
67/62, 67/15,
68/31, 68/47, 68/64,
69/3,
70/69,
71/70,
72/71,
73/72,
74/73,
75/74,
76/75,
77/76,
78/77,
79/78,
80/79,
81/80,
82/81}
\draw[line width=0] (p-\i) -- (p-\j);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
1/126.18/212.79/red!0!lime!0!blue!100!white,
3/32.79/114.28/red!0!lime!100!blue!100!white,
3/114.28/193.08/red!61!lime!100!blue!100!white,
8/86.76/101.65/red!100!lime!50!blue!50!white,
5/90.18/167.56/red!0!lime!50!blue!100!white,
11/347.56/445.76/red!0!lime!100!blue!100!white,
10/206.80/499.80/red!0!lime!43!blue!33!white,
11/85.76/148.77/red!100!lime!100!blue!50!white,
1/126.18/416.08/red!0!lime!50!blue!13!white,
20/236.08/527.58/red!50!lime!100!blue!18!white,
20/167.58/440.48/red!0!lime!100!blue!44!white,
22/260.48/538.38/red!0!lime!0!blue!18!white,
22/178.38/465.56/red!100!lime!87!blue!29!white,
26/285.56/561.06/red!78!lime!100!blue!53!white,
28/217.09/560.59/red!0!lime!52!blue!88!white,
26/201.06/493.16/red!0!lime!39!blue!48!white}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/274,
2/30,
3/335,
4/299,
5/234,
6/267,
7/126,
8/106,
9/157,
10/356,
11/300,
12/171,
13/79,
14/135,
15/114,
16/133,
17/93,
18/185,
19/308,
20/24,
21/266,
22/324,
23/187,
24/4,
25/172,
26/350,
27/38,
28/202,
29/257,
30/233,
31/67,
32/5,
33/94,
34/210,
35/156,
36/119,
37/54,
38/87,
39/306,
40/286,
41/337,
42/176,
43/120,
44/351,
45/259,
46/315,
47/294,
48/313,
49/273,
50/128,
51/204,
52/86,
53/144,
54/7,
55/184,
56/352,
57/170,
58/218,
59/22,
60/77,
61/53,
62/247,
63/230,
64/97,
65/50,
66/277,
67/36,
68/216,
69/272,
70/249,
71/227,
72/204,
73/182,
74/159,
75/137,
76/114,
77/92,
78/69,
79/47,
80/24,
81/2,
82/270}
\node[anchor=\a] (P\i) at (p-\i) {\i};
%Vergrößerungen als \spy[rectangle, magnification=3, width=2cm, h eight=2cm, blue!70!black] on (p-18) in node at (2.5 cm,-2);
\spy[] on (p-82) in node at (12,2);
\end{tikzpicture}
$
Das klappt mit einem passend ausgesuchten Winkel ganz gut, auch als nächster Abstand P81-P24. Bei P80-P27 war es dann notwendig, zwei zusätzliche Abstandshalter P11-P65 und P2-P9 einzufügen (zur Unterscheidung braun gefärbt).
82 Knoten, 1×Grad 1, 13×Grad 2, 67×Grad 3, 1×Grad 4, 0 Dreiecke,
116 Kanten, minimal 0.99999999999998590017, maximal 1.00000000000000133227
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=0.99999999999998745448
|P68-P64|=0.99999999999998590017
|P82-P21|=1.00000000000000022204
|P81-P24|=1.00000000000000066613
|P11-P65|=1.03300000000000191669
|P2-P9|=1.01200000000000001066
|P80-P27|=1.00000000000000111022
$
%Eingabe war:
%
%#1649 P81, P82, P6 fertig
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%P[1]=[142.95101123918997,58.09544925593906]; P[2]=[98.85970033886332,118.37637126220461]; D=ab(1,2); A(2,1,Bew(1));
% M(3,1,2,blauerWinkel);
% M(4,3,1,gruenerWinkel);
% M(5,3,4,orangerWinkel);
% M(6,5,3,360-36-blauerWinkel-gruenerWinkel-orangerWinkel);N(7,2,4);
% N(8,4,6);
% M(9,8,4,vierterWinkel);
% N(10,9,7);
% M(11,5,6,fuenfterWinkel);
% M(12,11,5,sechsterWinkel);
% N(13,6,12);
% N(14,13,9);
% M(15,10,9,siebenterWinkel);
% N(16,15,14);
% N(17,12,16);
% M(18,11,12,achterWinkel);
% N(19,17,18);
% M(20,1,2,neunterWinkel);
% M(21,20,1,zehnterWinkel);
% M(22,20,21,elfterWinkel);
% N(23,2,21);
% M(24,22,20,zwölfterWinkel);
% N(25,24,21);
% M(26,22,24,dreizehnterWinkel);
% M(27,26,22,vierzehnterWinkel);
% N(28,27,24);
% M(29,28,24,fuenfzehnterWinkel);
% N(30,25,29);
% N(31,23,30);
% M(32,26,27,sechzehnterWinkel);
% A(18,32,ab(32,18,[1,32]));
% N(63,50,27);
% N(64,29,63);
% N(65,19,58);
% N(66,60,65);
% N(67,62,15);
% N(68,31,47);
% RA(66,67);
% RA(68,64);
%
%M(69,3,1,180*14/16);
%M(70,69,3,180*14/16);
%M(71,70,69,180*14/16);
%M(72,71,70,180*14/16);
%M(73,72,71,180*14/16);
%M(74,73,72,180*14/16);
%M(75,74,73,180*14/16);
%M(76,75,74,180*14/16);
%M(77,76,75,180*14/16);
%M(78,77,76,180*14/16);
%M(79,78,77,180*14/16);
%M(80,79,78,180*14/16);
%M(81,80,79,180*14/16);
%M(82,81,80,180*14/16);
%
%R(82,21); R(81,24); R(11,65,"brown",1.033*D); R(2,9,"brown",1.012*D); R(80,27); //R(69,6); R(70,12); R(71,19);
%
%
%Ende der Eingabe.
\usetikzlibrary{spy}
\tikzset{SpyStyle/.style={spy using outlines={rectangle, magnification=3, width=2cm, height=2cm, connect spies, blue!70!black}}}
\begin{tikzpicture}[SpyStyle,draw=grey,font=\sffamily\tiny]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/9.19/1.38,
2/8.010/2.997,
3/7.49/0.33,
4/6.70/2.16,
5/5.51972214937878113972/0.00000000000000000000,
6/5.51/2.00,
7/8.34/1.02,
8/6.36/0.19,
9/6.16/2.18,
10/7.986/2.992,
11/3.590/0.525,
12/3.810/2.513,
13/4.15/0.54,
14/4.19/2.54,
15/6.524/4.357,
16/6.19/2.39,
17/5.08/4.05,
18/1.948/1.667,
19/3.722/2.589,
20/10.3559548930944683/3.0082851623948788,
21/8.428/3.539,
22/10.8098395444616475/4.9561015611484409,
23/6.657/4.469,
24/8.82/5.16,
25/10.39/3.92,
26/10.4837772188887808/6.9293434013297235,
27/8.69/6.04,
28/10.68/5.88,
29/8.69/5.71,
30/8.400/3.732,
31/8.21/5.72,
32/8.862/8.100,
33/1.62/8.38,
34/2.799/6.770,
35/3.32/9.44,
36/4.11/7.60,
37/5.29/9.77,
38/5.30/7.77,
39/2.47/8.74,
40/4.45/9.58,
41/4.65/7.59,
42/2.824/6.774,
43/7.22/9.24,
44/7.000/7.254,
45/6.66/9.23,
46/6.62/7.23,
47/4.286/5.410,
48/4.62/7.38,
49/5.73/5.71,
50/7.088/7.177,
51/0.45/6.76,
52/2.382/6.227,
53/0.00/4.81,
54/4.153/5.297,
55/1.99/4.61,
56/0.42/5.85,
57/0.33/2.84,
58/2.12/3.72,
59/0.13/3.89,
60/2.12/4.06,
61/2.410/6.034,
62/2.60/4.04,
63/8.895/8.033,
64/7.174/7.014,
65/1.914/1.734,
66/3.636/2.752,
67/4.53/4.54,
68/6.28/5.23,
69/5.51972214937878113972/0.00000000000000000000,
70/3.572/0.454,
71/1.946/1.619,
72/0.89/3.32,
73/0.56/5.29,
74/1.02/7.24,
75/2.18/8.86,
76/3.88/9.92,
77/5.85/10.25,
78/7.80/9.79,
79/9.43/8.63,
80/10.4837772188887879/6.9293434013297155,
81/10.8098395444616493/4.9561015611484329,
82/10.3559548930944665/3.0082851623948725}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Punkte als \fill[red] (p-1) circle (1.125pt)
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-66) -- (p-67);
\draw[green,very thick] (p-68) -- (p-64);
\draw[green,very thick] (p-82) -- (p-21);
\draw[green,very thick] (p-81) -- (p-24);
\draw[brown,very thick] (p-11) -- (p-65);
\draw[brown,very thick] (p-2) -- (p-9);
\draw[green,very thick] (p-80) -- (p-27);
%Kanten als \draw[line width=0] (p-1) -- (p-2);
\foreach \i/\j in {
2/1,
3/1,
4/3,
5/3,
6/5,
7/2, 7/4,
8/4, 8/6,
9/8,
10/9, 10/7,
11/5,
12/11,
13/6, 13/12,
14/13, 14/9,
15/10,
16/15, 16/14,
17/12, 17/16,
18/11, 18/57,
19/17, 19/18,
20/1,
21/20,
22/20,
23/2, 23/21,
24/22,
25/24, 25/21,
26/22,
27/26,
28/27, 28/24,
29/28,
30/25, 30/29,
31/23, 31/30,
32/26, 32/43,
34/33,
35/33,
36/35,
37/35,
38/37,
39/34, 39/36,
40/36, 40/38,
41/40,
42/39, 42/41,
43/37,
44/43,
45/38, 45/44,
46/41, 46/45,
47/42,
48/46, 48/47,
49/44, 49/48,
50/49, 50/32,
51/33,
52/51,
53/51,
54/34, 54/52,
55/53,
56/52, 56/55,
57/53,
58/57,
59/55, 59/58,
60/59,
61/56, 61/60,
62/54, 62/61,
63/50, 63/27,
64/29, 64/63,
65/19, 65/58,
66/60, 66/65, 66/67,
67/62, 67/15,
68/31, 68/47, 68/64,
69/3,
70/69,
71/70,
72/71,
73/72,
74/73,
75/74,
76/75,
77/76,
78/77,
79/78,
80/79,
81/80,
82/81}
\draw[line width=0] (p-\i) -- (p-\j);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
1/126.18/211.88/red!0!lime!0!blue!100!white,
3/31.88/113.38/red!0!lime!100!blue!100!white,
3/113.38/189.38/red!61!lime!100!blue!100!white,
8/80.36/95.90/red!100!lime!50!blue!50!white,
5/90.18/164.79/red!0!lime!50!blue!100!white,
11/344.79/443.69/red!0!lime!100!blue!100!white,
10/203.98/496.98/red!0!lime!43!blue!33!white,
11/83.69/145.19/red!100!lime!100!blue!50!white,
1/126.18/414.38/red!0!lime!50!blue!13!white,
20/234.38/524.61/red!50!lime!100!blue!18!white,
20/164.61/436.88/red!0!lime!100!blue!44!white,
22/256.88/534.28/red!0!lime!0!blue!18!white,
22/174.28/459.38/red!100!lime!87!blue!29!white,
26/279.38/566.30/red!78!lime!100!blue!53!white,
28/201.23/544.83/red!0!lime!52!blue!88!white,
26/206.30/504.18/red!0!lime!39!blue!48!white}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/273,
2/29,
3/334,
4/295,
5/310,
6/264,
7/125,
8/100,
9/45,
10/353,
11/297,
12/168,
13/76,
14/132,
15/111,
16/130,
17/89,
18/179,
19/309,
20/22,
21/264,
22/319,
23/188,
24/354,
25/169,
26/358,
27/238,
28/191,
29/136,
30/226,
31/70,
32/359,
33/93,
34/209,
35/154,
36/115,
37/130,
38/84,
39/305,
40/280,
41/225,
42/173,
43/117,
44/348,
45/256,
46/312,
47/291,
48/310,
49/269,
50/129,
51/202,
52/84,
53/139,
54/8,
55/174,
56/349,
57/178,
58/58,
59/11,
60/316,
61/46,
62/250,
63/237,
64/177,
65/57,
66/357,
67/122,
68/302,
69/271,
70/248,
71/226,
72/203,
73/181,
74/158,
75/136,
76/113,
77/91,
78/68,
79/46,
80/23,
81/1,
82/270}
\node[anchor=\a] (P\i) at (p-\i) {\i};
%Vergrößerungen als \spy[rectangle, magnification=3, width=2cm, h eight=2cm, blue!70!black] on (p-18) in node at (2.5 cm,-2);
\spy[] on (p-65) in node at (2.5,-2);
\spy[] on (p-2) in node at (5,-2);
\spy[] on (p-81) in node at (13,5);
\spy[] on (p-80) in node at (13,7.5);
\end{tikzpicture}
$
So, wer genau hingesehen hat ... in P28 habe ich mir eine Überschneidung eingehandelt, diese muss ich durch einen einzustellenden Winkel ∠(P28-P22,P26-P22) verhindern (weil ein Gegenpunkt fehlt). Dann auch noch Überschneidung bei P19-P12 verhindern. Das reicht, um P69, P70 und P71 zu positionieren. P72-P58 ist der letzte einzustellende Abstand, alle anderen passen dann wegen Symmetrie.
82 Knoten, 1×Grad 1, 13×Grad 2, 67×Grad 3, 1×Grad 4, 0 Dreiecke,
116 Kanten, minimal 0.99999999999905353487, maximal 1.00000000000000133227
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=0.99999999999905353487
|P68-P64|=0.99999999999905408998
|P82-P21|=0.99999999999999711342
|P81-P24|=0.99999999999999622524
|P11-P65|=1.03299999999999769784
|P2-P9|=1.01200000000000489564
|P80-P27|=1.00000000000000754952
|P69-P6|=1.00000000000000066613
|P19-P12|=0.05799999999999688738
∠(P28-P22,P26-P22)=-0.04999999999997144923°
|P70-P12|=1.00000000000000266454
|P71-P19|=1.00000000000000288658
|P72-P58|=0.68863693966672889779
$
%Eingabe war:
%
%#1649 P81, P82, P6 fertig, achtzehnterWinkel, P70, P71 fertig
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%P[1]=[142.95101123919335,58.09544925594051]; P[2]=[98.8597003388667,118.37637126220602]; D=ab(1,2); A(2,1,Bew(1));
% M(3,1,2,blauerWinkel);
% M(4,3,1,gruenerWinkel);
% M(5,3,4,orangerWinkel);
% M(6,5,3,achtzehnterWinkel); N(7,2,4);
% N(8,4,6);
% M(9,8,4,vierterWinkel);
% N(10,9,7);
% M(11,5,6,fuenfterWinkel);
% M(12,11,5,sechsterWinkel);
% N(13,6,12);
% N(14,13,9);
% M(15,10,9,siebenterWinkel);
% N(16,15,14);
% N(17,12,16);
% M(18,11,12,achterWinkel);
% N(19,17,18);
% M(20,1,2,neunterWinkel);
% M(21,20,1,zehnterWinkel);
% M(22,20,21,elfterWinkel);
% N(23,2,21);
% M(24,22,20,zwölfterWinkel);
% N(25,24,21);
% M(26,22,24,dreizehnterWinkel);
% M(27,26,22,vierzehnterWinkel);
% N(28,27,24);
% M(29,28,24,fuenfzehnterWinkel);
% N(30,25,29);
% N(31,23,30);
% M(32,26,27,sechzehnterWinkel);
% A(18,32,ab(32,18,[1,32]));
% N(63,50,27);
% N(64,29,63);
% N(65,19,58);
% N(66,60,65);
% N(67,62,15);
% N(68,31,47);
% RA(66,67);
% RA(68,64);
%
%M(69,3,1,180*14/16);
%M(70,69,3,180*14/16);
%M(71,70,69,180*14/16);
%M(72,71,70,180*14/16);
%M(73,72,71,180*14/16);
%M(74,73,72,180*14/16);
%M(75,74,73,180*14/16);
%M(76,75,74,180*14/16);
%M(77,76,75,180*14/16);
%M(78,77,76,180*14/16);
%M(79,78,77,180*14/16);
%M(80,79,78,180*14/16);
%M(81,80,79,180*14/16);
%M(82,81,80,180*14/16);
%
%R(82,21); R(81,24); R(11,65,"brown",1.033*D); R(2,9,"brown",1.012*D); R(80,27); R(69,6); R(19,12,"brown",0.058*D); RW(26,22,28,22,-0.05); R(70,12); R(71,19);
%
%
%Ende der Eingabe.
\usetikzlibrary{spy}
\tikzset{SpyStyle/.style={spy using outlines={rectangle, magnification=3, width=2cm, height=2cm, connect spies, blue!70!black}}}
\begin{tikzpicture}[SpyStyle,draw=grey,font=\sffamily\tiny]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/9.10/1.36,
2/7.923/2.973,
3/7.40/0.31,
4/6.62/2.15,
5/5.42339226396139207/0.00000000000000171,
6/5.37/2.00,
7/8.25/1.00,
8/6.23/0.19,
9/6.06/2.19,
10/7.899/2.968,
11/3.4785997896119571/0.4666714387165830,
12/3.748/2.449,
13/4.07/0.47,
14/4.08/2.47,
15/6.459/4.357,
16/6.08/2.39,
17/4.95/4.05,
18/1.8604332555333494/1.6420594886762649,
19/3.657/2.521,
20/10.2792841894249403/2.9764476104730808,
21/8.355/3.520,
22/10.7459556281415214/4.9212400848225153,
23/6.592/4.465,
24/8.76/5.13,
25/10.32/3.89,
26/10.4328639594575030/6.8965814748107528,
27/8.59/6.12,
28/10.58/5.95,
29/8.62/5.57,
30/8.343/3.586,
31/8.25/5.58,
32/8.886/8.164,
33/1.64/8.45,
34/2.823/6.833,
35/3.35/9.49,
36/4.13/7.65,
37/5.32/9.81,
38/5.38/7.81,
39/2.50/8.81,
40/4.52/9.61,
41/4.69/7.62,
42/2.847/6.837,
43/7.27/9.34,
44/6.998/7.357,
45/6.67/9.33,
46/6.67/7.33,
47/4.287/5.449,
48/4.67/7.41,
49/5.80/5.76,
50/7.089/7.285,
51/0.47/6.83,
52/2.391/6.286,
53/0.00/4.88,
54/4.154/5.341,
55/1.99/4.67,
56/0.43/5.92,
57/0.31/2.91,
58/2.16/3.68,
59/0.16/3.85,
60/2.13/4.24,
61/2.403/6.220,
62/2.50/4.22,
63/8.917/8.096,
64/7.24/7.01,
65/1.829/1.710,
66/3.51/2.79,
67/4.47/4.55,
68/6.28/5.26,
69/5.42339226396139207/0.00000000000000000,
70/3.4785997896119571/0.4666714387165776,
71/1.8604332555333463/1.6420594886762570,
72/0.82/3.35,
73/0.50/5.32,
74/0.97/7.27,
75/2.14/8.89,
76/3.85/9.93,
77/5.82/10.24,
78/7.77/9.78,
79/9.39/8.60,
80/10.4328639594575172/6.8965814748107555,
81/10.7459556281415125/4.9212400848225153,
82/10.2792841894249332/2.9764476104730804}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Punkte als \fill[red] (p-1) circle (1.125pt)
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-66) -- (p-67);
\draw[green,very thick] (p-68) -- (p-64);
\draw[green,very thick] (p-82) -- (p-21);
\draw[green,very thick] (p-81) -- (p-24);
\draw[brown,very thick] (p-11) -- (p-65);
\draw[brown,very thick] (p-2) -- (p-9);
\draw[green,very thick] (p-80) -- (p-27);
\draw[green,very thick] (p-69) -- (p-6);
\draw[brown,very thick] (p-19) -- (p-12);
\draw[violet,very thick] (p-26) -- (p-22);
\draw[green,very thick] (p-70) -- (p-12);
\draw[green,very thick] (p-71) -- (p-19);
\draw[green,very thick] (p-72) -- (p-58);
%Kanten als \draw[line width=0] (p-1) -- (p-2);
\foreach \i/\j in {
2/1,
3/1,
4/3,
5/3,
6/5,
7/2, 7/4,
8/4, 8/6,
9/8,
10/9, 10/7,
11/5,
12/11,
13/6, 13/12,
14/13, 14/9,
15/10,
16/15, 16/14,
17/12, 17/16,
18/11, 18/57,
19/17, 19/18,
20/1,
21/20,
22/20,
23/2, 23/21,
24/22,
25/24, 25/21,
26/22,
27/26,
28/27, 28/24,
29/28,
30/25, 30/29,
31/23, 31/30,
32/26, 32/43,
34/33,
35/33,
36/35,
37/35,
38/37,
39/34, 39/36,
40/36, 40/38,
41/40,
42/39, 42/41,
43/37,
44/43,
45/38, 45/44,
46/41, 46/45,
47/42,
48/46, 48/47,
49/44, 49/48,
50/49, 50/32,
51/33,
52/51,
53/51,
54/34, 54/52,
55/53,
56/52, 56/55,
57/53,
58/57,
59/55, 59/58,
60/59,
61/56, 61/60,
62/54, 62/61,
63/50, 63/27,
64/29, 64/63,
65/19, 65/58,
66/60, 66/65, 66/67,
67/62, 67/15,
68/31, 68/47, 68/64,
69/3,
70/69,
71/70,
72/71,
73/72,
74/73,
75/74,
76/75,
77/76,
78/77,
79/78,
80/79,
81/80,
82/81}
\draw[line width=0] (p-\i) -- (p-\j);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
1/126.18/211.51/red!0!lime!0!blue!100!white,
3/31.51/113.01/red!0!lime!100!blue!100!white,
3/113.01/189.01/red!61!lime!100!blue!100!white,
5/9.01/91.63/red!0!lime!31!blue!32!white,
8/78.70/94.78/red!100!lime!50!blue!50!white,
5/91.63/166.51/red!0!lime!50!blue!100!white,
11/346.51/442.27/red!0!lime!100!blue!100!white,
10/203.03/496.03/red!0!lime!43!blue!33!white,
11/82.27/144.01/red!100!lime!100!blue!50!white,
1/126.18/414.01/red!0!lime!50!blue!13!white,
20/234.01/524.24/red!50!lime!100!blue!18!white,
20/164.24/436.51/red!0!lime!100!blue!44!white,
22/256.51/533.91/red!0!lime!0!blue!18!white,
22/173.91/459.01/red!100!lime!87!blue!29!white,
26/279.01/562.76/red!78!lime!100!blue!53!white,
28/204.21/551.16/red!0!lime!52!blue!88!white,
26/202.76/500.68/red!0!lime!39!blue!48!white}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/273,
2/28,
3/334,
4/294,
5/312,
6/265,
7/125,
8/100,
9/46,
10/352,
11/296,
12/169,
13/77,
14/133,
15/110,
16/131,
17/91,
18/178,
19/309,
20/22,
21/264,
22/319,
23/185,
24/355,
25/168,
26/354,
27/234,
28/192,
29/139,
30/228,
31/66,
32/358,
33/93,
34/208,
35/154,
36/114,
37/132,
38/85,
39/305,
40/280,
41/226,
42/172,
43/116,
44/349,
45/257,
46/313,
47/290,
48/311,
49/271,
50/129,
51/202,
52/84,
53/139,
54/5,
55/175,
56/348,
57/174,
58/54,
59/12,
60/319,
61/48,
62/246,
63/235,
64/100,
65/55,
66/280,
67/120,
68/300,
69/270,
70/248,
71/225,
72/203,
73/180,
74/158,
75/135,
76/113,
77/90,
78/68,
79/45,
80/23,
81/360,
82/270}
\node[anchor=\a] (P\i) at (p-\i) {\i};
%Vergrößerungen als \spy[rectangle, magnification=3, width=2cm, h eight=2cm, blue!70!black] on (p-18) in node at (2.5 cm,-2);
\spy[green] on (p-71) in node at (1.5,-2);
\spy[green] on (p-70) in node at (4,-2);
\spy[green] on (p-69) in node at (6.5,-2);
\spy[brown] on (p-12) in node at (9,-2);
\spy[violet,magnification=25] on (p-28) in node at (14,5);
\end{tikzpicture}
$
Von |P72-P58|=0.6886 ist es weit bis zur 1, doch noch sind bewegliche Winkel da. Diese werden allesamt für zusätzliche Abstandshalter aufgebraucht
82 Knoten, 1×Grad 1, 13×Grad 2, 67×Grad 3, 1×Grad 4, 0 Dreiecke,
116 Kanten, minimal 0.99999999999484823210, maximal 1.00000000000000133227
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=0.99999999999484823210
|P68-P64|=0.99999999999484823210
|P82-P21|=1.00000000000000532907
|P81-P24|=1.00000000000000555112
|P11-P65|=1.10000000000000008882
|P2-P9|=1.01200000000000467359
|P80-P27|=1.00000000000000444089
|P69-P6|=1.00000000000000000000
|P19-P12|=0.05799999999999969763
∠(P28-P22,P26-P22)=-0.04999999999997144923°
|P70-P12|=1.00000000000000066613
∠(P21-P23,P30-P23)=1.53999999999997405631°
|P71-P19|=0.99999999999999944489
∠(P23-P10,P15-P10)=1.30000000000070792261°
|P62-P15|=1.99899999999999233857
|P14-P4|=1.04199999999999604050
|P64-P24|=1.01460000000000172271
|P72-P58|=0.87002432376252680779
$
%Eingabe war:
%
%#1649 P81, P82, P6 fertig, achtzehnterWinkel, P70, P71 fertig, Start P72, Feinjustieren(14), 0.8, F(15), F(16), 0.85, 0.86, F(17), 0.87
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%P[1]=[142.9508242228893,58.095211353619476]; P[2]=[98.85951332256266,118.376133359885]; D=ab(1,2); A(2,1,Bew(1));
% M(3,1,2,blauerWinkel);
% M(4,3,1,gruenerWinkel);
% M(5,3,4,orangerWinkel);
% M(6,5,3,achtzehnterWinkel); N(7,2,4);
% N(8,4,6);
% M(9,8,4,vierterWinkel);
% N(10,9,7);
% M(11,5,6,fuenfterWinkel);
% M(12,11,5,sechsterWinkel);
% N(13,6,12);
% N(14,13,9);
% M(15,10,9,siebenterWinkel);
% N(16,15,14);
% N(17,12,16);
% M(18,11,12,achterWinkel);
% N(19,17,18);
% M(20,1,2,neunterWinkel);
% M(21,20,1,zehnterWinkel);
% M(22,20,21,elfterWinkel);
% N(23,2,21);
% M(24,22,20,zwölfterWinkel);
% N(25,24,21);
% M(26,22,24,dreizehnterWinkel);
% M(27,26,22,vierzehnterWinkel);
% N(28,27,24);
% M(29,28,24,fuenfzehnterWinkel);
% N(30,25,29);
% N(31,23,30);
% M(32,26,27,sechzehnterWinkel);
% A(18,32,ab(32,18,[1,32]));
% N(63,50,27);
% N(64,29,63);
% N(65,19,58);
% N(66,60,65);
% N(67,62,15);
% N(68,31,47);
% RA(66,67);
% RA(68,64);
%
%M(69,3,1,180*14/16);
%M(70,69,3,180*14/16);
%M(71,70,69,180*14/16);
%M(72,71,70,180*14/16);
%M(73,72,71,180*14/16);
%M(74,73,72,180*14/16);
%M(75,74,73,180*14/16);
%M(76,75,74,180*14/16);
%M(77,76,75,180*14/16);
%M(78,77,76,180*14/16);
%M(79,78,77,180*14/16);
%M(80,79,78,180*14/16);
%M(81,80,79,180*14/16);
%M(82,81,80,180*14/16);
%
%R(82,21); R(81,24); R(11,65,"brown",1.1*D); R(2,9,"brown",1.012*D); R(80,27); R(69,6); R(19,12,"brown",0.058*D); RW(26,22,28,22,-0.05); R(70,12); RW(30,23,21,23,1.54); R(71,19); RW(15,10,23,10,1.3); R(62,15,"brown",1.999*D); R(14,4,"brown",1.042*D); R(64,24,"brown",1.0146*D); R(72,58);
%
%
%Ende der Eingabe.
\usetikzlibrary{spy}
\tikzset{SpyStyle/.style={spy using outlines={rectangle, magnification=3, width=2cm, height=2cm, connect spies, blue!70!black}}}
\begin{tikzpicture}[SpyStyle,draw=grey,font=\sffamily\tiny]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/9.00/1.53,
2/7.816/3.142,
3/7.34/0.40,
4/6.190/2.040,
5/5.38316674897990399273/0.00000000000000000000,
6/5.13/1.98,
7/7.98/1.15,
8/5.76/0.09,
9/6.108/2.056,
10/7.789/3.140,
11/3.41880610234219384/0.37588196277698244,
12/3.594/2.368,
13/3.92/0.39,
14/4.13/2.38,
15/6.362/4.541,
16/6.13/2.55,
17/4.75/4.00,
18/1.74781730612259834/1.47487988948502990,
19/3.501/2.438,
20/10.0956424900056163/3.1986714679562072,
21/8.125/3.537,
22/10.4715244527825959/5.1630321145939178,
23/6.406/4.561,
24/8.509/5.550,
25/10.00/4.22,
26/10.0670658301741902/7.1217085101727564,
27/8.16/6.51,
28/10.16/6.69,
29/8.493/5.574,
30/8.099/3.613,
31/8.11/5.61,
32/8.72/8.60,
33/1.47/8.55,
34/2.656/6.936,
35/3.13/9.67,
36/4.281/8.039,
37/5.09/10.08,
38/5.34/8.09,
39/2.49/8.93,
40/4.71/9.99,
41/4.364/8.022,
42/2.683/6.939,
43/7.05/9.70,
44/6.878/7.710,
45/6.56/9.68,
46/6.34/7.70,
47/4.109/5.537,
48/4.34/7.52,
49/5.72/6.08,
50/6.971/7.640,
51/0.38/6.88,
52/2.347/6.541,
53/0.00/4.92,
54/4.065/5.518,
55/1.962/4.528,
56/0.47/5.86,
57/0.40/2.96,
58/2.31/3.57,
59/0.32/3.39,
60/1.979/4.504,
61/2.373/6.465,
62/2.36/4.46,
63/8.82/8.40,
64/7.26/7.15,
65/1.65/1.68,
66/3.21/2.93,
67/4.36/4.57,
68/6.11/5.51,
69/5.38316674897990399273/0.00000000000000000000,
70/3.41880610234219384/0.37588196277698155,
71/1.74781730612259945/1.47487988948503035,
72/0.62/3.13,
73/0.22/5.09,
74/0.60/7.05,
75/1.70/8.72,
76/3.35/9.85,
77/5.31/10.25,
78/7.27/9.88,
79/8.94/8.78,
80/10.0670658301742009/7.1217085101727466,
81/10.4715244527826048/5.1630321145939080,
82/10.0956424900056252/3.1986714679561974}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Punkte als \fill[red] (p-1) circle (1.125pt)
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-66) -- (p-67);
\draw[green,very thick] (p-68) -- (p-64);
\draw[green,very thick] (p-82) -- (p-21);
\draw[green,very thick] (p-81) -- (p-24);
\draw[brown,very thick] (p-11) -- (p-65);
\draw[brown,very thick] (p-2) -- (p-9);
\draw[green,very thick] (p-80) -- (p-27);
\draw[green,very thick] (p-69) -- (p-6);
\draw[brown,very thick] (p-19) -- (p-12);
\draw[violet,very thick] (p-26) -- (p-22);
\draw[green,very thick] (p-70) -- (p-12);
\draw[brown,very thick] (p-30) -- (p-23);
\draw[green,very thick] (p-71) -- (p-19);
\draw[violet,very thick] (p-15) -- (p-10);
\draw[brown,very thick] (p-62) -- (p-15);
\draw[brown,very thick] (p-14) -- (p-4);
\draw[brown,very thick] (p-64) -- (p-24);
\draw[green,very thick] (p-72) -- (p-58);
%Kanten als \draw[line width=0] (p-1) -- (p-2);
\foreach \i/\j in {
2/1,
3/1,
4/3,
5/3,
6/5,
7/2, 7/4,
8/4, 8/6,
9/8,
10/9, 10/7,
11/5,
12/11,
13/6, 13/12,
14/13, 14/9,
15/10,
16/15, 16/14,
17/12, 17/16,
18/11, 18/57,
19/17, 19/18,
20/1,
21/20,
22/20,
23/2, 23/21,
24/22,
25/24, 25/21,
26/22,
27/26,
28/27, 28/24,
29/28,
30/25, 30/29,
31/23, 31/30,
32/26, 32/43,
34/33,
35/33,
36/35,
37/35,
38/37,
39/34, 39/36,
40/36, 40/38,
41/40,
42/39, 42/41,
43/37,
44/43,
45/38, 45/44,
46/41, 46/45,
47/42,
48/46, 48/47,
49/44, 49/48,
50/49, 50/32,
51/33,
52/51,
53/51,
54/34, 54/52,
55/53,
56/52, 56/55,
57/53,
58/57,
59/55, 59/58,
60/59,
61/56, 61/60,
62/54, 62/61,
63/50, 63/27,
64/29, 64/63,
65/19, 65/58,
66/60, 66/65, 66/67,
67/62, 67/15,
68/31, 68/47, 68/64,
69/3,
70/69,
71/70,
72/71,
73/72,
74/73,
75/74,
76/75,
77/76,
78/77,
79/78,
80/79,
81/80,
82/81}
\draw[line width=0] (p-\i) -- (p-\j);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
1/126.18/214.17/red!0!lime!0!blue!100!white,
3/34.17/125.15/red!0!lime!100!blue!100!white,
3/125.15/191.67/red!61!lime!100!blue!100!white,
5/11.67/97.29/red!0!lime!31!blue!32!white,
8/77.61/80.02/red!100!lime!50!blue!50!white,
5/97.29/169.17/red!0!lime!50!blue!100!white,
11/349.17/444.99/red!0!lime!100!blue!100!white,
10/212.80/495.52/red!0!lime!43!blue!33!white,
11/84.99/146.67/red!100!lime!100!blue!50!white,
1/126.18/416.67/red!0!lime!50!blue!13!white,
20/236.67/530.25/red!50!lime!100!blue!18!white,
20/170.25/439.17/red!0!lime!100!blue!44!white,
22/259.17/528.85/red!0!lime!0!blue!18!white,
22/168.85/461.67/red!100!lime!87!blue!29!white,
26/281.67/557.89/red!78!lime!100!blue!53!white,
28/214.59/573.75/red!0!lime!52!blue!88!white,
26/197.89/492.20/red!0!lime!39!blue!48!white}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/274,
2/27,
3/341,
4/298,
5/316,
6/263,
7/307,
8/96,
9/38,
10/67,
11/298,
12/170,
13/78,
14/130,
15/44,
16/137,
17/97,
18/180,
19/309,
20/26,
21/267,
22/318,
23/183,
24/359,
25/351,
26/348,
27/40,
28/202,
29/263,
30/231,
31/63,
32/360,
33/94,
34/207,
35/161,
36/118,
37/136,
38/83,
39/127,
40/276,
41/218,
42/247,
43/118,
44/350,
45/258,
46/310,
47/224,
48/317,
49/277,
50/129,
51/206,
52/87,
53/138,
54/3,
55/179,
56/171,
57/168,
58/220,
59/22,
60/83,
61/51,
62/243,
63/229,
64/94,
65/49,
66/274,
67/120,
68/300,
69/273,
70/250,
71/228,
72/205,
73/183,
74/160,
75/138,
76/115,
77/93,
78/70,
79/48,
80/25,
81/3,
82/270}
\node[anchor=\a] (P\i) at (p-\i) {\i};
%Vergrößerungen als \spy[rectangle, magnification=3, width=2cm, h eight=2cm, blue!70!black] on (p-18) in node at (2.5 cm,-2);
\spy[green] on (p-72) in node at (1.5,-2);
\spy[violet] on (p-15) in node at (4.5,-2);
\spy[brown] on (p-4) in node at (7,-2);
\spy[brown] on (p-24) in node at (9.5,-2);
\end{tikzpicture}
$
so dass es mit Algorithmus (e) weitergehen muss: Die einstellbaren Abstandshalter variieren im Wechsel mit Button "Feinjustieren(17)", auch einzelne nicht mehr kritische Abstandshalter durch andere neu benötigte ersetzen, um P72-P58 doch noch auf 1 zu bringen. Schließlich ist auch das geschafft
82 Knoten, 1×Grad 1, 13×Grad 2, 67×Grad 3, 1×Grad 4, 0 Dreiecke,
116 Kanten, minimal 0.99999999999999866773, maximal 1.00000000012053358311
einzustellende Kanten, Abstände und Winkel:
|P66-P67|=1.00000000012052492337
|P68-P64|=1.00000000012053358311
|P82-P21|=1.00000000000000222045
|P81-P24|=1.00000000000000088818
|P2-P9|=1.01300000000000056666
|P80-P27|=1.00000000000000133227
|P69-P6|=1.00000000000000000000
|P19-P12|=0.05800000000000091194
∠(P28-P22,P26-P22)=-0.05000000000008594792°
|P70-P12|=1.00000000000000000000
∠(P21-P23,P30-P23)=1.53999999999999315214°
|P71-P19|=1.00000000000000000000
∠(P23-P10,P15-P10)=1.29999999999938475881°
∠(P3-P5,P8-P5)=1.34930000000005834160°
|P14-P4|=1.04200000000000092548
|P64-P24|=1.01459999999999972431
|P72-P58|=1.00000000000000266454
$
%Eingabe war:
%
%#1649 P81, P82, P6 fertig, achtzehnterWinkel, P70, P71 fertig, Start P72, Feinjustieren(14), 0.8, F(15), F(16), 0.85, 0.86, F(17), 0.87, 0.9, fertig 1.0
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%P[1]=[142.95082422288957,58.09521135361936]; P[2]=[98.85951332256289,118.37613335988488]; D=ab(1,2); A(2,1,Bew(1));
% M(3,1,2,blauerWinkel);
% M(4,3,1,gruenerWinkel);
% M(5,3,4,orangerWinkel);
% M(6,5,3,achtzehnterWinkel); N(7,2,4);
% N(8,4,6);
% M(9,8,4,vierterWinkel);
% N(10,9,7);
% M(11,5,6,fuenfterWinkel);
% M(12,11,5,sechsterWinkel);
% N(13,6,12);
% N(14,13,9);
% M(15,10,9,siebenterWinkel);
% N(16,15,14);
% N(17,12,16);
% M(18,11,12,achterWinkel);
% N(19,17,18);
% M(20,1,2,neunterWinkel);
% M(21,20,1,zehnterWinkel);
% M(22,20,21,elfterWinkel);
% N(23,2,21);
% M(24,22,20,zwölfterWinkel);
% N(25,24,21);
% M(26,22,24,dreizehnterWinkel);
% M(27,26,22,vierzehnterWinkel);
% N(28,27,24);
% M(29,28,24,fuenfzehnterWinkel);
% N(30,25,29);
% N(31,23,30);
% M(32,26,27,sechzehnterWinkel);
% A(18,32,ab(32,18,[1,32]));
% N(63,50,27);
% N(64,29,63);
% N(65,19,58);
% N(66,60,65);
% N(67,62,15);
% N(68,31,47);
% RA(66,67);
% RA(68,64);
%
%M(69,3,1,180*14/16);
%M(70,69,3,180*14/16);
%M(71,70,69,180*14/16);
%M(72,71,70,180*14/16);
%M(73,72,71,180*14/16);
%M(74,73,72,180*14/16);
%M(75,74,73,180*14/16);
%M(76,75,74,180*14/16);
%M(77,76,75,180*14/16);
%M(78,77,76,180*14/16);
%M(79,78,77,180*14/16);
%M(80,79,78,180*14/16);
%M(81,80,79,180*14/16);
%M(82,81,80,180*14/16);
%
%R(82,21); R(81,24);
%//R(11,65,"brown",1.28*D);
%R(2,9,"brown",1.013*D); R(80,27); R(69,6); R(19,12,"brown",0.058*D); RW(26,22,28,22,-0.05); R(70,12); RW(30,23,21,23,1.54); R(71,19); RW(15,10,23,10,1.3);
%//R(62,15,"brown",1.996*D);
%RW(8,5,3,5,1.3493);
%R(14,4,"brown",1.042*D); R(64,24,"brown",1.0146*D); R(72,58);
%
%
%Ende der Eingabe.
\usetikzlibrary{spy}
\tikzset{SpyStyle/.style={spy using outlines={rectangle, magnification=3, width=2cm, height=2cm, connect spies, blue!70!black}}}
\begin{tikzpicture}[SpyStyle,draw=grey,font=\sffamily\tiny]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/9.05/1.84,
2/7.872/3.450,
3/7.50/0.57,
4/6.352/2.210,
5/5.58579649150811530234/0.00000000000000000000,
6/5.30/1.98,
7/8.21/1.48,
8/6.24/0.21,
9/6.268/2.213,
10/7.843/3.445,
11/3.59619761365263235220/0.20370641923170615395,
12/3.591/2.204,
13/4.21/0.30,
14/4.27/2.30,
15/6.235/4.633,
16/6.24/2.63,
17/4.68/3.88,
18/1.83600300420091921971/1.15329313820851031558,
19/3.495/2.270,
20/10.0023890121321397/3.5961976136526324,
21/8.003/3.646,
22/10.2060954313638472/5.5857964915081144,
23/6.278/4.658,
24/8.209/5.691,
25/9.81/4.50,
26/9.6329090951257168/7.5019012443726112,
27/7.83/6.63,
28/9.82/6.88,
29/8.192/5.715,
30/7.967/3.727,
31/7.97/5.73,
32/8.3700924271629322/9.0528022931553398,
33/1.1532931382085170/8.3700924271629322,
34/2.334/6.756,
35/2.7041941869912427/9.6329090951257204,
36/3.854/7.996,
37/4.6202989398557364/10.2060954313638490,
38/4.90/8.23,
39/1.99/8.73,
40/3.97/9.99,
41/3.938/7.994,
42/2.363/6.761,
43/6.6098978177112198/10.0023890121321433,
44/6.615/8.002,
45/5.99/9.90,
46/5.94/7.90,
47/3.972/5.573,
48/3.96/7.57,
49/5.53/6.32,
50/6.711/7.936,
51/0.2037064192317130/6.6098978177112171,
52/2.203/6.560,
53/0.0000000000000046/4.6202989398557355,
54/3.929/5.549,
55/1.997/4.515,
56/0.39/5.71,
57/0.5731863362381354/2.7041941869912400,
58/2.37/3.58,
59/0.39/3.33,
60/2.014/4.491,
61/2.239/6.479,
62/2.24/4.48,
63/8.64/8.46,
64/7.00/7.32,
65/1.56/1.75,
66/3.21/2.89,
67/4.23/4.60,
68/5.97/5.60,
69/5.58579649150811530234/0.00000000000000000000,
70/3.59619761365263235220/0.20370641923170615395,
71/1.83600300420091921971/1.15329313820851031558,
72/0.5731863362381309/2.7041941869912365,
73/0.0000000000000000/4.6202989398557319,
74/0.2037064192317061/6.6098978177112144,
75/1.1532931382085103/8.3700924271629287,
76/2.7041941869912365/9.6329090951257186,
77/4.6202989398557310/10.2060954313638490,
78/6.6098978177112144/10.0023890121321450,
79/8.3700924271629287/9.0528022931553416,
80/9.6329090951257186/7.5019012443726156,
81/10.2060954313638490/5.5857964915081197,
82/10.0023890121321433/3.5961976136526368}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Punkte als \fill[red] (p-1) circle (1.125pt)
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
\draw[green,very thick] (p-66) -- (p-67);
\draw[green,very thick] (p-68) -- (p-64);
\draw[green,very thick] (p-82) -- (p-21);
\draw[green,very thick] (p-81) -- (p-24);
\draw[brown,very thick] (p-2) -- (p-9);
\draw[green,very thick] (p-80) -- (p-27);
\draw[green,very thick] (p-69) -- (p-6);
\draw[brown,very thick] (p-19) -- (p-12);
\draw[violet,very thick] (p-26) -- (p-22);
\draw[green,very thick] (p-70) -- (p-12);
\draw[violet,very thick] (p-30) -- (p-23);
\draw[green,very thick] (p-71) -- (p-19);
\draw[violet,very thick] (p-15) -- (p-10);
\draw[violet,very thick] (p-8) -- (p-5);
\draw[brown,very thick] (p-14) -- (p-4);
\draw[brown,very thick] (p-64) -- (p-24);
\draw[green,very thick] (p-72) -- (p-58);
%Kanten als \draw[line width=0] (p-1) -- (p-2);
\foreach \i/\j in {
2/1,
3/1,
4/3,
5/3,
6/5,
7/2, 7/4,
8/4, 8/6,
9/8,
10/9, 10/7,
11/5,
12/11,
13/6, 13/12,
14/13, 14/9,
15/10,
16/15, 16/14,
17/12, 17/16,
18/11, 18/57,
19/17, 19/18,
20/1,
21/20,
22/20,
23/2, 23/21,
24/22,
25/24, 25/21,
26/22,
27/26,
28/27, 28/24,
29/28,
30/25, 30/29,
31/23, 31/30,
32/26, 32/43,
34/33,
35/33,
36/35,
37/35,
38/37,
39/34, 39/36,
40/36, 40/38,
41/40,
42/39, 42/41,
43/37,
44/43,
45/38, 45/44,
46/41, 46/45,
47/42,
48/46, 48/47,
49/44, 49/48,
50/49, 50/32,
51/33,
52/51,
53/51,
54/34, 54/52,
55/53,
56/52, 56/55,
57/53,
58/57,
59/55, 59/58,
60/59,
61/56, 61/60,
62/54, 62/61,
63/50, 63/27,
64/29, 64/63,
65/19, 65/58,
66/60, 66/65, 66/67,
67/62, 67/15,
68/31, 68/47, 68/64,
69/3,
70/69,
71/70,
72/71,
73/72,
74/73,
75/74,
76/75,
77/76,
78/77,
79/78,
80/79,
81/80,
82/81}
\draw[line width=0] (p-\i) -- (p-\j);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
\foreach \i/\a/\b/\c in {
1/126.18/219.15/red!0!lime!0!blue!100!white,
3/39.15/125.09/red!0!lime!100!blue!100!white,
3/125.09/196.65/red!61!lime!100!blue!100!white,
5/16.65/98.10/red!0!lime!31!blue!32!white,
8/86.80/89.21/red!100!lime!50!blue!50!white,
5/98.10/174.15/red!0!lime!50!blue!100!white,
11/354.15/450.15/red!0!lime!100!blue!100!white,
10/218.04/503.54/red!0!lime!43!blue!33!white,
11/90.15/151.65/red!100!lime!100!blue!50!white,
1/126.18/421.65/red!0!lime!50!blue!13!white,
20/241.65/538.57/red!50!lime!100!blue!18!white,
20/178.57/444.15/red!0!lime!100!blue!44!white,
22/264.15/536.98/red!0!lime!0!blue!18!white,
22/176.98/466.65/red!100!lime!87!blue!29!white,
26/286.65/565.90/red!78!lime!100!blue!53!white,
28/216.43/575.59/red!0!lime!52!blue!88!white,
26/205.90/489.15/red!0!lime!39!blue!48!white}
\draw[\c] (p-\i) +(\a:0.4 cm) arc (\a:\b:0.4 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\foreach \i/\a in {
1/276,
2/34,
3/343,
4/305,
5/319,
6/270,
7/312,
8/105,
9/46,
10/72,
11/303,
12/175,
13/85,
14/135,
15/48,
16/142,
17/102,
18/185,
19/307,
20/33,
21/270,
22/324,
23/183,
24/2,
25/355,
26/350,
27/39,
28/204,
29/264,
30/236,
31/64,
32/5,
33/96,
34/214,
35/163,
36/125,
37/139,
38/90,
39/132,
40/285,
41/226,
42/252,
43/123,
44/355,
45/265,
46/315,
47/228,
48/322,
49/282,
50/127,
51/213,
52/90,
53/144,
54/3,
55/182,
56/175,
57/170,
58/219,
59/24,
60/84,
61/56,
62/244,
63/223,
64/95,
65/43,
66/275,
67/34,
68/214,
69/278,
70/255,
71/233,
72/210,
73/188,
74/165,
75/143,
76/120,
77/98,
78/75,
79/53,
80/30,
81/8,
82/270}
\node[anchor=\a] (P\i) at (p-\i) {\i};
%Vergrößerungen als \spy[rectangle, magnification=3, width=2cm, h eight=2cm, blue!70!black] on (p-18) in node at (2.5 cm,-2);
\spy[green] on (p-72) in node at (2.5,-2);
\end{tikzpicture}
$
und, die Mühe ist es wert, die sehr kleinen Abstände noch etwas größer machen, dass man auch ohne \spy-Lupe die Lücken erkennen kann.
$
%Eingabe war:
%
%#1649 P81, P82, P6 fertig, achtzehnterWinkel, P70, P71 fertig, Start P72, Feinjustieren(14), 0.8, F(15), F(16), 0.85, 0.86, F(17), 0.87, 0.9, fertig 1.0, 3x verbessert
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%
%P[1]=[142.95082422289,58.095211353618694]; P[2]=[98.85951332256333,118.37613335988418]; D=ab(1,2); A(2,1,Bew(1));
% M(3,1,2,blauerWinkel);
% M(4,3,1,gruenerWinkel);
% M(5,3,4,orangerWinkel);
% M(6,5,3,achtzehnterWinkel); N(7,2,4);
% N(8,4,6);
% M(9,8,4,vierterWinkel);
% N(10,9,7);
% M(11,5,6,fuenfterWinkel);
% M(12,11,5,sechsterWinkel);
% N(13,6,12);
% N(14,13,9);
% M(15,10,9,siebenterWinkel);
% N(16,15,14);
% N(17,12,16);
% M(18,11,12,achterWinkel);
% N(19,17,18);
% M(20,1,2,neunterWinkel);
% M(21,20,1,zehnterWinkel);
% M(22,20,21,elfterWinkel);
% N(23,2,21);
% M(24,22,20,zwölfterWinkel);
% N(25,24,21);
% M(26,22,24,dreizehnterWinkel);
% M(27,26,22,vierzehnterWinkel);
% N(28,27,24);
% M(29,28,24,fuenfzehnterWinkel);
% N(30,25,29);
% N(31,23,30);
% M(32,26,27,sechzehnterWinkel);
% A(18,32,ab(32,18,[1,32]));
% N(63,50,27);
% N(64,29,63);
% N(65,19,58);
% N(66,60,65);
% N(67,62,15);
% N(68,31,47);
% RA(66,67);
% RA(68,64);
%
%M(69,3,1,180*14/16);
%M(70,69,3,180*14/16);
%M(71,70,69,180*14/16);
%M(72,71,70,180*14/16);
%M(73,72,71,180*14/16);
%M(74,73,72,180*14/16);
%M(75,74,73,180*14/16);
%M(76,75,74,180*14/16);
%M(77,76,75,180*14/16);
%M(78,77,76,180*14/16);
%M(79,78,77,180*14/16);
%M(80,79,78,180*14/16);
%M(81,80,79,180*14/16);
%M(82,81,80,180*14/16);
%
%R(82,21); R(81,24);
%//R(11,65,"brown",1.28*D);
%R(2,9,"brown",1.052*D); R(80,27); R(69,6); R(19,12,"brown",0.13*D); RW(22,26,28,26,1.74); R(70,12);
%//RW(30,23,21,23,1.57);
%R(31,21,"brown",1.033*D);
%R(71,19);
%//RW(15,10,23,10,2);
%R(67,23,"brown",1.044*D);
%//R(62,15,"brown",1.996*D);
%RW(5,3,8,3,3.4);
%R(14,4,"brown",1.08*D);
%//R(64,24,"brown",1.18*D);
%R(68,29,"brown",1.035*D);
%R(72,58); RW(20,22,25,22); RW(11,5,13,5);
%
%
%
%Ende der Eingabe.
\begin{tikzpicture}[draw=grey,font=\sffamily\scriptsize]
%Koordinaten als \coordinate (p-1) at (0,0);
\foreach \i/\x/\y in {
1/9.21331362517474516949/2.05545901510064821238,
2/8.03258458935046348870/3.66973251855706772417,
3/7.74695415848257518121/0.69538919540672738950,
4/6.58025805117642903497/2.31983377531602208421,
5/5.87173847304487495080/0.00000000000000000000,
6/5.31961674296691189312/1.92228031129066034843,
7/8.48897331002398125577/1.72250132128182165125,
8/6.51765874577407267054/0.32081368363031220747,
9/6.41989190882915750080/2.31842266578717737247,
10/7.92091830380466355166/3.64013358788279095535,
11/3.87315115809701637772/0.07515813016238558075,
12/3.79209201063527867603/2.07351480868921411727,
13/4.37389180334268257155/0.16000781857770038363,
14/4.42623013789563923837/2.15932287597516392452,
15/6.18919823259064827425/4.64070622140547772716,
16/6.36548638494435792268/2.64849074928914163252,
17/4.75085380505021515063/3.82872870493384231949,
18/2.05545901510068240725/0.90942144188680595907,
19/3.57249827712066858609/2.21272182072886591797,
20/10.04757693689917097402/3.87315115809697907423,
21/8.05420862471343212974/3.71041587620095514310,
22/10.12273506706154790891/5.87173847304483853549,
23/6.27748022863049470743/4.62869481342675914703,
24/8.25302451816980209287/5.16168040262881966385,
25/9.99746317716408228193/4.18345048844389655329,
26/9.42734587165478288284/7.74695415848252366686,
27/7.93829945298633798956/6.41176100277407723382,
28/9.93166233013421795306/6.24895916000584250583,
29/7.98864030947390535431/5.77497031284894912773,
30/8.03948676053332356162/3.77561675771802551793,
31/7.91850369700538525564/5.77195417868157445440,
32/8.06727605196086372530/9.21331362517469720785,
33/0.90942144188679829853/8.06727605196085306716,
34/2.09015047771108353203/6.45300254850443444354,
35/2.37578090857896784271/9.42734587165477577742,
36/3.54247701588511665349/7.80290129174548052760,
37/4.25099659401667029357/10.12273506706150349999,
38/4.80311832409463423943/8.20045475577084204133,
39/1.63376175703756643109/8.40023374577967985033,
40/3.60507632128747523836/9.80192138343119090393,
41/3.70284315823238907583/7.80431240127432612752,
42/2.20181676325688258089/6.48260147917871254464,
43/6.24958390896453330754/10.04757693689911590695,
44/6.33064305642626656834/8.04922025837228893863,
45/5.74884326371886444917/9.96272724848380342166,
46/5.69650492916590778236/7.96341219108633868728,
47/3.93353683447089874647/5.48202884565602577283,
48/3.75724868211718865396/7.47424431777236009111,
49/5.37188126201133187010/6.29400636212766073641,
50/6.55023678994087799055/7.91001324633263891428,
51/0.07515813016237635202/6.24958390896452353758,
52/2.06852644234811444690/6.41231919086054702461,
53/0.00000000000000000000/4.25099659401666585268,
54/3.84525483843105009285/5.49404025363474346477,
55/1.86971054889174537195/4.96105466443268383614,
56/0.12527188989746559922/5.93928457861760694669,
57/0.69538919540676447095/2.37578090857897894494,
58/2.18443561407520814299/3.71097406428742493389,
59/0.19107273692732990034/3.87377590705566010598,
60/2.13409475758764122233/4.34776475421255526044,
61/2.08324830652822345911/6.34711830934347798205,
62/2.20423137005615998874/4.35078088837992815741,
63/8.50573316838143433927/8.32957720320437999817,
64/6.76022412175227938036/7.35325852155592318837,
65/1.61700189868011356964/1.79315786385712305773,
66/3.36251094530926630810/2.76947654550558119979,
67/4.18983255569602164314/4.59033867177586785147,
68/5.93290251136552537758/5.53239639528562587856,
69/5.87173847304487495080/0.00000000000000000000,
70/3.87315115809701637772/0.07515813016238739874,
71/2.05545901510068462770/0.90942144188681162120,
72/0.69538919540676447095/2.37578090857898205357,
73/0.00000000000003805550/4.25099659401668361625,
74/0.07515813016242582634/6.24958390896454307750,
75/0.90942144188685081208/8.06727605196087438344,
76/2.37578090857902202160/9.42734587165479531734,
77/4.25099659401672269610/10.12273506706151948720,
78/6.24958390896458215735/10.04757693689913189417,
79/8.06727605196091168693/9.21331362517470431328,
80/9.42734587165483262083/7.74695415848253254865,
81/10.12273506706155856705/5.87173847304483143006,
82/10.04757693689916919766/3.87315115809697285698}
\coordinate (p-\i) at (\x,\y);
%Dreiecke als \fill[black!3] (p-1) -- (p-2) -- (p-3) -- cycle;
%gefüllte Winkel als \fill[red!20] (p-1) -- +(0:0.3 cm) arc (0:60:0.3 cm) -- cycle;
%Punkte als \fill[red] (p-1) circle (1.125pt)
%Kanten als \draw[line width=0] (p-1) -- (p-2);
\foreach \i/\j in {
2/1,
3/1,
4/3,
5/3,
6/5,
7/2, 7/4,
8/4, 8/6,
9/8,
10/9, 10/7,
11/5,
12/11,
13/6, 13/12,
14/13, 14/9,
15/10,
16/15, 16/14,
17/12, 17/16,
18/11, 18/57,
19/17, 19/18,
20/1,
21/20,
22/20,
23/2, 23/21,
24/22,
25/24, 25/21,
26/22,
27/26,
28/27, 28/24,
29/28,
30/25, 30/29,
31/23, 31/30,
32/26, 32/43,
34/33,
35/33,
36/35,
37/35,
38/37,
39/34, 39/36,
40/36, 40/38,
41/40,
42/39, 42/41,
43/37,
44/43,
45/38, 45/44,
46/41, 46/45,
47/42,
48/46, 48/47,
49/44, 49/48,
50/49, 50/32,
51/33,
52/51,
53/51,
54/34, 54/52,
55/53,
56/52, 56/55,
57/53,
58/57,
59/55, 59/58,
60/59,
61/56, 61/60,
62/54, 62/61,
63/50, 63/27,
64/29, 64/63,
65/19, 65/58,
66/60, 66/65, 66/67,
67/62, 67/15,
68/31, 68/47, 68/64,
69/3,
70/69,
71/70,
72/71,
73/72,
74/73,
75/74,
76/75,
77/76,
78/77,
79/78,
80/79,
81/80,
82/81}
\draw[line width=0] (p-\i) -- (p-\j);
%einzustellende Kanten als \draw[green] (p-1) -- (p-2);
%nicht passende Kanten als \draw[magenta,ultra thick,dash pattern=on 0.01cm off 0.09cm] (p-1) -- (p-2);
%Winkel als \draw[->,red] (p-1) +(0:0.3 cm) arc (0:60:0.3 cm);
%Punktnummern als \node[anchor=30] (P1) at (p-1) {1};
\end{tikzpicture}
$
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9107
| Beitrag No.1678, vom Themenstarter, eingetragen 2019-02-02
|
Toll gemacht, Stefan! Du bist ein wahrer Schönheitschirurg für Streichholzgraphen. ;-)
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4352
| Beitrag No.1679, eingetragen 2019-02-02
|
sehr gut, den letzten schritt verstehe ich noch nicht, blieb im inneren immer noch beweglichkeit über, nachdem das ausseneck gleichmässig gezogen wurde?, beweglichkeit mit der die kleinen abstände noch justiert werden konnten?
haribo
|
Profil
|
|
Home / Seite ohne Frame
Wie unterstütze ich den Matheplaneten mit Geld?
