| |
| Autor |
 Streichholzgraphen 4-regulär und 4/n-regulär (n>4) und 2/5 |
|
Slash
Aktiv 
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
 |  Beitrag No.800, vom Themenstarter, eingetragen 2017-03-12
|
Ja, die 2/4 mit 70 und 98 sind gut. In #771 hatte ich auch noch Teilgraphen mit 78 und 82.
\quoteon(2017-03-12 07:30 - haribo in Beitrag No. 798)
ganz so einfach gehts noch nicht, man kann nicht endlos den 80iger erweitern, da reichen dann bald nicht mehr zwei der anderen als spannweite aus
\quoteoff
Doch, der 80er lässt sich genau wie in #797 beschrieben erweitern. Die beiden unteren Graphen sind ja die Erweiterung mit 86 und 92. Jetzt müssen nur noch endlos die beiden roten Dreiecke (6 Kanten) dazwischen gesetzt werden. Man kann es auch als endlose Erweiterung des 86er sehen. Davon je zwei und "nur einer" der anderen Teilgraphen wird dazwischen gesetzt. Hier ein Beispiel mit einem 42er dazwischen:
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_mit_80_6_Erweiterung_-_Slash.png
Das sind dann alles starre Graphen aus drei starren Teilgraphen mit einer Symmetrieachse (Spiegelsymmetrie).
Diese mittleren gespiegelten drei Dreiecke wie beim 60er, also 18 Kanten, finden bestimmt auch noch anderswo Verwendung. Eventuell bei dem 98er aus #798. Der wäre aber auch schon durch den 80+6 abgedeckt.
Zusammenfassung:
(2, 4)-regulären Teilgraphen mit nur zwei 2er-Knoten:
42, 58, 60, 68, 70, 78, 80, 82, 86 und 86+6
Findet jemand noch einen solchen mit 76 oder 88 Kanten?
|
 Profil
|
haribo
Senior 
Dabei seit: 25.10.2012
Mitteilungen: 4495
 | Beitrag No.801, eingetragen 2017-03-12
|
58+92+98=248
Damit haben wirs wohl!
Als doppelnder 4/2 hab ich noch 66 im Angebot
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_stdoppelender66.png
Haribo
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.802, vom Themenstarter, eingetragen 2017-03-12
|
\quoteon(2017-03-12 16:43 - haribo in Beitrag No. 801)
58+92+98=248
Damit haben wirs wohl!
\quoteoff
Lieder nein, denn hier kann nur ein Teilgraph, der 92er, erweitert werden. Da es drei verschiedene Teilgraphen sind, bleibt es (nur) bei einem einzelnen 248er. Wir brauchen dazu einen mit 76 oder 88.
Aber mit dem Harborth-Graphen und dem 132er sind die 248+12 ja bereits abgedeckt.
EDIT: Hier ist ein 2/4 mit 76. Aus dem 58 gezaubert.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_mit_76.png
So, damit also alle 4/4 mit mehr als 236 Kanten aus nur 6 Graphentypen.
Zusammenfassung der (2, 4)-regulären Teilgraphen mit nur zwei 2er-Knoten:
42, 58, 60, 66, 68, 70, 76, 78, 80, 82, 86 und 86+6
Mit je 2 oder 3 dieser Teilgraphen lassen sich auch alle Kantenzahlen von 166 bis 236 erzeugen. Sowie 126, 132, 136, 140, 142, 144, 152, 154, 158, 160, 162. Somit fehlen allein schon mit dieser Methode nur 10 Graphen von 126 bis 166 um alle > 126 zu konstruieren.
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4288
Wohnort: Raun
| Beitrag No.803, eingetragen 2017-03-12
|
\quoteon(2017-03-11 13:11 - Slash in Beitrag No. 787)
Danke Stefan, das mir der falschen Beweglichkeit des Beispielgraphen mit dem Dreieck in der Mitte ist mir auch aufgefallen, da man sie noch gut erkennen kann. Ist mit der dargestellen Beweglichkeit in den drei Videos alles in Ordnung oder haben sich da auch Fehler eingeschlichen? Beim 11-Kern habe ich nur eine Kantenänderung ausmachen können. Beim (2, 4)-regulären gibt es ab 1:40 eine Bewegung, die leicht komisch aussieht.
\quoteoff
Dann nenne ich das ab jetzt auch falsche Beweglichkeit, und passend dazu, wenn beim Runden der Koordinaten Beweglichkeit verlorengeht, versteckte Beweglichkeit.
Beim ersten Video stimmt die Bezeichnung nicht, das ist der frühere 4/11 mit 817 Kanten. Ansonsten ist das ok, erst mit der Kommentierung kann man erkennen, worauf es da ankommt. Nachfolgend noch die zweite Kantenänderung. Sie spielt sich zwischen den beiden Kernen ab. Die erste SVG-Animation zeigt, wie sich die Kanten P69-P77 und P11-P178 ändern, wenn der blaue Winkel leicht variiert, die zweite abhängig vom grünen Winkel. Beide Animationen sind daran unterscheidbar, dass beim blauen Winkel beide Kanten gleichzeitig kürzer oder länger werden und beim grünen Winkel wird immer eine Kante kürzer und die andere länger.
\geo
ebene(749.67,547.71)
x(5.01,23.75)
y(9.14,22.83)
form(.)
#//Eingabe war:
#
#No.313, beide Kerne, damit man beide einzustellenden Kanten sieht
#
#
#
#
#P[1]=[0,200]; P[2]=[40,200]; D=ab(1,2); A(2,1);
#M(3,1,2,gruenerWinkel); N(4,3,2); L(5,3,4);
#M(6,1,3,blauerWinkel); N(7,6,3); N(8,7,5); L(9,8,5); L(10,8,9); L(11,10,9); L(12,6,7);
#Q(13,12,10,2*D,D); A(13,12); H(14,12,13,2); A(12,14); A(14,13); L(15,12,14); L(16,14,13); A(15,16); L(17,16,13); N(18,6,15); N(19,1,18); L(20,19,18);
#Q(21,20,17,2*D,2*D); A(20,21); H(22,20,21,2); A(20,22); A(22,21); L(23,20,22); L(24,22,21); A(23,24); N(25,19,23); N(26,1,25); L(27,26,25);
#Q(28,27,24,2*D,D); A(27,28); H(29,27,28,2); A(27,29); A(29,28); L(30,27,29); L(31,29,28); A(30,31); L(32,31,28); N(33,26,30); N(34,1,33); L(35,34,33);
#Q(36,35,32,2*D,2*D); A(35,36); H(37,35,36,2); A(35,37); A(37,36); L(38,35,37); L(39,37,36); A(38,39); N(40,34,38); N(41,1,40); L(42,41,40);
#Q(43,42,39,2*D,D); A(42,43); H(44,42,43,2); A(42,44); A(44,43); L(45,42,44); L(46,44,43); A(45,46); L(47,46,43); N(48,41,45); N(49,1,48); L(50,49,48);
#Q(51,50,47,2*D,2*D); A(50,51); H(52,50,51,2); A(50,52); A(52,51); L(53,50,52); L(54,52,51); A(53,54); N(55,49,53); N(56,1,55); L(57,56,55);
#Q(58,57,54,2*D,D); A(57,58); H(59,57,58,2); A(57,59); A(59,58); L(60,57,59); L(61,59,58); A(60,61); L(62,61,58); N(63,56,60); N(64,1,63); L(65,64,63);
#Q(66,65,62,2*D,2*D); A(65,66); H(67,65,66,2); A(65,67); A(67,66); L(68,65,67); L(69,67,66); A(68,69); N(70,64,68); N(71,1,70); L(72,71,70); N(73,2,71); N(74,73,72); L(75,74,72); L(76,74,75); L(77,76,75); L(78,76,77); L(79,2,73); N(80,4,79); L(81,80,79); L(82,80,81); L(83,82,81); L(84,82,83);
#
#A(17,21); A(17,21,ab(15,17,[13,17])); L(88,85,86);
#A(32,36); A(32,36,ab(17,21,[85,88]));
#A(47,51); A(47,51,ab(17,21,[85,88]));
#A(62,66); A(62,66,ab(17,21,[85,88]));
#A(69,77); R(69,77);
#
#A(84,83,ab(83,84,[1,100])); A(11,178); R(11,178); R(18,25);
#
#
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(10,15,P1)
p(11,15,P2)
p(10.839786815861622,15.542916295486696,P3)
p(11.839786815861622,15.542916295486696,P4)
p(11.339786815861622,16.408941699271136,P5)
p(10.300989112284938,15.953627576303205,P6)
p(11.14077592814656,16.496543871789903,P7)
p(11.640775928146562,17.362569275574337,P8)
p(12.31614707883205,16.62509126992145,P9)
p(12.617136191116987,17.578718846224657,P10)
p(13.292507341802477,16.84124084057177,P11)
p(10.250703216195731,16.95236244034596,P12)
p(11.823767831844744,18.187460701616303,P13)
p(11.037235524020238,17.569911570981134,P14)
p(10.109156134892931,17.942293965136773,P15)
p(10.895688442717438,18.559843095771946,P16)
p(11.682220750541946,19.177392226407115,P17)
p(10.159442030982134,16.943559101094014,P18)
p(9.858452918697196,15.98993152479081,P19)
p(9.183081768011707,16.727409530443694,P20)
p(9.754660982771473,18.64399430583314,P21)
p(9.46887137539159,17.685701918138417,P22)
p(8.496071019704774,17.454056784419613,P23)
p(8.781860627084654,18.41234917211434,P24)
p(9.17144217039018,16.716578778766653,P25)
p(9.312989251692983,15.726647253975843,P26)
p(8.384909862565676,16.099029648131477,P27)
p(7.858464843127434,18.028499948889866,P28)
p(8.121687352846555,17.06376479851067,P29)
p(7.4178134595539325,16.35343984305642,P30)
p(7.154590949834811,17.318174993435616,P31)
p(6.891368440115691,18.28291014381481,P32)
p(8.34589284868124,15.981057448900785,P33)
p(9.032903596988255,15.25441019492494,P34)
p(8.060103241301464,15.02276506120603,P35)
p(6.533748284228165,16.315142925848473,P36)
p(7.296925762764815,15.668953993527252,P37)
p(7.1188984709986185,14.68492844335775,P38)
p(6.355720992461968,15.331117375678971,P39)
p(8.09169882668541,14.916573577076655,P40)
p(9.058795229697155,14.662163382151714,P41)
p(8.354921336404534,13.951838426697462,P42)
p(6.391336394336287,14.331751805354813,P43)
p(7.37312886537041,14.141795116026136,P44)
p(7.699517782310052,13.19655955020195,P45)
p(6.717725311275927,13.386516239530627,P46)
p(5.735932840241804,13.576472928859301,P47)
p(8.403391675602679,13.906884505656198,P48)
p(9.344596445905525,14.244721123504483,P49)
p(9.166569154139331,13.26069557333498,P50)
p(7.358103138246953,12.406616730743533,P51)
p(8.262336146193142,12.833656152039255,P52)
p(9.08427963742574,12.2640871068653,P53)
p(8.18004662947955,11.837047685569578,P54)
p(9.262306929191933,13.248112657034806,P55)
p(9.917710483286408,14.003391533530323,P56)
p(10.244099400226057,13.058155967706139,P57)
p(9.090826099597214,11.424154531336926,P58)
p(9.667462749911635,12.241155249521533,P59)
p(10.663324451926847,12.150273620688383,P60)
p(10.086687801612426,11.333272902503776,P61)
p(9.510051151298004,10.516272184319169,P62)
p(10.336935534987195,13.095509186512565,P63)
p(10.419225051700788,14.092117652982243,P64)
p(11.241168542933384,13.522548607808288,P65)
p(11.238462003456256,11.52255043914811,P66)
p(11.23981527319482,12.5225495234782,P67)
p(12.106516518855136,13.021377099671474,P68)
p(12.105163249116572,12.021378015341387,P69)
p(11.284573027622542,13.590946144845436,P70)
p(10.865347975921756,14.498828491863193,P71)
p(11.861209677936966,14.407946863030041,P72)
p(11.865347975921756,14.498828491863193,P73)
p(12.861209677936966,14.407946863030041,P74)
p(12.361209677936966,13.541921459245604,P75)
p(13.361209677936966,13.541921459245604,P76)
p(12.861209677936966,12.675896055461164,P77)
p(13.861209677936966,12.675896055461164,P78)
p(11.866701245660312,15.498827576193282,P79)
p(12.706488061521934,16.041743871679977,P80)
p(12.75677395761114,15.043009007637218,P81)
p(13.596560773472763,15.585925303123915,P82)
p(13.646846669561969,14.587190439081157,P83)
p(14.486633485423592,15.130106734567853,P84)
p(10.005582849942662,19.612001649077666,P85)
p(10.969362733827898,19.87870060936465,P86)
p(10.718440866656707,18.910693266120127,P87)
p(10.256504717113854,20.58000899232219,P88)
p(5.771085123453507,16.96193880029203,P89)
p(5.94989520139727,17.945822409275202,P90)
p(6.712558362171928,17.29902653483164,P91)
p(5.008421962678851,17.60873467473559,P92)
p(6.445997970574197,11.996660436603959,P93)
p(5.634912821571623,12.581588535661842,P94)
p(6.547017989244379,12.991544829801416,P95)
p(5.533892802901443,11.586704142464384,P96)
p(11.24209055639556,10.522557022367998,P97)
p(10.377885130316436,10.019417894953527,P98)
p(10.374256577377132,11.019411311733641,P99)
p(11.245719109334864,9.522563605587886,P100)
p(18.13348015498556,14.71729717364901,P101)
p(17.133480154985563,14.717297173649008,P102)
p(17.29369333912394,14.174380878162314,P103)
p(16.29369333912394,14.174380878162312,P104)
p(16.79369333912394,13.308355474377873,P105)
p(17.832491042700624,13.763669597345803,P106)
p(16.992704226839003,13.220753301859105,P107)
p(16.492704226839003,12.354727898074671,P108)
p(15.817333076153512,13.092205903727557,P109)
p(15.516343963868573,12.138578327424355,P110)
p(14.840972813183082,12.876056333077237,P111)
p(17.882776938789828,12.764934733303045,P112)
p(16.309712323140815,11.529836472032706,P113)
p(17.096244630965323,12.147385602667875,P114)
p(18.024324020092628,11.775003208512237,P115)
p(17.23779171226812,11.157454077877063,P116)
p(16.451259404443615,10.539904947241896,P117)
p(17.974038124003425,12.773738072554995,P118)
p(18.275027236288363,13.727365648858196,P119)
p(18.950398386973852,12.98988764320531,P120)
p(18.378819172214087,11.073302867815865,P121)
p(18.66460877959397,12.031595255510588,P122)
p(19.637409135280784,12.263240389229395,P123)
p(19.351619527900905,11.304948001534669,P124)
p(18.962037984595376,13.000718394882352,P125)
p(18.820490903292576,13.990649919673164,P126)
p(19.748570292419885,13.61826752551753,P127)
p(20.275015311858123,11.688797224759142,P128)
p(20.011792802139006,12.653532375138333,P129)
p(20.71566669543163,13.36385733059259,P130)
p(20.97888920515075,12.399122180213391,P131)
p(21.242111714869864,11.434387029834198,P132)
p(19.787587306304317,13.736239724748224,P133)
p(19.100576557997307,14.462886978724065,P134)
p(20.073376913684097,14.694532112442975,P135)
p(21.59973187075739,13.402154247800532,P136)
p(20.836554392220748,14.048343180121758,P137)
p(21.01458168398694,15.032368730291262,P138)
p(21.777759162523598,14.386179797970037,P139)
p(20.04178132830015,14.800723596572354,P140)
p(19.074684925288405,15.055133791497294,P141)
p(19.778558818581025,15.765458746951545,P142)
p(21.742143760649274,15.385545368294197,P143)
p(20.76035128961515,15.57550205762287,P144)
p(20.43396237267551,16.520737623447054,P145)
p(21.415754843709635,16.33078093411838,P146)
p(22.397547314743758,16.140824244789705,P147)
p(19.73008847938288,15.81041266799281,P148)
p(18.78888370908004,15.472576050144522,P149)
p(18.966911000846228,16.456601600314034,P150)
p(20.77537701673861,17.310680442905472,P151)
p(19.871144008792417,16.88364102160975,P152)
p(19.049200517559818,17.45321006678371,P153)
p(19.95343352550601,17.88024948807943,P154)
p(18.87117322579363,16.469184516614202,P155)
p(18.215769671699153,15.713905640118687,P156)
p(17.889380754759504,16.659141205942873,P157)
p(19.042654055388354,18.29314264231207,P158)
p(18.466017405073913,17.476141924127496,P159)
p(17.47015570305872,17.56702355296062,P160)
p(18.046792353373135,18.384024271145233,P161)
p(18.623429003687562,19.20102498932983,P162)
p(17.796544619998365,16.621787987136447,P163)
p(17.71425510328477,15.625179520666768,P164)
p(16.89231161205218,16.19474856584072,P165)
p(16.895018151529307,18.194746734500896,P166)
p(16.893664881790745,17.194747650170804,P167)
p(16.026963636130425,16.695920073977533,P168)
p(16.02831690586899,17.695919158307625,P169)
p(16.848907127363017,16.126351028803576,P170)
p(17.268132179063805,15.218468681785815,P171)
p(16.272270477048593,15.309350310618967,P172)
p(16.268132179063805,15.218468681785815,P173)
p(15.272270477048595,15.309350310618967,P174)
p(15.772270477048597,16.1753757144034,P175)
p(14.772270477048597,16.17537571440341,P176)
p(15.272270477048599,17.041401118187842,P177)
p(14.272270477048595,17.041401118187842,P178)
p(16.26677890932525,14.218469597455728,P179)
p(15.426992093463626,13.675553301969034,P180)
p(15.376706197374421,14.67428816601179,P181)
p(14.536919381512798,14.131371870525093,P182)
p(18.127897305042897,10.105295524571343,P183)
p(17.16411742115766,9.838596564284359,P184)
p(17.415039288328853,10.806603907528878,P185)
p(17.876975437871703,9.13728818132682,P186)
p(22.362395031532053,12.755358373356973,P187)
p(22.183584953588287,11.771474764373803,P188)
p(21.420921792813633,12.418270638817363,P189)
p(23.125058192306707,12.108562498913415,P190)
p(21.687482184411362,17.720636737045055,P191)
p(22.498567333413938,17.135708637987168,P192)
p(21.586462165741175,16.725752343847596,P193)
p(22.59958735208412,18.13059303118462,P194)
p(16.89138959859,19.19474015128101,P195)
p(17.755595024669127,19.69787927869548,P196)
p(17.75922357760843,18.69788586191537,P197)
p(16.8877610456507,20.194733568061125,P198)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4) s(P2,P4)
s(P3,P5) s(P4,P5)
s(P1,P6)
s(P6,P7) s(P3,P7)
s(P7,P8) s(P5,P8)
s(P8,P9) s(P5,P9)
s(P8,P10) s(P9,P10)
s(P10,P11) s(P9,P11) s(P178,P11)
s(P6,P12) s(P7,P12) s(P14,P12)
s(P10,P13)
s(P13,P14)
s(P12,P15) s(P14,P15) s(P16,P15)
s(P14,P16) s(P13,P16)
s(P16,P17) s(P13,P17) s(P86,P17) s(P87,P17)
s(P6,P18) s(P15,P18)
s(P1,P19) s(P18,P19)
s(P19,P20) s(P18,P20) s(P22,P20)
s(P85,P21) s(P87,P21)
s(P21,P22)
s(P20,P23) s(P22,P23) s(P24,P23)
s(P22,P24) s(P21,P24)
s(P19,P25) s(P23,P25)
s(P1,P26) s(P25,P26)
s(P26,P27) s(P25,P27) s(P29,P27)
s(P24,P28)
s(P28,P29)
s(P27,P30) s(P29,P30) s(P31,P30)
s(P29,P31) s(P28,P31)
s(P31,P32) s(P28,P32) s(P90,P32) s(P91,P32)
s(P26,P33) s(P30,P33)
s(P1,P34) s(P33,P34)
s(P34,P35) s(P33,P35) s(P37,P35)
s(P89,P36) s(P91,P36)
s(P36,P37)
s(P35,P38) s(P37,P38) s(P39,P38)
s(P37,P39) s(P36,P39)
s(P34,P40) s(P38,P40)
s(P1,P41) s(P40,P41)
s(P41,P42) s(P40,P42) s(P44,P42)
s(P39,P43)
s(P43,P44)
s(P42,P45) s(P44,P45) s(P46,P45)
s(P44,P46) s(P43,P46)
s(P46,P47) s(P43,P47) s(P94,P47) s(P95,P47)
s(P41,P48) s(P45,P48)
s(P1,P49) s(P48,P49)
s(P49,P50) s(P48,P50) s(P52,P50)
s(P93,P51) s(P95,P51)
s(P51,P52)
s(P50,P53) s(P52,P53) s(P54,P53)
s(P52,P54) s(P51,P54)
s(P49,P55) s(P53,P55)
s(P1,P56) s(P55,P56)
s(P56,P57) s(P55,P57) s(P59,P57)
s(P54,P58)
s(P58,P59)
s(P57,P60) s(P59,P60) s(P61,P60)
s(P59,P61) s(P58,P61)
s(P61,P62) s(P58,P62) s(P98,P62) s(P99,P62)
s(P56,P63) s(P60,P63)
s(P1,P64) s(P63,P64)
s(P64,P65) s(P63,P65) s(P67,P65)
s(P97,P66) s(P99,P66)
s(P66,P67)
s(P65,P68) s(P67,P68) s(P69,P68)
s(P67,P69) s(P66,P69) s(P77,P69)
s(P64,P70) s(P68,P70)
s(P1,P71) s(P70,P71)
s(P71,P72) s(P70,P72)
s(P2,P73) s(P71,P73)
s(P73,P74) s(P72,P74)
s(P74,P75) s(P72,P75)
s(P74,P76) s(P75,P76)
s(P76,P77) s(P75,P77)
s(P76,P78) s(P77,P78)
s(P2,P79) s(P73,P79)
s(P4,P80) s(P79,P80)
s(P80,P81) s(P79,P81)
s(P80,P82) s(P81,P82)
s(P82,P83) s(P81,P83) s(P182,P83)
s(P82,P84) s(P83,P84) s(P181,P84) s(P182,P84)
s(P85,P86)
s(P85,P87) s(P86,P87)
s(P85,P88) s(P86,P88)
s(P89,P90)
s(P89,P91) s(P90,P91)
s(P89,P92) s(P90,P92)
s(P93,P94)
s(P93,P95) s(P94,P95)
s(P93,P96) s(P94,P96)
s(P97,P98)
s(P97,P99) s(P98,P99)
s(P97,P100) s(P98,P100)
s(P101,P102)
s(P101,P103)
s(P102,P104) s(P103,P104)
s(P103,P105) s(P104,P105)
s(P101,P106)
s(P103,P107) s(P106,P107)
s(P105,P108) s(P107,P108)
s(P105,P109) s(P108,P109)
s(P108,P110) s(P109,P110)
s(P109,P111) s(P110,P111)
s(P106,P112) s(P107,P112) s(P114,P112)
s(P110,P113)
s(P113,P114)
s(P112,P115) s(P114,P115) s(P116,P115)
s(P113,P116) s(P114,P116)
s(P113,P117) s(P116,P117) s(P184,P117) s(P185,P117)
s(P106,P118) s(P115,P118)
s(P101,P119) s(P118,P119)
s(P118,P120) s(P119,P120) s(P122,P120)
s(P183,P121) s(P185,P121)
s(P121,P122)
s(P120,P123) s(P122,P123) s(P124,P123)
s(P121,P124) s(P122,P124)
s(P119,P125) s(P123,P125)
s(P101,P126) s(P125,P126)
s(P125,P127) s(P126,P127) s(P129,P127)
s(P124,P128)
s(P128,P129)
s(P127,P130) s(P129,P130) s(P131,P130)
s(P128,P131) s(P129,P131)
s(P128,P132) s(P131,P132) s(P188,P132) s(P189,P132)
s(P126,P133) s(P130,P133)
s(P101,P134) s(P133,P134)
s(P133,P135) s(P134,P135) s(P137,P135)
s(P187,P136) s(P189,P136)
s(P136,P137)
s(P135,P138) s(P137,P138) s(P139,P138)
s(P136,P139) s(P137,P139)
s(P134,P140) s(P138,P140)
s(P101,P141) s(P140,P141)
s(P140,P142) s(P141,P142) s(P144,P142)
s(P139,P143)
s(P143,P144)
s(P142,P145) s(P144,P145) s(P146,P145)
s(P143,P146) s(P144,P146)
s(P143,P147) s(P146,P147) s(P192,P147) s(P193,P147)
s(P141,P148) s(P145,P148)
s(P101,P149) s(P148,P149)
s(P148,P150) s(P149,P150) s(P152,P150)
s(P191,P151) s(P193,P151)
s(P151,P152)
s(P150,P153) s(P152,P153) s(P154,P153)
s(P151,P154) s(P152,P154)
s(P149,P155) s(P153,P155)
s(P101,P156) s(P155,P156)
s(P155,P157) s(P156,P157) s(P159,P157)
s(P154,P158)
s(P158,P159)
s(P157,P160) s(P159,P160) s(P161,P160)
s(P158,P161) s(P159,P161)
s(P158,P162) s(P161,P162) s(P196,P162) s(P197,P162)
s(P156,P163) s(P160,P163)
s(P101,P164) s(P163,P164)
s(P163,P165) s(P164,P165) s(P167,P165)
s(P195,P166) s(P197,P166)
s(P166,P167)
s(P165,P168) s(P167,P168) s(P169,P168)
s(P166,P169) s(P167,P169) s(P177,P169)
s(P164,P170) s(P168,P170)
s(P101,P171) s(P170,P171)
s(P170,P172) s(P171,P172)
s(P102,P173) s(P171,P173)
s(P172,P174) s(P173,P174)
s(P172,P175) s(P174,P175)
s(P174,P176) s(P175,P176)
s(P175,P177) s(P176,P177)
s(P176,P178) s(P177,P178)
s(P102,P179) s(P173,P179)
s(P104,P180) s(P179,P180)
s(P179,P181) s(P180,P181)
s(P180,P182) s(P181,P182)
s(P183,P184)
s(P183,P185) s(P184,P185)
s(P183,P186) s(P184,P186)
s(P187,P188)
s(P187,P189) s(P188,P189)
s(P187,P190) s(P188,P190)
s(P191,P192)
s(P191,P193) s(P192,P193)
s(P191,P194) s(P192,P194)
s(P195,P196)
s(P195,P197) s(P196,P197)
s(P195,P198) s(P196,P198)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) b(P1,MA10,MB10)
color(#008000) m(P2,P1,MA11) m(P1,P3,MB11) b(P1,MA11,MB11)
pen(2)
color(red) s(P69,P77) abstand(P69,P77,A0) print(abs(P69,P77):,5.01,22.83) print(A0,6.63,22.83)
color(red) s(P11,P178) abstand(P11,P178,A1) print(abs(P11,P178):,5.01,22.455) print(A1,6.63,22.455)
color(red) s(P18,P25) abstand(P18,P25,A2) print(abs(P18,P25):,5.01,22.08) print(A2,6.63,22.08)
print(min=0.9999999999999574,5.01,21.705)
print(max=1.0000000000000293,5.01,21.33)
\geooff
\geoprint()
Zur Vollständigkeit noch der Kern vom 4/11 mit 813 Kanten (#518-2). Da werden beide Kanten P81-P91 und P11-P96 bereits im linken Kern eingestellt. Die beiden Animationen zeigen das wieder abhängig von jedem der beiden Winkel blau und grün. Abstand P18-P29 ist keine Kante, soll nur bestätigen, dass in P29 keine Überlappung auftritt.
\geo
ebene(491.21,642.64)
x(5.01,14.83)
y(4.52,17.38)
form(.)
#//Eingabe war:
#
#No.8?? Kern 4/11 mit 813
#
#
#
#
#
#D=50; P[1]=[0,0]; P[2]=[D,0]; A(2,1);
#M(3,1,2,gruenerWinkel); N(4,3,2); L(5,3,4);
#M(6,1,3,blauerWinkel); N(7,6,3); N(8,7,5); L(9,8,5); L(10,8,9); L(11,10,9); L(12,6,7);
#Q(13,12,10,ab(11,5,8,9,10),D); L(17,16,13);
#N(18,6,14); N(19,1,18); L(20,19,18);
#Q(21,20,17,ab(11,5,[8,10]),ab(5,11,[8,10])); L(28,25,27);
#N(29,19,22); N(30,1,29); L(31,30,29);
#Q(32,31,24,ab(13,12,[14,17]),D);
#N(37,30,33); N(38,1,37); L(39,38,37);
#Q(40,39,36,ab(21,20,[22,24]),ab(21,17,[25,28]));
#N(48,38,41); N(49,1,48); L(50,49,48);
#Q(51,50,43,ab(13,12,[14,17]),D);
#N(56,49,52); N(57,1,56); L(58,57,56);
#Q(59,58,55,ab(21,20,[22,24]),ab(21,17,[25,28]));
#N(67,57,60); N(68,1,67); L(69,68,67);
#Q(70,69,62,ab(13,12,[14,17]),D);
#N(75,68,71); N(76,1,75); L(77,76,75);
#Q(78,77,74,ab(21,20,[22,24]),ab(21,17,[25,28]));
#N(86,76,79); N(87,1,86); L(88,87,86);
#
#N(89,2,87);
#Q(90,89,88,D,ab(71,69,[70,74]));
#L(95,2,89); N(96,4,95); L(97,96,95); N(98,11,97); L(99,98,97); L(100,98,99);
#
#A(81,91); R(81,91);
#A(11,96); R(11,96);
#R(18,29);
#
#
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(10,10,P1)
p(11,10,P2)
p(10.844678258782334,10.535274358754876,P3)
p(11.844678258782334,10.535274358754876,P4)
p(11.344678258782334,11.401299762539313,P5)
p(10.29479775600703,10.95555967006421,P6)
p(11.139476014789365,11.490834028819084,P7)
p(11.639476014789365,12.356859432603523,P8)
p(12.319616085893331,11.623777251890683,P9)
p(12.614413841900362,12.579336921954893,P10)
p(13.294553913004329,11.846254741242053,P11)
p(10.25357569272205,11.954709679571554,P12)
p(11.824489948800048,13.192541816838522,P13)
p(10.110307218494558,12.944393540353637,P14)
p(11.039032820761049,12.573625748205039,P15)
p(10.895764346533557,13.56330960898712,P16)
p(11.681221474572558,14.182225677620604,P17)
p(10.151529281779549,11.945243530846291,P18)
p(9.856731525772517,10.989683860782083,P19)
p(9.176591454668552,11.722766041494921,P20)
p(9.757065806355596,13.636675529175442,P21)
p(8.492962924152618,12.452596180818194,P22)
p(9.466828630512074,12.679720785335181,P23)
p(8.78320009999614,13.409550924658454,P24)
p(10.001874579613894,14.606246911042588,P25)
p(10.719143640464077,13.909450603398025,P26)
p(10.963952413722376,14.879021985265169,P27)
p(10.246683352872193,15.575818292909734,P28)
p(9.173102995256782,11.719514000105539,P29)
p(9.316371469484265,10.729830139323456,P30)
p(8.387645867217778,11.100597931472063,P31)
p(7.858324495259303,13.029281131271345,P32)
p(7.420171200788941,11.353565853980847,P33)
p(8.12298518123854,12.064939531371703,P34)
p(7.155510514809704,12.31790745388049,P35)
p(6.890849828830466,13.28224905378013,P36)
p(8.348896803055428,10.982798061832245,P37)
p(9.032525333571165,10.25296792250879,P38)
p(8.058659627211647,10.025843317992065,P39)
p(6.5296911898032395,11.315128204046692,P40)
p(7.118140785840229,9.686101785315582,P41)
p(7.294175408507444,10.670485761019378,P42)
p(6.353656567136024,10.330744228342896,P43)
p(5.768192535468453,11.963294694576948,P44)
p(6.710270509316853,12.29868862891341,P45)
p(5.948771854982064,12.946855119443667,P46)
p(5.006693881133665,12.611461185107203,P47)
p(8.092006492199745,9.913226389832309,P48)
p(9.05948115862858,9.66025846732352,P49)
p(8.356667178178979,8.948884789932666,P50)
p(6.39361527527069,9.331542896456169,P51)
p(7.700208381845204,8.194522908130562,P52)
p(7.375141226724834,9.140213843194418,P53)
p(6.71868243039106,8.385851961392312,P54)
p(5.737156478936916,8.577181014654064,P55)
p(8.403022362294802,8.905896585521418,P56)
p(9.343541203666222,9.245638118197899,P57)
p(9.167506580999005,8.261254142494103,P58)
p(7.359111143914536,7.4070258690612505,P59)
p(9.085299414439772,7.264638879834383,P60)
p(8.263308862456771,7.834140005777677,P61)
p(8.181101695897539,6.837524743117956,P62)
p(6.446930436443903,6.9972376836308054,P63)
p(6.548133811425727,7.992103441857657,P64)
p(5.635953103955093,7.5823152564272105,P65)
p(5.534749728973271,6.58744949820036,P66)
p(9.261334037106984,8.249022855538179,P67)
p(9.917792833440762,9.00338473734028,P68)
p(10.242859988561127,8.057693802276422,P69)
p(9.091000831407571,6.422695183903457,P70)
p(10.66287036860446,7.150174501844825,P71)
p(9.66693040998435,7.24019449308994,P72)
p(10.086940790027683,6.332675192658343,P73)
p(9.511011211450905,5.51517588347186,P74)
p(10.337803213484088,8.09586543690868,P75)
p(10.420010380043326,9.0924806995684,P76)
p(11.242000932026325,8.522979573625102,P77)
p(11.23853129988824,6.522982583214159,P78)
p(12.107157624585954,8.021477931235683,P79)
p(11.240266115957283,7.522981078419631,P80)
p(12.105422808516913,7.02147943603021,P81)
p(11.243044379819402,5.522992767211249,P82)
p(10.374771255669573,6.01907923334301,P83)
p(10.379284335600735,5.019089417340099,P84)
p(11.247557459750562,4.523002951208338,P85)
p(11.285167072602956,8.590979057178984,P86)
p(10.86515669255963,9.498498357610584,P87)
p(11.861096651179741,9.408478366365461,P88)
p(11.86515669255963,9.498498357610584,P89)
p(12.861096651179743,9.408478366365474,P90)
p(12.861096651179764,7.676427558796596,P91)
p(12.361096651179754,8.542452962581027,P92)
p(13.361096651179754,8.542452962581041,P93)
p(13.861096651179766,7.676427558796609,P94)
p(11.866891508628669,10.498496852816055,P95)
p(12.711569767411,11.033771211570935,P96)
p(12.752791830695985,10.034621202063589,P97)
p(13.335775976289296,10.847104731734706,P98)
p(13.747915280344277,9.935983886811774,P99)
p(14.330899425937588,10.74846741648289,P100)
nolabel()
s(P1,P2)
s(P1,P3)
s(P3,P4) s(P2,P4)
s(P3,P5) s(P4,P5)
s(P1,P6)
s(P6,P7) s(P3,P7)
s(P7,P8) s(P5,P8)
s(P8,P9) s(P5,P9)
s(P8,P10) s(P9,P10)
s(P10,P11) s(P9,P11) s(P96,P11)
s(P6,P12) s(P7,P12)
s(P15,P13) s(P16,P13) s(P10,P13)
s(P12,P14)
s(P12,P15) s(P14,P15)
s(P14,P16) s(P15,P16)
s(P16,P17) s(P13,P17) s(P26,P17) s(P27,P17)
s(P6,P18) s(P14,P18)
s(P1,P19) s(P18,P19)
s(P19,P20) s(P18,P20)
s(P23,P21) s(P24,P21)
s(P20,P22)
s(P20,P23) s(P22,P23)
s(P22,P24) s(P23,P24)
s(P21,P25)
s(P21,P26) s(P25,P26)
s(P25,P27) s(P26,P27)
s(P25,P28) s(P27,P28)
s(P19,P29) s(P22,P29)
s(P1,P30) s(P29,P30)
s(P30,P31) s(P29,P31)
s(P34,P32) s(P35,P32) s(P24,P32)
s(P31,P33)
s(P31,P34) s(P33,P34)
s(P33,P35) s(P34,P35)
s(P32,P36) s(P35,P36) s(P45,P36) s(P46,P36)
s(P30,P37) s(P33,P37)
s(P1,P38) s(P37,P38)
s(P38,P39) s(P37,P39)
s(P42,P40) s(P43,P40)
s(P39,P41)
s(P39,P42) s(P41,P42)
s(P41,P43) s(P42,P43)
s(P40,P44)
s(P40,P45) s(P44,P45)
s(P44,P46) s(P45,P46)
s(P44,P47) s(P46,P47)
s(P38,P48) s(P41,P48)
s(P1,P49) s(P48,P49)
s(P49,P50) s(P48,P50)
s(P53,P51) s(P54,P51) s(P43,P51)
s(P50,P52)
s(P50,P53) s(P52,P53)
s(P52,P54) s(P53,P54)
s(P51,P55) s(P54,P55) s(P64,P55) s(P65,P55)
s(P49,P56) s(P52,P56)
s(P1,P57) s(P56,P57)
s(P57,P58) s(P56,P58)
s(P61,P59) s(P62,P59)
s(P58,P60)
s(P58,P61) s(P60,P61)
s(P60,P62) s(P61,P62)
s(P59,P63)
s(P59,P64) s(P63,P64)
s(P63,P65) s(P64,P65)
s(P63,P66) s(P65,P66)
s(P57,P67) s(P60,P67)
s(P1,P68) s(P67,P68)
s(P68,P69) s(P67,P69)
s(P72,P70) s(P73,P70) s(P62,P70)
s(P69,P71)
s(P69,P72) s(P71,P72)
s(P71,P73) s(P72,P73)
s(P70,P74) s(P73,P74) s(P83,P74) s(P84,P74)
s(P68,P75) s(P71,P75)
s(P1,P76) s(P75,P76)
s(P76,P77) s(P75,P77)
s(P80,P78) s(P81,P78)
s(P77,P79)
s(P77,P80) s(P79,P80)
s(P79,P81) s(P80,P81) s(P91,P81)
s(P78,P82)
s(P78,P83) s(P82,P83)
s(P82,P84) s(P83,P84)
s(P82,P85) s(P84,P85)
s(P76,P86) s(P79,P86)
s(P1,P87) s(P86,P87)
s(P87,P88) s(P86,P88)
s(P2,P89) s(P87,P89)
s(P89,P90) s(P88,P90)
s(P92,P91) s(P93,P91)
s(P88,P92) s(P90,P92)
s(P90,P93) s(P92,P93)
s(P91,P94) s(P93,P94)
s(P2,P95) s(P89,P95)
s(P4,P96) s(P95,P96)
s(P96,P97) s(P95,P97)
s(P11,P98) s(P97,P98)
s(P98,P99) s(P97,P99)
s(P98,P100) s(P99,P100)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) b(P1,MA10,MB10)
color(#008000) m(P2,P1,MA11) m(P1,P3,MB11) b(P1,MA11,MB11)
pen(2)
color(red) s(P81,P91) abstand(P81,P91,A0) print(abs(P81,P91):,5.01,17.376) print(A0,6.31,17.376)
color(red) s(P11,P96) abstand(P11,P96,A1) print(abs(P11,P96):,5.01,17.076) print(A1,6.31,17.076)
color(red) s(P18,P29) abstand(P18,P29,A2) print(abs(P18,P29):,5.01,16.776) print(A2,6.31,16.776)
print(min=0.9999999999999981,5.01,16.476)
print(max=1.0000000000000266,5.01,16.176)
\geooff
\geoprint()
Beim Video vom (2,4) regulären Graph gibt es mehrere Stellen, wo die "perfekte Symmetrie" gestört wird: 0:45, 1:00, 1:10, 1:25 und die langsame Fortsetzung ab 1:40. Ursache ist im inneren Sechseck, rechte Kante, der unterer Eckpunkt. In diesem Punkt wird das innere Sechseck nie konkav, obwohl das für den perfekt symmetrischen Ablauf erforderlich wäre. Das ist das Problem, dass man sich bei der Eingabe der Punkte manchmal entscheiden muss, ob der Winkel nach der einen oder anderen Seite gerichtet sein soll und diese Eingabeform passt dann nicht für alle möglichen Bewegungen. Da müsste dann für jede Bewegung eine passende Eingabe gemacht werden oder man beschränkt die Bewegung auf kleinere Winkelbereiche oder man baut auf die Phantasie des Betrachters, dass das noch nicht so perfekt ist und noch was zu verbessern geht oder es findet sich noch eine allgemein verwendbare Eingabeform. Falsch sind diese Darstellungen aber nicht, weil alle Kantenlängen 1 bleiben und auch nichts spezielles kommentiert wird.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.804, eingetragen 2017-03-12
|
alle mit 188+n*6 kann man auch hiermit erstellen,
das ist immerhin jeder dritte
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st188_nx6.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.805, vom Themenstarter, eingetragen 2017-03-12
|
Schöne einfache Lösung! Und wieder mal ein schönes Beispiel dafür wie wir uns hier ergänzen. :-)
Vielleicht finden wir ja noch zwei solche mit 6n Erweiterung.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.806, vom Themenstarter, eingetragen 2017-03-12
|
Jawoll! Mit diesen beiden Graphentypen haben wir jetzt alle > 222. :-)
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_mit_220_6n_und_228_6n_-_Slash.png
Dazu
18 Einzelgraphen
108, 130, 132, 134, 136, 140, 142, 146, 148, 154, 156, 158, 160, 164, 170, 178, 180, 202
7 Graphen mit Erweiterungen
104, 128, ...
114, 126, 138, 150, 162, 174, 186, 198, 210, 222, ...
120, 144, 168, 192, 216, ...
148, 162, 176, 190, 204, ...
150, 166, 182, 198, 214, ...
152, 168, 184, 200, ...
172, 184, 196, 208, ...
Oder mit den möglichen Kombinationen aus den 2/4 Teilgraphen noch
7 Einzelgraphen
108, 130, 134, 146, 148, 156, 164
und auch die oberen 7 Graphen mit Erweiterungen.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.807, eingetragen 2017-03-13
|
der fordert ein gutes duzend weniger erweiterungen ab schwelle 188
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st188bis-unendlich.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.808, vom Themenstarter, eingetragen 2017-03-13
|
Super! Je einfacher, desto besser. Vielleicht war das auch Herr Harborths Methode.
Also alle > 186
und 18 Einzelgraphen
108, 130, 132, 134, 136, 140, 142, 146, 148, 154, 156, 158, 160, 164, 170, 172, 178, 180
und 6 Graphen mit Erweiterungen
104, 128, ...
114, 126, 138, 150, 162, 174, 186, ...
120, 144, 168, ...
148, 162, 176, ...
150, 166, 182, ...
152, 168, 184, ...
Ich bereite dann mal ein neues Paper vor, Arbeitstitel "Known examples of 4-regular matchstick graphs". :-)
...Examples of 4-regular matchstick graphs with less than 63 vertices are only known for 52, 54, 57 and 60 vertices. It is shown that for all number of vertices $\geq$ 63 at least one example of a 4-regular matchstick graph exists.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.809, eingetragen 2017-03-13
|
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st1024.png
[Die Antwort wurde nach Beitrag No.807 begonnen.]
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st512.PNG
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.810, vom Themenstarter, eingetragen 2017-03-13
|
Hier mal der neue 140er mit haribos tollem 2/4 mit 70.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_mit_140_-_Slash_haribo.png
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.811, eingetragen 2017-03-13
|
das interessante daran ist die beweglichkeit des zwischenstücks, durch die beiden rauten bleiben dabei einige kanten parallel, das kann man also auch noch weiter einsetzen
schaus dir nochmal an im 98er #798 #789, der ist dadurch längenbeweglich
haribo
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.812, vom Themenstarter, eingetragen 2017-03-14
|
Also der 2/4 mit 70 ist starr. Beweglich ist es nur bei Spiegelung, wenn du das gemeint hast.
Ich habe jetzt folgende Zusammenstellung der Graphen > 124 Kanten.
Mit je zwei bzw. drei der zehn 2/4 Graphen (42, 58, 60, 66, 68, 70, 76, 78, 80, 82) lassen sich insgesamt $10^2+\binom{10}{3}=220$ verschiedene 4/4 bilden, mit allen Kantenzahlen von 126 bis 246, bis auf 128, 130, 134, 138, 146, 148 und 244.
Der 128 ist der Harborth+24, 130, 134 sind die 120er mit Füllung, 138 aus dem 114er, 146, 148 sind Einzelgraphen.
Alle > 186 bestehen aus nur drei 2/4 Teilgraphen. Also haben wir dreizehn 2/4er und 6 einzelne 4/4. Nicht schlecht dieser Beweis.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.813, eingetragen 2017-03-14
|
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_jubilaeum4-8.png
heute feiert der 4/8er ersten geburtstag!
er lebe drei mal hoch, hab extra ne torte gebacken
haribo
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4288
Wohnort: Raun
| Beitrag No.814, eingetragen 2017-03-18
|
Beim #755 habe ich zusätzlich zu #761 noch weitere Beweglichkeiten gefunden. Sie gehen alle vom Graph mit Rahmenwinkeln 30° aus (dieser Graph enthält auch die entsprechenden SVG-Animationen).
\geo
ebene(448.33,513.33)
x(8.13,16.31)
y(10.26,19.63)
form(.)
#//Eingabe war:
#
#No.755
#
#
#
#
#
#
#
#P[1]=[105.86,14.14]; P[2]=[158.99,27.52]; D=ab(1,2); A(2,1); L(3,1,2); L(4,3,2); L(5,4,2); M(6,1,3,blauerWinkel,2); N(10,6,3); M(11,9,8,gruenerWinkel,2);N(15,11,8); N(16,13,15); N(17,14,16); L(18,14,17); L(19,18,17); L(20,18,19); N(21,15,10); N(22,16,21); N(23,19,22); N(24,20,23); L(25,20,24); L(26,25,24); L(27,25,26); M(28,27,26,orangerWinkel,2); N(32,28,26); N(33,32,23); /*N(34,33,22);*/ N(35,30,32); N(36,35,33); N(37,31,35); L(38,31,37); L(39,38,37); L(40,38,39); N(41,39,36); N(42,40,41); L(43,40,42); L(44,43,42); L(45,43,44); M(46,45,44,vierterWinkel,2); N(50,46,44); N(51,50,41); N(52,48,50); N(53,52,51); N(54,49,52); L(55,49,54); L(56,55,54); L(57,55,56); N(58,56,53); N(59,57,58); L(60,57,59); L(61,60,59); L(62,60,61); H(63,5,62,2); A(5,63); A(63,62); L(64,63,62); L(65,5,63); A(65,64); N(66,64,61); N(67,65,66); A(4,67); N(68,66,58); N(69,67,68); /*N(70,68,53);*/ A(69,10);
#
#//A(21,34); A(70,51); A(34,36); A(69,70);
#
#R(64,65); R(4,67); R(69,10);
#
#//R(21,34); R(70,51); R(34,36); R(69,70);
#
#//innere Spitzen hinzufügen:
#N(34,33,22); N(70,68,53);
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(11.932143917952976,10.258081569996742,P1)
p(12.901866252742712,10.502291711903135,P2)
p(12.205512898595105,11.21999081749501,P3)
p(13.175235233384843,11.464200959401403,P4)
p(13.87158858753245,10.746501853809528,P5)
p(11.687933776046581,11.227803904786478,P6)
p(10.970234670454708,10.531450550638871,P7)
p(10.726024528548315,11.501172885428607,P8)
p(10.00832542295644,10.804819531281,P9)
p(11.961302756688712,12.189713152284746,P10)
p(10.28169440359857,11.766728778779267,P11)
p(9.311972068808831,11.522518636872874,P12)
p(9.585341049450962,12.484427884371142,P13)
p(8.615618714661224,12.240217742464749,P14)
p(10.999393509190444,12.463082132926875,P15)
p(10.303040155042837,13.18078123851875,P16)
p(9.333317820253098,12.936571096612356,P17)
p(8.37140857275483,13.209940077254487,P18)
p(9.089107678346707,13.906293431402094,P19)
nolabel()
p(8.12719843084844,14.179662412044223,P20)
p(11.717092614782317,13.159435487074484,P21,label)
p(11.02073926063471,13.877134592666359,P22)
p(10.058830013136443,14.150503573308491,P23)
p(9.096920765638176,14.42387255395062,P24)
p(8.400567411490565,15.141571659542493,P25)
p(9.370289746280301,15.38578180144889,P26)
p(8.67393639213269,16.103480907040762,P27)
p(9.635845639630958,15.830111926398637,P28)
p(9.39163549772456,16.799834261188373,P29)
p(10.353544745222829,16.526465280546248,P30)
p(10.10933460331643,17.496187615335984,P31)
p(10.332198993778569,15.112412820806764,P32)
p(11.028552347926178,14.394713715214891,P33)
p(11.990461595424446,14.121344734572759,P34)
p(11.04989809937044,15.808766174954377,P35)
p(11.746251453518047,15.091067069362502,P36)
p(10.805687957464041,16.778488509744115,P37)
p(11.079056938106167,17.74039775724238,P38)
p(11.775410292253778,17.02269865165051,P39)
p(12.048779272895901,17.984607899148777,P40)
p(12.019620434160165,16.05297631686077,P41)
p(12.292989414802289,17.01488556435904,P42)
p(13.010688520394169,17.711238918506645,P43)
p(13.254898662300556,16.74151658371691,P44)
p(13.972597767892434,17.437869937864512,P45)
p(13.699228787250302,16.475960690366247,P46)
p(14.668951122040038,16.720170832272636,P47)
p(14.395582141397906,15.758261584774369,P48)
p(15.365304476187644,16.00247172668076,P49)
p(12.981529681658426,15.779607336218639,P50)
p(12.26383057606655,15.083253982071033,P51,label)
p(13.67788303580603,15.061908230626763,P52)
p(12.960183930214155,14.365554876479155,P53)
p(14.64760537059577,15.30611837253315,P54)
p(15.609514618094035,15.03274939189102,P55)
p(14.891815512502161,14.336396037743413,P56)
p(15.853724760000429,14.063027057101282,P57)
p(13.922093177712423,14.092185895837027,P58)
p(14.884002425210689,13.818816915194898,P59)
label()
p(15.58035577935829,13.101117809603018,P60)
p(14.610633444568553,12.856907667696632,P61)
p(15.306986798716153,12.139208562104752,P62)
p(14.589287693124302,11.44285520795714,P63)
p(14.345077551217894,12.41257754274686,P64)
p(13.627378445626041,11.716224188599249,P65)
p(13.648724197070273,13.130276648338722,P66)
p(12.931025091478412,12.4339232941911,P67)
p(12.952370842922688,13.847975753930617,P68)
p(12.234671737330826,13.151622399782998,P69)
p(11.99046159542442,14.121344734572748,P70)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4) s(P67,P4)
s(P4,P5) s(P2,P5) s(P63,P5)
s(P1,P6)
s(P1,P7) s(P6,P7)
s(P7,P8) s(P6,P8)
s(P7,P9) s(P8,P9)
s(P6,P10) s(P3,P10)
s(P9,P11)
s(P9,P12) s(P11,P12)
s(P12,P13) s(P11,P13)
s(P12,P14) s(P13,P14)
s(P11,P15) s(P8,P15)
s(P13,P16) s(P15,P16)
s(P14,P17) s(P16,P17)
s(P14,P18) s(P17,P18)
s(P18,P19) s(P17,P19)
s(P18,P20) s(P19,P20)
s(P15,P21) s(P10,P21)
s(P16,P22) s(P21,P22)
s(P19,P23) s(P22,P23)
s(P20,P24) s(P23,P24)
s(P20,P25) s(P24,P25)
s(P25,P26) s(P24,P26)
s(P25,P27) s(P26,P27)
s(P27,P28)
s(P27,P29) s(P28,P29)
s(P29,P30) s(P28,P30)
s(P29,P31) s(P30,P31)
s(P28,P32) s(P26,P32)
s(P32,P33) s(P23,P33)
s(P33,P34) s(P22,P34)
s(P30,P35) s(P32,P35)
s(P35,P36) s(P33,P36)
s(P31,P37) s(P35,P37)
s(P31,P38) s(P37,P38)
s(P38,P39) s(P37,P39)
s(P38,P40) s(P39,P40)
s(P39,P41) s(P36,P41)
s(P40,P42) s(P41,P42)
s(P40,P43) s(P42,P43)
s(P43,P44) s(P42,P44)
s(P43,P45) s(P44,P45)
s(P45,P46)
s(P45,P47) s(P46,P47)
s(P47,P48) s(P46,P48)
s(P47,P49) s(P48,P49)
s(P46,P50) s(P44,P50)
s(P50,P51) s(P41,P51)
s(P48,P52) s(P50,P52)
s(P52,P53) s(P51,P53)
s(P49,P54) s(P52,P54)
s(P49,P55) s(P54,P55)
s(P55,P56) s(P54,P56)
s(P55,P57) s(P56,P57)
s(P56,P58) s(P53,P58)
s(P57,P59) s(P58,P59)
s(P57,P60) s(P59,P60)
s(P60,P61) s(P59,P61)
s(P60,P62) s(P61,P62)
s(P62,P63)
s(P63,P64) s(P62,P64)
s(P5,P65) s(P63,P65) s(P64,P65)
s(P64,P66) s(P61,P66)
s(P65,P67) s(P66,P67)
s(P66,P68) s(P58,P68)
s(P67,P69) s(P68,P69) s(P10,P69)
s(P68,P70) s(P53,P70)
pen(2)
color(#EE82EE) m(P44,P45,MA10) m(P45,P46,MB10) f(P45,MA10,MB10)
color(#FFA500) m(P26,P27,MA11) m(P27,P28,MB11) f(P27,MA11,MB11)
color(#008000) m(P8,P9,MA12) m(P9,P11,MB12) f(P9,MA12,MB12)
color(#0000FF) m(P3,P1,MA13) m(P1,P6,MB13) f(P1,MA13,MB13)
pen(2)
color(red) s(P64,P65) abstand(P64,P65,A0) print(abs(P64,P65):,8.13,19.627) print(A0,9.31,19.627)
color(red) s(P4,P67) abstand(P4,P67,A1) print(abs(P4,P67):,8.13,19.353) print(A1,9.31,19.353)
color(red) s(P69,P10) abstand(P69,P10,A2) print(abs(P69,P10):,8.13,19.08) print(A2,9.31,19.08)
print(min=0.9999999999999716,8.13,18.806)
print(max=1.000000000000001,8.13,18.532)
\geooff
\geoprint()
und führt einmal zu
\geo
ebene(478.68,492.73)
x(7.81,16.55)
y(10.26,19.25)
form(.)
#//Eingabe war:
#
#No.755 von der ersten zur zweiten Lösung
#
#
#
#
#
#
#
#P[1]=[105.86,14.14]; P[2]=[158.99,27.52]; D=ab(1,2); A(2,1); L(3,1,2); L(4,3,2); L(5,4,2); M(6,1,3,blauerWinkel,2); N(10,6,3); M(11,9,8,gruenerWinkel,2);N(15,11,8); N(16,13,15); N(17,14,16); L(18,14,17); L(19,18,17); L(20,18,19); N(21,15,10); N(22,16,21); N(23,19,22); N(24,20,23); L(25,20,24); L(26,25,24); L(27,25,26); M(28,27,26,orangerWinkel,2); N(32,28,26); N(33,32,23); /*N(34,33,22);*/ N(35,30,32); N(36,35,33); N(37,31,35); L(38,31,37); L(39,38,37); L(40,38,39); N(41,39,36); N(42,40,41); L(43,40,42); L(44,43,42); L(45,43,44); M(46,45,44,vierterWinkel,2); N(50,46,44); N(51,50,41); N(52,48,50); N(53,52,51); N(54,49,52); L(55,49,54); L(56,55,54); L(57,55,56); N(58,56,53); N(59,57,58); L(60,57,59); L(61,60,59); L(62,60,61); H(63,5,62,2); A(5,63); A(63,62); L(64,63,62); L(65,5,63); A(65,64); N(66,64,61); N(67,65,66); A(4,67); N(68,66,58); N(69,67,68); /*N(70,68,53);*/ A(69,10);
#
#//A(21,34); A(70,51); A(34,36); A(69,70);
#
#R(64,65); R(4,67); R(69,10);
#
#//R(21,34); R(70,51); R(34,36); R(69,70);
#
#//innere Spitzen hinzufügen:
#N(34,33,22); N(70,68,53); R(34,69);
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(11.932143917952976,10.258081569996742,P1)
p(12.901866252742712,10.502291711903135,P2)
p(12.205512898595105,11.21999081749501,P3)
p(13.175235233384843,11.464200959401403,P4)
p(13.87158858753245,10.746501853809528,P5)
p(11.55966237773141,11.186121171627065,P6)
p(10.942197277112342,10.399522894539272,P7)
p(10.569715736890776,11.327562496169596,P8)
p(9.952250636271708,10.540964219081804,P9)
p(11.833031358373539,12.148030419125334,P10)
p(10.225619616913837,11.502873466580072,P11)
p(9.255897282124101,11.258663324673678,P12)
p(9.52926626276623,12.220572572171946,P13)
p(8.559543927976494,11.976362430265553,P14)
p(10.843084717532907,12.289471743667864,P15)
p(10.1467313633853,13.007170849259738,P16)
p(9.177009028595561,12.762960707353345,P17)
p(8.187062387754928,12.904402031895877,P18)
p(8.804527488373997,13.691000308983668,P19)
nolabel()
p(7.814580847533364,13.832441633526201,P20)
p(11.460549818151975,13.076070020755658,P21,label)
p(10.764196464004366,13.79376912634753,P22)
p(9.774249823163734,13.935210450890066,P23)
p(8.7843031823231,14.076651775432598,P24)
p(8.08794982817549,14.79435088102447,P25)
p(9.057672162965225,15.038561022930867,P26)
p(8.361318808817613,15.756260128522738,P27)
p(9.252554605765138,15.302719883076637,P28)
p(9.199714081486329,16.301322846718314,P29)
p(10.090949878433854,15.847782601272211,P30)
p(10.038109354155045,16.846385564913888,P31)
p(9.94890795991275,14.585020777484766,P32)
p(10.771007171792956,14.015676517984467,P33)
p(11.76095381263359,13.874235193441933,P34,label)
p(10.787303232581467,15.130083495680342,P35)
p(11.609402444461674,14.560739236180044,P36)
p(10.734462708302658,16.12868645932202,P37)
p(11.007831688944783,17.090595706820288,P38)
p(11.704185043092394,16.372896601228415,P39)
p(11.97755402373452,17.334805848726685,P40)
p(12.07666658632527,15.444857000806723,P41)
p(12.350035566967394,16.40676624830499,P42)
p(12.967500665034102,17.19336452739634,P43)
p(13.339982208266978,16.26532492697465,P44)
p(13.957447306333684,17.051923206065993,P45)
p(13.684078328812765,16.090013957680696,P46)
p(14.653800662810088,16.334224102733653,P47)
p(14.38043168528917,15.372314854348357,P48)
p(15.350154019286489,15.616524999401312,P49)
p(13.066613230746054,15.303415678589351,P50)
p(12.449148130875685,14.516817400913844,P51,label)
p(13.762966587222458,14.585716575257011,P52)
p(13.14550148735209,13.799118297581503,P53)
p(14.732688921219781,14.829926720309965,P54)
p(15.722635562519365,14.68848539897962,P55)
p(15.105170464452655,13.901887119888272,P56)
p(16.095117105752237,13.760445798557926,P57)
p(14.135448129175494,13.65767697991737,P58)
p(15.125394770475076,13.516235658587025,P59)
label()
p(15.821748123190213,12.798536551605283,P60)
p(14.85202578791305,12.55432641163438,P61)
p(15.548379140628187,11.836627304652637,P62)
p(14.709983864080318,11.291564579231082,P63)
p(14.657143335483203,12.290167549845194,P64)
p(13.818748058935334,11.745104824423638,P65)
p(13.960789998705831,13.00786667229068,P66)
p(13.122394727417348,12.462803951972084,P67)
p(13.138690779830426,13.57721092169033,P68)
p(12.300295508541943,13.032148201371733,P69)
p(12.148744138007025,13.718652239354462,P70)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4) s(P67,P4)
s(P4,P5) s(P2,P5) s(P63,P5)
s(P1,P6)
s(P1,P7) s(P6,P7)
s(P7,P8) s(P6,P8)
s(P7,P9) s(P8,P9)
s(P6,P10) s(P3,P10)
s(P9,P11)
s(P9,P12) s(P11,P12)
s(P12,P13) s(P11,P13)
s(P12,P14) s(P13,P14)
s(P11,P15) s(P8,P15)
s(P13,P16) s(P15,P16)
s(P14,P17) s(P16,P17)
s(P14,P18) s(P17,P18)
s(P18,P19) s(P17,P19)
s(P18,P20) s(P19,P20)
s(P15,P21) s(P10,P21)
s(P16,P22) s(P21,P22)
s(P19,P23) s(P22,P23)
s(P20,P24) s(P23,P24)
s(P20,P25) s(P24,P25)
s(P25,P26) s(P24,P26)
s(P25,P27) s(P26,P27)
s(P27,P28)
s(P27,P29) s(P28,P29)
s(P29,P30) s(P28,P30)
s(P29,P31) s(P30,P31)
s(P28,P32) s(P26,P32)
s(P32,P33) s(P23,P33)
s(P33,P34) s(P22,P34)
s(P30,P35) s(P32,P35)
s(P35,P36) s(P33,P36)
s(P31,P37) s(P35,P37)
s(P31,P38) s(P37,P38)
s(P38,P39) s(P37,P39)
s(P38,P40) s(P39,P40)
s(P39,P41) s(P36,P41)
s(P40,P42) s(P41,P42)
s(P40,P43) s(P42,P43)
s(P43,P44) s(P42,P44)
s(P43,P45) s(P44,P45)
s(P45,P46)
s(P45,P47) s(P46,P47)
s(P47,P48) s(P46,P48)
s(P47,P49) s(P48,P49)
s(P46,P50) s(P44,P50)
s(P50,P51) s(P41,P51)
s(P48,P52) s(P50,P52)
s(P52,P53) s(P51,P53)
s(P49,P54) s(P52,P54)
s(P49,P55) s(P54,P55)
s(P55,P56) s(P54,P56)
s(P55,P57) s(P56,P57)
s(P56,P58) s(P53,P58)
s(P57,P59) s(P58,P59)
s(P57,P60) s(P59,P60)
s(P60,P61) s(P59,P61)
s(P60,P62) s(P61,P62)
s(P62,P63)
s(P63,P64) s(P62,P64)
s(P5,P65) s(P63,P65) s(P64,P65)
s(P64,P66) s(P61,P66)
s(P65,P67) s(P66,P67)
s(P66,P68) s(P58,P68)
s(P67,P69) s(P68,P69) s(P10,P69)
s(P68,P70) s(P53,P70)
pen(2)
color(#EE82EE) m(P44,P45,MA10) m(P45,P46,MB10) f(P45,MA10,MB10)
color(#FFA500) m(P26,P27,MA11) m(P27,P28,MB11) f(P27,MA11,MB11)
color(#008000) m(P8,P9,MA12) m(P9,P11,MB12) f(P9,MA12,MB12)
color(#0000FF) m(P3,P1,MA13) m(P1,P6,MB13) f(P1,MA13,MB13)
pen(2)
color(red) s(P64,P65) abstand(P64,P65,A0) print(abs(P64,P65):,7.81,19.251) print(A0,9,19.251)
color(red) s(P4,P67) abstand(P4,P67,A1) print(abs(P4,P67):,7.81,18.977) print(A1,9,18.977)
color(red) s(P69,P10) abstand(P69,P10,A2) print(abs(P69,P10):,7.81,18.704) print(A2,9,18.704)
color(red) s(P34,P69) abstand(P34,P69,A3) print(abs(P34,P69):,7.81,18.43) print(A3,9,18.43)
print(min=0.9999999999999721,7.81,18.156)
print(max=1.0000000000000038,7.81,17.882)
\geooff
\geoprint()
und dann noch zu
\geo
ebene(494.38,487.54)
x(7.5,16.53)
y(10.26,19.16)
form(.)
#//Eingabe war:
#
#No.755 dritte Lösung
#
#
#
#
#
#
#
#P[1]=[105.86,14.14]; P[2]=[158.99,27.52]; D=ab(1,2); A(2,1); L(3,1,2); L(4,3,2); L(5,4,2); M(6,1,3,blauerWinkel,2); N(10,6,3); M(11,9,8,gruenerWinkel,2);N(15,11,8); N(16,13,15); N(17,14,16); L(18,14,17); L(19,18,17); L(20,18,19); N(21,15,10); N(22,16,21); N(23,19,22); N(24,20,23); L(25,20,24); L(26,25,24); L(27,25,26); M(28,27,26,orangerWinkel,2); N(32,28,26); N(33,32,23); /*N(34,33,22);*/ N(35,30,32); N(36,35,33); N(37,31,35); L(38,31,37); L(39,38,37); L(40,38,39); N(41,39,36); N(42,40,41); L(43,40,42); L(44,43,42); L(45,43,44); M(46,45,44,vierterWinkel,2); N(50,46,44); N(51,50,41); N(52,48,50); N(53,52,51); N(54,49,52); L(55,49,54); L(56,55,54); L(57,55,56); N(58,56,53); N(59,57,58); L(60,57,59); L(61,60,59); L(62,60,61); H(63,5,62,2); A(5,63); A(63,62); L(64,63,62); L(65,5,63); A(65,64); N(66,64,61); N(67,65,66); A(4,67); N(68,66,58); N(69,67,68); /*N(70,68,53);*/ A(69,10);
#
#//A(21,34); A(70,51); A(34,36); A(69,70);
#
#R(64,65); R(4,67); R(69,10);
#
#//R(21,34); R(70,51); R(34,36); R(69,70);
#
#//innere Spitzen hinzufügen:
#N(34,33,22); N(70,68,53); R(21,70); R(34,51);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(11.932143917952976,10.258081569996742,P1)
p(12.901866252742712,10.502291711903135,P2)
p(12.205512898595105,11.21999081749501,P3)
p(13.175235233384843,11.464200959401403,P4)
p(13.87158858753245,10.746501853809528,P5)
p(11.575740202998029,11.19241362658386,P6)
p(10.944786763900899,10.41659292713617,P7)
p(10.588383048945952,11.350924983723287,P8)
p(9.957429609848822,10.575104284275598,P9)
p(11.84910918364016,12.154322874082126,P10)
p(9.946450383972888,11.575044010758731,P11)
p(9.085966791523196,11.065565858994718,P12)
p(9.074987565647262,12.065505585477851,P13)
p(8.214503973197573,11.556027433713838,P14)
p(10.577403823070018,12.350864710206421,P15)
p(9.705941004744393,12.841326284925541,P16)
p(8.845457412294703,12.331848133161529,P17)
p(7.858100258242626,12.490359490300957,P18)
p(8.489053697339756,13.266180189748646,P19)
nolabel()
p(7.501696543287679,13.424691546888074,P20)
p(11.330180663361368,13.009140510096538,P21,label)
p(10.458717845035743,13.499602084815658,P22)
p(9.458776039546255,13.51039030220418,P23)
p(8.471418885494177,13.668901659343605,P24)
p(7.775065553143383,14.386600786084013,P25)
p(8.744787895349882,14.630810898539545,P26)
p(8.048434562999088,15.348510025279953,P27)
p(8.950158330698704,14.916197352824462,P28)
p(8.873690203573293,15.913269379076294,P29)
p(9.77541397127291,15.480956706620798,P30)
p(9.6989458441475,16.47802873287263,P31)
p(9.646511663049498,14.198498226084054,P32)
p(10.453947431633395,13.608542736566978,P33)
p(11.453889237122883,13.597754519178459,P34,label)
p(10.471767303623704,14.76325757988039,P35)
p(11.2792030722076,14.173302090363315,P36)
p(10.395299176498295,15.76032960613222,P37)
p(10.668668186354,16.722238845328164,P38)
p(11.365021518704793,16.004539718587754,P39)
p(11.638390528560498,16.966448957783694,P40)
p(11.721425205283694,15.07020765117651,P41)
p(11.994794215139395,16.03211689037245,P42)
p(12.625747677798518,16.807937570657824,P43)
p(12.982151364377415,15.873605503246578,P44)
p(13.61310482703654,16.64942618353195,P45)
p(13.624084022543894,15.649486456715373,P46)
p(14.484567630466644,16.158964582346147,P47)
p(14.495546825973996,15.15902485552957,P48)
p(15.356030433896748,15.66850298116034,P49)
p(12.993130559884767,14.87366577643,P50)
p(12.240353699601314,14.215389999402023,P51,label)
p(13.86459336331487,14.383204175244195,P52)
p(13.111816503031418,13.724928398216218,P53)
p(14.725076971237623,14.892682300874966,P54)
p(15.712434120475642,14.734170913749095,P55)
p(15.081480657816517,13.958350233463722,P56)
p(16.06883780705454,13.799838846337849,P57)
p(14.111758308193263,13.71414015045903,P58)
p(15.099115457431285,13.55562876333316,P59)
label()
p(15.795468767985277,12.837929615444232,P60)
p(14.825746418362023,12.593719532439543,P61)
p(15.522099728916018,11.876020384550614,P62)
p(14.696844158224234,11.31126111918007,P63)
p(14.620376072736597,12.308333040699052,P64)
p(13.795120502044814,11.74357377532851,P65)
p(13.924022539049531,13.026031972091271,P66)
p(13.098766889994272,12.461272630687889,P67)
p(13.116586920899339,13.615987667497645,P68)
p(12.29133127184408,13.051228326094263,P69)
p(12.116645115737494,13.626775915254834,P70)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4) s(P67,P4)
s(P4,P5) s(P2,P5) s(P63,P5)
s(P1,P6)
s(P1,P7) s(P6,P7)
s(P7,P8) s(P6,P8)
s(P7,P9) s(P8,P9)
s(P6,P10) s(P3,P10)
s(P9,P11)
s(P9,P12) s(P11,P12)
s(P12,P13) s(P11,P13)
s(P12,P14) s(P13,P14)
s(P11,P15) s(P8,P15)
s(P13,P16) s(P15,P16)
s(P14,P17) s(P16,P17)
s(P14,P18) s(P17,P18)
s(P18,P19) s(P17,P19)
s(P18,P20) s(P19,P20)
s(P15,P21) s(P10,P21)
s(P16,P22) s(P21,P22)
s(P19,P23) s(P22,P23)
s(P20,P24) s(P23,P24)
s(P20,P25) s(P24,P25)
s(P25,P26) s(P24,P26)
s(P25,P27) s(P26,P27)
s(P27,P28)
s(P27,P29) s(P28,P29)
s(P29,P30) s(P28,P30)
s(P29,P31) s(P30,P31)
s(P28,P32) s(P26,P32)
s(P32,P33) s(P23,P33)
s(P33,P34) s(P22,P34)
s(P30,P35) s(P32,P35)
s(P35,P36) s(P33,P36)
s(P31,P37) s(P35,P37)
s(P31,P38) s(P37,P38)
s(P38,P39) s(P37,P39)
s(P38,P40) s(P39,P40)
s(P39,P41) s(P36,P41)
s(P40,P42) s(P41,P42)
s(P40,P43) s(P42,P43)
s(P43,P44) s(P42,P44)
s(P43,P45) s(P44,P45)
s(P45,P46)
s(P45,P47) s(P46,P47)
s(P47,P48) s(P46,P48)
s(P47,P49) s(P48,P49)
s(P46,P50) s(P44,P50)
s(P50,P51) s(P41,P51)
s(P48,P52) s(P50,P52)
s(P52,P53) s(P51,P53)
s(P49,P54) s(P52,P54)
s(P49,P55) s(P54,P55)
s(P55,P56) s(P54,P56)
s(P55,P57) s(P56,P57)
s(P56,P58) s(P53,P58)
s(P57,P59) s(P58,P59)
s(P57,P60) s(P59,P60)
s(P60,P61) s(P59,P61)
s(P60,P62) s(P61,P62)
s(P62,P63)
s(P63,P64) s(P62,P64)
s(P5,P65) s(P63,P65) s(P64,P65)
s(P64,P66) s(P61,P66)
s(P65,P67) s(P66,P67)
s(P66,P68) s(P58,P68)
s(P67,P69) s(P68,P69) s(P10,P69)
s(P68,P70) s(P53,P70)
pen(2)
color(#EE82EE) m(P44,P45,MA10) m(P45,P46,MB10) f(P45,MA10,MB10)
color(#FFA500) m(P26,P27,MA11) m(P27,P28,MB11) f(P27,MA11,MB11)
color(#008000) m(P8,P9,MA12) m(P9,P11,MB12) f(P9,MA12,MB12)
color(#0000FF) m(P3,P1,MA13) m(P1,P6,MB13) f(P1,MA13,MB13)
pen(2)
color(red) s(P64,P65) abstand(P64,P65,A0) print(abs(P64,P65):,7.5,19.157) print(A0,8.69,19.157)
color(red) s(P4,P67) abstand(P4,P67,A1) print(abs(P4,P67):,7.5,18.883) print(A1,8.69,18.883)
color(red) s(P69,P10) abstand(P69,P10,A2) print(abs(P69,P10):,7.5,18.609) print(A2,8.69,18.609)
color(red) s(P21,P70) abstand(P21,P70,A3) print(abs(P21,P70):,7.5,18.335) print(A3,8.69,18.335)
color(red) s(P34,P51) abstand(P34,P51,A4) print(abs(P34,P51):,7.5,18.062) print(A4,8.69,18.062)
print(min=0.9999999999999684,7.5,17.788)
print(max=1.0000000000000013,7.5,17.514)
\geooff
\geoprint()
Diese Bewegungsmöglichkeiten sind daran unterscheidbar, ob die Punkte P11-P15-P21 sowie P65-P67-P69 auf einer Geraden liegen oder nicht. Diese Bewegungsmöglichkeiten habe ich durch Probieren herausgefunden. Möglicherweise gibt es noch weitere, zum Beispiel vom dritten zum zweiten Graph direkt, ohne Umweg über den ersten Graph, gelangen. Aber, Slash, die punktierten blauen Linien in #755 haben schonmal gestimmt.
In #803-1 habe ich die beiden Kerne um 1 weiter auseinander gerückt und Streichholzgraph-785.htm ist auch nochmal etwas ausgebessert bei gleicher Funktion.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.815, vom Themenstarter, eingetragen 2017-03-21
|
\quoteon(2017-03-14 01:09 - Slash in Beitrag No. 812)
Ich habe jetzt folgende Zusammenstellung der Graphen > 124 Kanten.
Mit je zwei bzw. drei der zehn 2/4 Graphen (42, 58, 60, 66, 68, 70, 76, 78, 80, 82) lassen sich insgesamt $10^2+\binom{10}{3}=220$ verschiedene 4/4 bilden, mit allen Kantenzahlen von 126 bis 246, bis auf 128, 130, 134, 138, 146, 148 und 244.
Der 128 ist der Harborth+24, 130, 134 sind die 120er mit Füllung, 138 aus dem 114er, 146, 148 sind Einzelgraphen.
Alle > 186 bestehen aus nur drei 2/4 Teilgraphen. Also haben wir dreizehn 2/4er und 6 einzelne 4/4. Nicht schlecht dieser Beweis.
\quoteoff
Bitte überprüft mal, ob ich richtig gerechtnet habe und wir sogar auf die 2/4 mit 76 und 80 Kanten verzichten können um alle 4/4 bis 186 zu konstruieren.
Es reichen sogar die ersten sechs 2/4, wenn man 156 und 164 als Einzelgraphen dazu nimmt.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.816, vom Themenstarter, eingetragen 2017-03-23
|
Neuer 4/4 mit 132. Doppelt Spiegelsymmetrisch.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_mit_132_-_Slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.817, vom Themenstarter, eingetragen 2017-03-23
|
Hier ein paar falsche, die sich wohl nicht retten lassen.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_5_und_4_5_neu_falsch_-_Slash.png
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.818, eingetragen 2017-03-23
|
\quoteon(2017-03-23 01:12 - Slash in Beitrag No. 816)
Neuer 4/4 mit 132. Doppelt Spiegelsymmetrisch.
\quoteoff
sehr schön,
insgesamt erscheint er mir als starr,
aber wie gross mag die beweglichkeit der linken hälfte davon sein?
haribo
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.819, vom Themenstarter, eingetragen 2017-03-23
|
Die Geometrie eines Viertelgraphen ist schon seltsam, da es einfach so passt. Die blauen Kanten haben die Länge 1/2 und die grünen Kanten besitzen denselben Winkel. Die braune gepunktete Hilfskante hat auch genau Länge 1. Oder stimmt er nur scheinbar bis auf die ersten Nachkommastellen? Sieht jemand einen geometrischen Beweis?
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_132_viertel_geometrie_-_Slash.png
haribo, du hattest übrigens ganz am Anfang des Threads in #70 die gleiche Geometrie bei deinem schönen 138er.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_138_haribo_132_slash_vergleich.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.820, vom Themenstarter, eingetragen 2017-03-23
|
Beweglichkeit erlangt der Graph nach dem Entfernen der vier senkrechten Kanten (rot), oder der mittleren zwei (rot) und der anderen vier (blau).
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_132_flex_minus_4_-_slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.821, vom Themenstarter, eingetragen 2017-03-24
|
Bei diesem 4/5 mit doppelter Spiegelsymmetrie ist interessant, dass sich beim Viertelteilgraph auch ein Knoten im Schnittpunkt der orthogonalen Symmetriegeraden befindet.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_5_mit_188_-_Slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.822, vom Themenstarter, eingetragen 2017-03-24
|
Hier noch drei 4/5.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_5_mal_3_-_slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.823, vom Themenstarter, eingetragen 2017-03-24
|
Wir hatten noch zwei 2/4 mit nur zwei 2er-Knoten übersehen. Eine Alternative zu dem mit 76 und 82 Kanten. Den mit 76 hatte ich aber schon mal gepostet.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_mit_164_neuer_teilgraph_-_slash.png
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_alt_mit_76_-_slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.824, vom Themenstarter, eingetragen 2017-03-24
|
Mir ist gerade aufgefallen, dass man fast alle 10 minimalen 2/4 in verschiedenen Varianten darstellen kann indem man Reverse-Konstruktionen bildet. Der 2/4 mit 70 besitzt sogar 3 Reverse-Achsen, also noch 7 zusätzliche Varianten. Die bisherigen Formen stellen also nur die symmetrischsten dar. Der 2/4 mit 60 wird dabei allerdings zum 2/3/4/7, den man aber für einen 4/7 verwenden kann.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_neuer_4_7_mit_teilgraph_rev_-_slash.png
Vielleicht gelingt einem ja damit ein 4/7 mit < 159 Kanten.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.825, vom Themenstarter, eingetragen 2017-03-24
|
Hier die aktuelle Übersicht der kleinsten bekannten (2,4)-regulären Streichholzgraphen mit nur zwei Knoten vom Grad 2 in ihrer einfachsten bzw. symmetrischsten Darstellung.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_mit_nur_zwei_2er_Knoten_bersicht_-_Slash.png
Der 70er ist der einzige asymmetrische. Der 60er und der zweite 76er besitzen keine weitere Darstellung.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.826, vom Themenstarter, eingetragen 2017-03-24
|
Welche 4/4 mit 138 kennen wir? Ich habe nur haribos aus #70 und meinen verbreiterten 114er.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.827, eingetragen 2017-03-24
|
\quoteon(2017-03-24 09:28 - Slash in Beitrag No. 825)
Hier die aktuelle Übersicht der kleinsten bekannten (2,4)-regulären Streichholzgraphen mit nur zwei Knoten vom Grad 2 in ihrer einfachsten bzw. symmetrischsten Darstellung.
\quoteoff
gut wäre es, bei diesen 2/4 ern, die spannweite(n) mit anzugeben
haribo
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.828, eingetragen 2017-03-24
|
mit beweglichkeit einer hälfte meinte ich schon genau das,
die grünen müssen ja nicht in linie liegen, dafür könnten die roten die gleiche richtung bekommen
die grünen oder roten oder beide könnten auch nach innen überdrückt werden
und die entsprechenden oberen, mit x makierten, genauso...
die frage ist, ob es mit diesen spielmöglichkeiten nicht evtl weitere varianten gibt bei denen wieder jeweils zwei der zweier-enden übereinander liegen...(also die blauen linien paralell zueinander liegen, sie dabei müssen nicht in einer linie liegen!) daraus ergäben sich weitere 132er varianten ....
mit meinen methoden kann ich das nicht herausfinden, da fünfecke im inneren zu viele bewegungsmöglichkeiten haben, aber genau das ist ja die chance auf neues
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st132bewegungstest.png
haribo
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.829, vom Themenstarter, eingetragen 2017-03-24
|
Das kann aber nicht sein, dass diese blauen Geraden parallel zueinander liegen, wenn sie nicht senkrecht sind. Denn dass würde ja genau eine Beweglichkeit des ursprüglichen Graphen voraussetzen, die ja deiner Meinung nach nicht gegeben ist, was ich auch so sehe.
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4288
Wohnort: Raun
| Beitrag No.830, eingetragen 2017-03-25
|
Während der Eingabe von #817-1 wird ein beweglicher blaue Winkel benötigt, doch damit muss am Ende Kante P23-P41, eine der vielen roten Restkanten, auf Länge 1 gezogen werden. Wegen Symmetrie passt dann auch P14-P49. Dass für P232-P38 und P11-P48 ebenfalls Länge 1 herauskommt, muss eine geometrische Eigenschaft sein. Bei den verbleibenden Kanten P24-P26 und P50-P52 ist wie vermutet nichts zu machen, die passen nicht.
\geo
ebene(284.47,313.3)
x(4.75,13.01)
y(16.13,25.22)
form(.)
#//Eingabe war:
#
#No.817-1
#
#
#
#
#P[1]=[-53.97,211.01]; P[2]=[-20.94,220.8]; D=ab(1,2); A(2,1); L(3,1,2); L(4,3,2); L(5,4,2); L(6,4,5); L(7,6,5); Q(8,3,6,ab(5,1,[1,5]),D); N(12,8,7); L(13,12,7); L(14,12,13); L(15,14,13); M(16,1,3,blauerWinkel,3); N(22,16,10); N(23,20,22); N(24,21,23); L(25,21,24); N(26,25,23); L(27,25,26); A(15,27,ab(27,15,[1,27])); A(41,23); R(41,23); A(49,14); R(49,14); A(22,38); R(22,38); A(11,48); R(11,48); A(24,26); R(24,26); A(50,52); R(50,52);
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(8.433396562785415,16.1250507927858,P1)
p(9.392168316189116,16.409228069982962,P2)
p(8.666677698256231,17.097460126262934,P3)
p(9.625449451659932,17.381637403460097,P4)
p(10.350940069592816,16.693405347180125,P5)
p(10.584221205063635,17.665814680657256,P6)
p(11.309711822996519,16.977582624377284,P7)
p(10.069374801223914,18.52309711979462,P8)
p(9.368026249740073,17.81027862302878,P9)
p(8.400033047511496,18.06125503713828,P10)
p(9.101381598995337,18.774073533904126,P11)
p(10.7948654191568,17.83486506351465,P12)
p(11.794716991587904,17.852093908718224,P13)
p(11.279870587748185,18.70937634785559,P14)
p(12.27972216017929,18.726605193059164,P15)
p(8.16675190619729,17.08884570204451,P16)
p(7.465403359035193,16.37602720102646,P17)
p(7.198758702447069,17.33982211028517,P18)
p(6.497410155284973,16.62700360926712,P19)
p(6.230765498696848,17.59079851852583,P20)
p(5.529416951534752,16.87798001750778,P21)
p(7.4412612930818,17.777077763402673,P22)
p(6.715770661986161,18.46530980580731,P23)
p(6.014422114824064,17.75249130478926,P24)
p(5.014570542497416,17.735262453523685,P25)
p(5.715919089659513,18.448080954541734,P26)
p(4.747925885909291,18.69905736278239,P27)
p(8.594251483303164,21.30061176305575,P28)
p(7.635479729899464,21.01643448585859,P29)
p(8.36097034783235,20.328202429578624,P30)
p(7.402198594428648,20.044025152381458,P31)
p(6.676707976495763,20.732257208661437,P32)
p(6.443426841024946,19.759847875184292,P33)
p(5.717936223092063,20.448079931464274,P34)
p(6.9582732448646665,18.902565436046928,P35)
p(7.659621796348507,19.615383932812776,P36)
p(8.627614998577085,19.364407518703278,P37)
p(7.926266447093244,18.651589021937482,P38)
p(6.232782626931781,19.590797492326903,P39)
p(5.2329310545006775,19.57356864712333,P40)
p(5.747777458340395,18.716286207985632,P41)
p(8.860896139891292,20.336816853797053,P42)
p(9.562244687053386,21.049635354815095,P43)
p(9.828889343641512,20.085840445556386,P44)
p(10.530237890803608,20.798658946574434,P45)
p(10.796882547391732,19.83486403731573,P46)
p(11.498231094553828,20.547682538333774,P47)
p(9.586386753006781,19.648584792438882,P48)
p(10.31187738410242,18.96035275003425,P49)
p(11.013225931264518,19.673171251052295,P50)
p(12.013077503591164,19.690400102317874,P51)
p(11.311728956429068,18.977581601299825,P52)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5)
s(P4,P6) s(P5,P6)
s(P6,P7) s(P5,P7)
s(P9,P8) s(P11,P8) s(P6,P8)
s(P3,P9)
s(P3,P10) s(P9,P10)
s(P9,P11) s(P10,P11) s(P48,P11)
s(P8,P12) s(P7,P12)
s(P12,P13) s(P7,P13)
s(P12,P14) s(P13,P14)
s(P14,P15) s(P13,P15) s(P51,P15) s(P52,P15)
s(P1,P16)
s(P1,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(P16,P22) s(P10,P22) s(P38,P22)
s(P20,P23) s(P22,P23)
s(P21,P24) s(P23,P24) s(P26,P24)
s(P21,P25) s(P24,P25)
s(P25,P26) s(P23,P26)
s(P25,P27) s(P26,P27) s(P40,P27) s(P41,P27)
s(P28,P29)
s(P28,P30) s(P29,P30)
s(P29,P31) s(P30,P31)
s(P29,P32) s(P31,P32)
s(P31,P33) s(P32,P33)
s(P32,P34) s(P33,P34)
s(P33,P35) s(P36,P35) s(P38,P35)
s(P30,P36)
s(P30,P37) s(P36,P37)
s(P36,P38) s(P37,P38)
s(P34,P39) s(P35,P39)
s(P34,P40) s(P39,P40)
s(P39,P41) s(P40,P41) s(P23,P41)
s(P28,P42)
s(P28,P43) s(P42,P43)
s(P42,P44) s(P43,P44)
s(P43,P45) s(P44,P45)
s(P44,P46) s(P45,P46)
s(P45,P47) s(P46,P47)
s(P37,P48) s(P42,P48)
s(P46,P49) s(P48,P49) s(P14,P49)
s(P47,P50) s(P49,P50) s(P52,P50)
s(P47,P51) s(P50,P51)
s(P49,P52) s(P51,P52)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P16,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P41,P23) abstand(P41,P23,A0) print(abs(P41,P23):,4.75,25.219) print(A0,6.63,25.219)
color(red) s(P49,P14) abstand(P49,P14,A1) print(abs(P49,P14):,4.75,24.784) print(A1,6.63,24.784)
color(red) s(P22,P38) abstand(P22,P38,A2) print(abs(P22,P38):,4.75,24.348) print(A2,6.63,24.348)
color(red) s(P11,P48) abstand(P11,P48,A3) print(abs(P11,P48):,4.75,23.913) print(A3,6.63,23.913)
color(red) s(P24,P26) abstand(P24,P26,A4) print(abs(P24,P26):,4.75,23.478) print(A4,6.63,23.478)
color(red) s(P50,P52) abstand(P50,P52,A5) print(abs(P50,P52):,4.75,23.042) print(A5,6.63,23.042)
print(min=0.7569339580671189,4.75,22.607)
print(max=1.000000000001019,4.75,22.171)
\geooff
\geoprint()
Für die Eingabe eines Viertels von #817-2 werden zwei bewegliche Winkel blau und grün benötigt. Bei vier Vierteln sind das insgesamt 8 bewegliche Winkel und es müssen am Ende auch 8 Kanten auf Länge 1 gebracht werden, je 4 symmentrisch zueinander. Theoretisch geht das einzustellen, doch bei dem Versuch (siehe enthaltene SVG-Animation "Start_beide_Winkel") stellt sich dann heraus, dass P31 und P35 zusammenfallen und P51 und P52 sich sogar überlappen.
\geo
ebene(278.28,348.47)
x(4.88,12.88)
y(10.24,20.26)
form(.)
#//Eingabe war:
#
#No.817-2
#
#
#
#
#
#P[1]=[-51.86,8.51]; P[2]=[-18.31,17.7]; D=ab(1,2); A(2,1); L(3,1,2); L(4,3,2); L(5,4,2); L(6,4,5); L(7,6,5); M(8,3,4,blauerWinkel); N(9,8,6); N(10,9,7); L(11,10,7); N(12,9,11); L(13,12,11); M(14,8,9,gruenerWinkel); A(13,14,ab(13,14,[1,14],"gespiegelt")); A(1,15,ab(1,15,[1,26],"gespiegelt")); N(51,33,8); N(52,22,46); A(14,51); R(14,51); A(10,12); R(10,12); A(14,52); R(14,52); A(39,51); R(39,51); A(39,52); R(39,52); A(35,37); R(35,37); A(48,50); R(48,50); A(24,26); R(24,26);
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(8.50916592304954,10.244639375141697,P1)
p(9.473637255129908,10.50882690246863,P2)
p(8.762608479061605,11.21198981360858,P3)
p(9.727079811141973,11.476177340935513,P4)
p(10.438108587210278,10.773014429795563,P5)
p(10.691551143222343,11.740364868262446,P6)
p(11.402579919290647,11.037201957122496,P7)
p(9.478621653697884,11.910076580240979,P8)
p(10.194634836799018,12.60816333819115,P9)
p(10.905663612867322,11.905000427051199,P10)
p(11.905657286402509,11.90144333700418,P11)
p(11.194628510334205,12.604606248144131,P12)
p(12.159099842414573,12.868793775471064,P13)
p(9.232067378818083,12.879205565226208,P14)
p(8.527926886940875,15.518847906981547,P15)
p(9.490494345483228,15.247805681940287,P16)
p(8.774481163828064,14.549718922507013,P17)
p(9.737048622370416,14.278676697465757,P18)
p(10.45306180402558,14.976763456899029,P19)
p(10.699616080912769,14.007634472424499,P20)
p(11.415629262567933,14.705721231857773,P21)
p(9.485509932826444,13.846556004218053,P22)
p(10.196538710351232,13.143393094550884,P23)
p(10.912551892006396,13.841479853984154,P24)
p(11.912545565527385,13.837922759945593,P25)
p(11.19653238387222,13.13983600051232,P26)
p(7.546598464507188,10.515681600182955,P27)
p(8.26261164616235,11.213768359616228,P28)
p(7.300044187619999,11.484810584657486,P29)
p(6.584031005964834,10.786723825224213,P30)
p(6.337476729077647,11.755852809698744,P31)
p(5.621463547422482,11.057766050265473,P32)
p(7.5515828771639715,11.916931277905189,P33)
p(6.840554099639183,12.620094187572363,P34)
p(6.12454091798402,11.92200742813909,P35)
p(5.124547244463033,11.92556452217765,P36)
p(5.840560426118196,12.623651281610925,P37)
p(4.877992967575841,12.89469350665218,P38)
p(7.805025431172333,12.884281716897037,P39)
p(7.563455554860508,15.254660379654613,P40)
p(8.27448433092881,14.551497468514661,P41)
p(7.31001299884844,14.28730994118773,P42)
p(6.598984222780138,14.99047285232768,P43)
p(6.345541666768074,14.023122413860797,P44)
p(5.634512890699768,14.726285325000745,P45)
p(7.558471156292535,13.853410701882263,P46)
p(6.842457973191397,13.155323943932094,P47)
p(6.131429197123094,13.858486855072043,P48)
p(5.131435523587906,13.862043945119062,P49)
p(5.8424642996562115,13.158881033979112,P50)
p(8.516054202290153,12.181118830619821,P51)
p(8.521038607700264,13.582368451503413,P52)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5)
s(P4,P6) s(P5,P6)
s(P6,P7) s(P5,P7)
s(P3,P8)
s(P8,P9) s(P6,P9)
s(P9,P10) s(P7,P10) s(P12,P10)
s(P10,P11) s(P7,P11)
s(P9,P12) s(P11,P12)
s(P12,P13) s(P11,P13) s(P25,P13) s(P26,P13)
s(P8,P14) s(P22,P14) s(P51,P14) s(P52,P14)
s(P15,P16)
s(P15,P17) s(P16,P17)
s(P16,P18) s(P17,P18)
s(P16,P19) s(P18,P19)
s(P18,P20) s(P19,P20)
s(P19,P21) s(P20,P21)
s(P17,P22)
s(P20,P23) s(P22,P23)
s(P21,P24) s(P23,P24) s(P26,P24)
s(P21,P25) s(P24,P25)
s(P23,P26) s(P25,P26)
s(P1,P27)
s(P1,P28) s(P27,P28)
s(P27,P29) s(P28,P29)
s(P27,P30) s(P29,P30)
s(P29,P31) s(P30,P31)
s(P30,P32) s(P31,P32)
s(P28,P33)
s(P31,P34) s(P33,P34)
s(P32,P35) s(P34,P35) s(P37,P35)
s(P32,P36) s(P35,P36)
s(P34,P37) s(P36,P37)
s(P36,P38) s(P37,P38) s(P49,P38) s(P50,P38)
s(P33,P39) s(P46,P39) s(P51,P39) s(P52,P39)
s(P15,P40)
s(P15,P41) s(P40,P41)
s(P40,P42) s(P41,P42)
s(P40,P43) s(P42,P43)
s(P42,P44) s(P43,P44)
s(P43,P45) s(P44,P45)
s(P41,P46)
s(P44,P47) s(P46,P47)
s(P45,P48) s(P47,P48) s(P50,P48)
s(P45,P49) s(P48,P49)
s(P47,P50) s(P49,P50)
s(P33,P51) s(P8,P51)
s(P22,P52) s(P46,P52)
pen(2)
color(#008000) m(P9,P8,MA10) m(P8,P14,MB10) b(P8,MA10,MB10)
color(#0000FF) m(P4,P3,MA11) m(P3,P8,MB11) f(P3,MA11,MB11)
pen(2)
color(red) s(P14,P51) abstand(P14,P51,A0) print(abs(P14,P51):,4.88,20.262) print(A0,6.75,20.262)
color(red) s(P10,P12) abstand(P10,P12,A1) print(abs(P10,P12):,4.88,19.831) print(A1,6.75,19.831)
color(red) s(P14,P52) abstand(P14,P52,A2) print(abs(P14,P52):,4.88,19.4) print(A2,6.75,19.4)
color(red) s(P39,P51) abstand(P39,P51,A3) print(abs(P39,P51):,4.88,18.969) print(A3,6.75,18.969)
color(red) s(P39,P52) abstand(P39,P52,A4) print(abs(P39,P52):,4.88,18.537) print(A4,6.75,18.537)
color(red) s(P35,P37) abstand(P35,P37,A5) print(abs(P35,P37):,4.88,18.106) print(A5,6.75,18.106)
color(red) s(P48,P50) abstand(P48,P50,A6) print(abs(P48,P50):,4.88,17.675) print(A6,6.75,17.675)
color(red) s(P24,P26) abstand(P24,P26,A7) print(abs(P24,P26):,4.88,17.244) print(A7,6.75,17.244)
print(min=0.756933958067122,4.88,16.812)
print(max=1.0000000000006823,4.88,16.381)
\geooff
\geoprint()
Beim #817-3 wird mit dem beweglichen blauen Winkel die Kante P34-P50 auf Länge 1 gebracht, danach passen alle Kanten außer den beiden inneren Kanten P29-P64 und P30-P63.
\geo
ebene(299.39,435.07)
x(12.95,21.19)
y(11.29,23.26)
form(.)
#//Eingabe war:
#
#No.817-3
#
#
#
#
#P[1]=[325.72,65.59]; P[2]=[344.16,96.89]; D=ab(1,2); A(2,1); L(3,1,2); L(4,3,2); L(5,4,2); M(6,1,3,blauerWinkel,2); N(10,6,3); N(11,10,4); N(12,11,5); L(13,12,5); L(14,12,13); L(15,14,13); N(16,11,14); L(17,10,11); N(18,8,17); N(19,9,18); L(20,9,19); L(21,20,19); L(22,20,21); L(23,22,21); L(24,22,23); N(25,23,18); L(26,25,18); L(27,25,26); N(28,24,27); N(29,26,17); N(30,27,29); L(31,24,28); L(32,31,28); L(33,31,32); L(34,33,32); L(35,33,34); A(15,35,ab(35,15,[1,35])); A(34,50); R(34,50); A(50,30); R(50,30); A(64,16); R(64,16); A(16,68); R(16,68); A(30,63); R(30,63); A(29,64); R(29,64);
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(18.966086710678432,11.805494373552126,P1)
p(19.473684153098027,12.667088730804473,P2)
p(18.47372283075037,12.675883832209676,P3)
p(18.981320273169963,13.537478189462023,P4)
p(19.98128159551762,13.528683088056821,P5)
p(18.25875092422004,12.512372075276607,P6)
p(18.000244770387074,11.546362464335552,P7)
p(17.29290898392868,12.253240166060033,P8)
p(17.034402830095715,11.287230555118978,P9)
p(17.766387044291978,13.382761533934161,P10)
p(18.27398448671157,14.244355891186508,P11)
p(19.273945809059228,14.235560789781307,P12)
p(20.239787749350583,14.494692698997875,P13)
p(19.532451962892193,15.201570400722359,P14)
p(20.498293903183548,15.460702309938927,P15)
p(18.532490640544538,15.210365502127562,P16)
p(17.274023164363918,14.253150992591712,P17)
p(17.283411899204065,13.25319506773397,P18)
p(17.024905745371104,12.287185456792916,P19)
p(16.16366794024501,11.77898328932254,P20)
p(16.154170855520395,12.778938190996476,P21)
p(15.292933050394304,12.2707360235261,P22)
p(15.283435965669689,13.270690925200038,P23)
p(14.422198160543596,12.76248875772966,P24)
p(16.28342393243688,13.261942996467004,P25)
p(16.790993844333777,14.123584014799622,P26)
p(15.791005877566587,14.132331943532655,P27)
p(14.929795610800362,13.62408311036484,P28)
p(16.78165927652179,15.123540446772417,P29)
p(15.781697542521723,15.13228862004354,P30)
p(13.929834288532707,13.632878220865816,P31)
p(14.43743173878947,14.494472573500992,P32)
p(13.437470416521816,14.503267684001973,P33)
p(13.945067866778581,15.364862036637149,P34)
p(12.945106544510928,15.373657147138127,P35)
p(14.477313737016042,19.028865083524927,P36)
p(13.969716294596454,18.167270726272587,P37)
p(14.969677616944107,18.158475624867375,P38)
p(14.462080174524512,17.29688126761503,P39)
p(13.46211885217686,17.30567636902023,P40)
p(15.184649523474441,18.321987381800447,P41)
p(15.443155677307406,19.2879969927415,P42)
p(16.1504914637658,18.581119291017025,P43)
p(16.40899761759876,19.54712890195808,P44)
p(15.6770134034025,17.45159792314289,P45)
p(15.169415960982903,16.590003565890548,P46)
p(14.169454638635244,16.598798667295753,P47)
p(13.20361269834389,16.33966675807918,P48)
p(13.910948484802287,15.632789056354698,P49)
p(14.910909807149938,15.623993954949476,P50)
p(16.16937728333056,16.581208464485343,P51)
p(16.159988548490407,17.581164389343087,P52)
p(16.418494702323375,18.54717400028414,P53)
p(17.279732507449467,19.055376167754517,P54)
p(17.28922959217408,18.055421266080582,P55)
p(18.150467397300176,18.56362343355096,P56)
p(18.159964482024787,17.56366853187702,P57)
p(19.021202287150885,18.071870699347397,P58)
p(17.159976515257597,17.57241646061005,P59)
p(16.6524066033607,16.710775442277438,P60)
p(17.65239457012789,16.7020275135444,P61)
p(18.513604836894118,17.21027634671222,P62)
p(16.66174117117269,15.710819010304645,P63)
p(17.66170290517275,15.702070837033514,P64)
p(19.51356615916177,17.20148123621124,P65)
p(19.005968708905005,16.33988688357606,P66)
p(20.00593003117266,16.331091773075084,P67)
p(19.498332580915893,15.469497420439907,P68)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5)
s(P1,P6)
s(P1,P7) s(P6,P7)
s(P7,P8) s(P6,P8)
s(P7,P9) s(P8,P9)
s(P6,P10) s(P3,P10)
s(P10,P11) s(P4,P11)
s(P11,P12) s(P5,P12)
s(P12,P13) s(P5,P13)
s(P12,P14) s(P13,P14)
s(P14,P15) s(P13,P15) s(P67,P15) s(P68,P15)
s(P11,P16) s(P14,P16) s(P68,P16)
s(P10,P17) s(P11,P17)
s(P8,P18) s(P17,P18)
s(P9,P19) s(P18,P19)
s(P9,P20) s(P19,P20)
s(P20,P21) s(P19,P21)
s(P20,P22) s(P21,P22)
s(P22,P23) s(P21,P23)
s(P22,P24) s(P23,P24)
s(P23,P25) s(P18,P25)
s(P25,P26) s(P18,P26)
s(P25,P27) s(P26,P27)
s(P24,P28) s(P27,P28)
s(P26,P29) s(P17,P29) s(P64,P29)
s(P27,P30) s(P29,P30) s(P63,P30)
s(P24,P31) s(P28,P31)
s(P31,P32) s(P28,P32)
s(P31,P33) s(P32,P33)
s(P33,P34) s(P32,P34) s(P50,P34)
s(P33,P35) s(P34,P35) s(P48,P35) s(P49,P35)
s(P36,P37)
s(P36,P38) s(P37,P38)
s(P37,P39) s(P38,P39)
s(P37,P40) s(P39,P40)
s(P36,P41)
s(P36,P42) s(P41,P42)
s(P41,P43) s(P42,P43)
s(P42,P44) s(P43,P44)
s(P38,P45) s(P41,P45)
s(P39,P46) s(P45,P46)
s(P40,P47) s(P46,P47)
s(P40,P48) s(P47,P48)
s(P47,P49) s(P48,P49)
s(P46,P50) s(P49,P50) s(P30,P50)
s(P45,P51) s(P46,P51)
s(P43,P52) s(P51,P52)
s(P44,P53) s(P52,P53)
s(P44,P54) s(P53,P54)
s(P53,P55) s(P54,P55)
s(P54,P56) s(P55,P56)
s(P55,P57) s(P56,P57)
s(P56,P58) s(P57,P58)
s(P52,P59) s(P57,P59)
s(P52,P60) s(P59,P60)
s(P59,P61) s(P60,P61)
s(P58,P62) s(P61,P62)
s(P51,P63) s(P60,P63)
s(P61,P64) s(P63,P64) s(P16,P64)
s(P58,P65) s(P62,P65)
s(P62,P66) s(P65,P66)
s(P65,P67) s(P66,P67)
s(P66,P68) s(P67,P68)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P34,P50) abstand(P34,P50,A0) print(abs(P34,P50):,12.95,23.263) print(A0,14.73,23.263)
color(red) s(P50,P30) abstand(P50,P30,A1) print(abs(P50,P30):,12.95,22.85) print(A1,14.73,22.85)
color(red) s(P64,P16) abstand(P64,P16,A2) print(abs(P64,P16):,12.95,22.437) print(A2,14.73,22.437)
color(red) s(P16,P68) abstand(P16,P68,A3) print(abs(P16,P68):,12.95,22.025) print(A3,14.73,22.025)
color(red) s(P30,P63) abstand(P30,P63,A4) print(abs(P30,P63):,12.95,21.612) print(A4,14.73,21.612)
color(red) s(P29,P64) abstand(P29,P64,A5) print(abs(P29,P64):,12.95,21.199) print(A5,14.73,21.199)
print(min=0.9999999999999853,12.95,20.786)
print(max=1.053208223574404,12.95,20.373)
\geooff
\geoprint()
Jetzt noch der #816
\geo
ebene(407.88,464.89)
x(8.11,16.72)
y(10.96,20.78)
form(.)
#//Eingabe war:
#
#No.816 linke Hälfte mit A(..)=0.95
#
#
#
#
#
#P[1]=[-89.4,171.28]; P[2]=[-56.3,137.39]; D=ab(1,2); A(2,1); L(3,1,2); L(4,3,2); L(5,4,2); L(6,4,5); L(7,6,5); M(8,1,3,blauerWinkel,2); N(12,8,3); N(13,12,6); L(14,12,13); L(15,14,13); N(16,15,7); L(17,16,7); L(18,16,17); L(19,18,17); N(20,15,18); M(21,11,10,gruenerWinkel,3); N(27,21,10); N(28,25,27); L(29,28,27); L(30,28,29); N(31,26,30); L(32,26,31); L(33,32,31); L(34,32,33); A(14,29); R(14,29); A(19,34,ab(34,19,[1,34])); A(20,63); R(20,63); A(20,66); R(20,66); A(53,30); R(53,30); A(53,33); R(53,33);
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(8.112824271993185,13.6156091576399,P1)
p(8.811543697015843,12.900213347548727,P2)
p(9.08173492980442,13.86302002478159,P3)
p(9.780454354827077,13.147624214690417,P4)
p(9.5102631220385,12.184817537457553,P5)
p(10.479173779849734,12.432228404599243,P6)
p(10.208982547061158,11.469421727366377,P7)
p(8.980183144364972,14.113292376683846,P8)
p(8.115497397449806,14.615605584833666,P9)
p(8.982856269821593,15.11328880387761,P10)
p(8.118170522906427,15.615602012027429,P11)
p(9.949093802176204,14.360703243825537,P12)
p(10.214186030862509,13.396480183382504,P13)
p(10.916681581777802,14.108168317992195,P14)
p(11.181773810464106,13.143945257549163,P15)
p(10.911395902693771,12.181190986205879,P16)
p(11.176599484665294,11.216998546850814,P17)
p(11.879012840297907,11.928767805690313,P18)
p(12.14421642226943,10.964575366335247,P19)
p(12.149390748068242,12.891522077033597,P20)
p(9.085744617973658,15.363014659701882,P21)
p(8.820704634228616,16.32725208223662,P22)
p(9.788278729295847,16.07466472991107,P23)
p(9.523238745550804,17.038902152445807,P24)
p(10.490812840618036,16.78631480012026,P25)
p(10.225772856872993,17.750552222654996,P26)
p(9.950430364888822,14.860701451552064,P27)
p(10.220673765077109,15.823493487588234,P28)
p(10.919354426751632,15.108059819802008,P29)
p(11.189597826939917,16.07085185583818,P30)
p(10.924370890749334,17.035037871251674,P31)
p(11.194725478898784,17.997798691324107,P32)
p(11.893323512775124,17.28228433992079,P33)
p(12.163678100924573,18.245045159993218,P34)
p(16.195070251200818,15.594011368688566,P35)
p(15.496350826178158,16.309407178779743,P36)
p(15.22615959338958,15.346600501546877,P37)
p(14.527440168366926,16.06199631163805,P38)
p(14.797631401155499,17.024802988870917,P39)
p(13.828720743344265,16.77739212172922,P40)
p(14.09891197613284,17.74019879896209,P41)
p(15.32771137882903,15.09632814964462,P42)
p(16.192397125744193,14.594014941494802,P43)
p(15.325038253372412,14.096331722450858,P44)
p(16.189724000287576,13.59401851430104,P45)
p(14.358800721017797,14.848917282502931,P46)
p(14.09370849233149,15.813140342945964,P47)
p(13.391212941416196,15.101452208336273,P48)
p(13.126120712729893,16.065675268779305,P49)
p(13.396498620500225,17.028429540122588,P50)
p(13.131295038528705,17.992621979477654,P51)
p(12.428881682896076,17.280852720638155,P52)
p(12.158503775277724,16.318098449294467,P53)
p(15.222149905220343,13.846605866626586,P54)
p(15.487189888965386,12.882368444091853,P55)
p(14.519615793898154,13.134955796417396,P56)
p(14.784655777643199,12.170718373882663,P57)
p(13.817081682575967,12.423305726208207,P58)
p(14.08212166632101,11.459068303673474,P59)
p(14.35746415830518,14.348919074776404,P60)
p(14.087220758116892,13.386127038740234,P61)
p(13.38854009644237,14.10156070652646,P62)
p(13.118296696254085,13.13876867049029,P63)
p(13.38352363244467,12.174582655076792,P64)
p(13.11316904429522,11.21182183500436,P65)
p(12.414571010418879,11.927336186407679,P66)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5)
s(P4,P6) s(P5,P6)
s(P6,P7) s(P5,P7)
s(P1,P8)
s(P1,P9) s(P8,P9)
s(P9,P10) s(P8,P10)
s(P9,P11) s(P10,P11)
s(P8,P12) s(P3,P12)
s(P12,P13) s(P6,P13)
s(P12,P14) s(P13,P14) s(P29,P14)
s(P14,P15) s(P13,P15)
s(P15,P16) s(P7,P16)
s(P16,P17) s(P7,P17)
s(P16,P18) s(P17,P18)
s(P18,P19) s(P17,P19) s(P65,P19) s(P66,P19)
s(P15,P20) s(P18,P20) s(P63,P20) s(P66,P20)
s(P11,P21)
s(P11,P22) s(P21,P22)
s(P22,P23) s(P21,P23)
s(P22,P24) s(P23,P24)
s(P24,P25) s(P23,P25)
s(P24,P26) s(P25,P26)
s(P21,P27) s(P10,P27)
s(P25,P28) s(P27,P28)
s(P28,P29) s(P27,P29)
s(P28,P30) s(P29,P30)
s(P26,P31) s(P30,P31)
s(P26,P32) s(P31,P32)
s(P32,P33) s(P31,P33)
s(P32,P34) s(P33,P34) s(P51,P34) s(P52,P34)
s(P35,P36)
s(P35,P37) s(P36,P37)
s(P36,P38) s(P37,P38)
s(P36,P39) s(P38,P39)
s(P38,P40) s(P39,P40)
s(P39,P41) s(P40,P41)
s(P35,P42)
s(P35,P43) s(P42,P43)
s(P42,P44) s(P43,P44)
s(P43,P45) s(P44,P45)
s(P37,P46) s(P42,P46)
s(P40,P47) s(P46,P47)
s(P46,P48) s(P47,P48) s(P62,P48)
s(P47,P49) s(P48,P49)
s(P41,P50) s(P49,P50)
s(P41,P51) s(P50,P51)
s(P50,P52) s(P51,P52)
s(P49,P53) s(P52,P53) s(P30,P53) s(P33,P53)
s(P45,P54)
s(P45,P55) s(P54,P55)
s(P54,P56) s(P55,P56)
s(P55,P57) s(P56,P57)
s(P56,P58) s(P57,P58)
s(P57,P59) s(P58,P59)
s(P44,P60) s(P54,P60)
s(P58,P61) s(P60,P61)
s(P60,P62) s(P61,P62)
s(P61,P63) s(P62,P63)
s(P59,P64) s(P63,P64)
s(P59,P65) s(P64,P65)
s(P64,P66) s(P65,P66)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P8,MB10) f(P1,MA10,MB10)
color(#008000) m(P10,P11,MA11) m(P11,P21,MB11) f(P11,MA11,MB11)
pen(2)
color(red) s(P14,P29) abstand(P14,P29,A0) print(abs(P14,P29):,8.11,20.778) print(A0,9.48,20.778)
color(red) s(P20,P63) abstand(P20,P63,A1) print(abs(P20,P63):,8.11,20.462) print(A1,9.48,20.462)
color(red) s(P20,P66) abstand(P20,P66,A2) print(abs(P20,P66):,8.11,20.145) print(A2,9.48,20.145)
color(red) s(P53,P30) abstand(P53,P30,A3) print(abs(P53,P30):,8.11,19.828) print(A3,9.48,19.828)
color(red) s(P53,P33) abstand(P53,P33,A4) print(abs(P53,P33):,8.11,19.512) print(A4,9.48,19.512)
print(min=0.9999999999998249,8.11,19.195)
print(max=1.0000000000001852,8.11,18.878)
\geooff
\geoprint()
Die linke Hälfte dieses Graphen, ohne die Kante P14-P29, lässt sich mit zwei beweglichen Winkeln blau und grün eingeben. Ich habe diese Winkel gleich so eingestellt, dass P6-P13-P12 und P25-P28-P27 auf je einer Geraden liegen. Doch das muss nicht so sein, man kann auch beide Winkel etwas verringern, dann entsteht in P13 und P28 ein Knick, entweder nach links oder nach rechts gerichtet. Da nur eine Kante P14-P29 auf Länge 1 gebracht werden muss, sollte eigentlich ein bewglicher Winkel übrigbleiben. Bei diesem Versuch stellt sich dann heraus, dass dabei entweder Abstand P6-P12 oder P25-P27 größer 2 wird. Die einzige Lösung bleibt P6-P13-P12 und P25-P28-P27 auf je einer Geraden. Man sieht das etwas besser, wenn P14-P29 auf Länge 0,95 justiert wird. Dann besteht eine geringe Variationsmöglichkeit beider Winkel, siehe Animation in
\geo
ebene(220.25,381.92)
x(8.11,12.76)
y(11.04,19.1)
form(.)
#//Eingabe war:
#
#No.816 linke Hälfte mit A(..)=0.95
#
#
#
#
#
#P[1]=[-89.4,171.28]; P[2]=[-56.3,137.39]; D=ab(1,2); A(2,1); L(3,1,2); L(4,3,2); L(5,4,2); L(6,4,5); L(7,6,5); M(8,1,3,blauerWinkel,2); N(12,8,3); N(13,12,6); L(14,12,13); L(15,14,13); N(16,15,7); L(17,16,7); L(18,16,17); L(19,18,17); N(20,15,18); M(21,11,10,gruenerWinkel,3); N(27,21,10); N(28,25,27); L(29,28,27); L(30,28,29); N(31,26,30); L(32,26,31); L(33,32,31); L(34,32,33); N(35,33,30); A(14,29); R(14,29,"red",0.95*D);
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(8.112824271993185,13.6156091576399,P1)
p(8.811543697015843,12.900213347548727,P2)
p(9.08173492980442,13.86302002478159,P3)
p(9.780454354827077,13.147624214690417,P4)
p(9.5102631220385,12.184817537457553,P5)
p(10.479173779849734,12.432228404599243,P6)
p(10.208982547061158,11.469421727366377,P7)
p(8.980247345005408,14.113180471529713,P8)
p(8.115626410476318,14.615605231642155,P9)
p(8.983049483488541,15.113176545531966,P10)
p(8.118428548959452,15.61560130564441,P11)
p(9.949158002816642,14.360591338671403,P12)
p(10.22494288943157,13.399371958761286,P13)
p(10.919490847736192,14.118818366504684,P14)
p(11.195275734351123,13.157598986594566,P15)
p(10.88390486933303,12.20731051227854,P16)
p(11.185474141098656,11.25386624315383,P17)
p(11.860396463370527,11.99175502806599,P18)
p(12.161965735136153,11.038310758941282,P19)
p(12.17176732838862,12.942043502382019,P20)
p(9.085605219452317,15.361496429551213,P21)
p(8.822078162128088,16.326148434192284,P22)
p(9.789254832620953,16.072043558099086,P23)
p(9.525727775296724,17.036695562740157,P24)
p(10.49290444578959,16.782590686646962,P25)
p(10.229377388465362,17.74724269128803,P26)
p(9.950226153981404,14.859071669438771,P27)
p(10.257495232922704,15.810694343152761,P28)
p(10.927990103705639,15.068780178135157,P29)
p(11.235259182646939,16.02040285184915,P30)
p(10.76640886299791,16.903680485305927,P31)
p(11.22843942578458,17.79054448787398,P32)
p(11.76547090031713,16.946982281891877,P33)
p(12.2275014631038,17.83384628445993,P34)
p(12.234321219966157,16.0637046484351,P35)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5)
s(P4,P6) s(P5,P6)
s(P6,P7) s(P5,P7)
s(P1,P8)
s(P1,P9) s(P8,P9)
s(P9,P10) s(P8,P10)
s(P9,P11) s(P10,P11)
s(P8,P12) s(P3,P12)
s(P12,P13) s(P6,P13)
s(P12,P14) s(P13,P14) s(P29,P14)
s(P14,P15) s(P13,P15)
s(P15,P16) s(P7,P16)
s(P16,P17) s(P7,P17)
s(P16,P18) s(P17,P18)
s(P18,P19) s(P17,P19)
s(P15,P20) s(P18,P20)
s(P11,P21)
s(P11,P22) s(P21,P22)
s(P22,P23) s(P21,P23)
s(P22,P24) s(P23,P24)
s(P24,P25) s(P23,P25)
s(P24,P26) s(P25,P26)
s(P21,P27) s(P10,P27)
s(P25,P28) s(P27,P28)
s(P28,P29) s(P27,P29)
s(P28,P30) s(P29,P30)
s(P26,P31) s(P30,P31)
s(P26,P32) s(P31,P32)
s(P32,P33) s(P31,P33)
s(P32,P34) s(P33,P34)
s(P33,P35) s(P30,P35)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P8,MB10) f(P1,MA10,MB10)
color(#008000) m(P10,P11,MA11) m(P11,P21,MB11) f(P11,MA11,MB11)
pen(2)
color(red) s(P14,P29) abstand(P14,P29,A18) print(abs(P14,P29):,8.11,19.1) print(A18,9.48,19.1)
print(min=0.9500000000000076,8.11,18.784)
print(max=1.0000000000000016,8.11,18.467)
\geooff
\geoprint()
Wenn man dann aber Kante P14-P29 immer näher auf Länge 1 bringt, verringert sich die Variationsmöglichkeit immer weiter bis schließlich bei P14-P29=1 gar nichts mehr geht. Auch das extra GAP-Programm gibt für den halben Graph mit Kante P14-P29 und mit exakten Punktkoordinaten gerechnet als Ergebnis "einfach beweglich" aus. Doch das halte ich aus dem genannten Grund für eine falsche Beweglichkeit, eine von P15 auf P13 wirkende Kraft kann nicht von den Kanten P6-P13 und P12-P13 aufgenommen werden.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.831, vom Themenstarter, eingetragen 2017-03-25
|
Also ich habe jetzt beim #816 viel rumprobiert und der Graph bzw. die Hälfte von ihm ist absolut unbeweglich.
haribo, dein halber Graph in #828 kann unmöglich gleichlange Kanten besitzen. Kontrolliere bitte nochmal. Vielleicht habe ich aber auch immer noch nicht verstanden, was genau du meintest.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.832, vom Themenstarter, eingetragen 2017-03-25
|
Neue 4/5 Geometrie.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_5_mit_174_-_Slash.png
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.833, eingetragen 2017-03-25
|
\quoteon(2017-03-25 09:55 - Slash in Beitrag No. 831)
Also ich habe jetzt beim #816 viel rumprobiert und der Graph bzw. die Hälfte von ihm ist absolut unbeweglich.
haribo, dein halber Graph in #828 kann unmöglich gleichlange Kanten besitzen. Kontrolliere bitte nochmal. Vielleicht habe ich aber auch immer noch nicht verstanden, was genau du meintest.
\quoteoff
ich meinte die frage:"ist der halbe beweglich? und fals ja in welchem bereich?" und diese frage ist inzwischen mit "nein" super gut beantwortet
#828 war sozusagen eine ungenaue skizze... sorry das
genau wie dieser hier noch ungenau gezeichnet ist, aber er reiht sich mit 74 hölzern ein in die liste der kleinsten 2/4er, verdrängt den 82er aus der liste der kleinsten 10 zwo-vierer
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st2-4-74.png
der genaue winkel würde mich interessieren, (sagen wir mit 4 kommastellen)
ich würde vorschlagen die "zwo-vierer liste" nicht auf die kleinsten 10 zu beschränken, sondern auf alle bis zur beweglichen krebsschere (zwei doppelkites), also bis 84 (auch in der nächsten veröffentlichung!)
ansich ist der 74er natürlich eine erweiterung des 58er um 16 hölzer, es gibt wohl alle 58+16n also 58...74...90...106
da man gleichzeitig jeden davon mit 18m erweitern kann dürfte es eine grenze geben ab der jeder 2/4er herstellbar ist, ich vermute die grenze bei ~188 (letzteres is aber auch nur son schnellschuss)
fehlen ab 58 nur noch u.A. 62;64;72
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.834, vom Themenstarter, eingetragen 2017-03-25
|
Sehr gut, haribo! Ich bin immer wieder erstaunt und überrascht wie viele teils einfache Ideen wir immer noch übersehen haben.
Die Erweiterung aus 6 Dreiecken in der Mitte, also + 18 Kanten, passt dann auch immer dazwischen.
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4288
Wohnort: Raun
| Beitrag No.835, eingetragen 2017-03-25
|
9,8998° :-)
\geo
ebene(537.15,208.14)
x(7.85,18.25)
y(13.84,17.88)
form(.)
#//Eingabe war:
#
#No.816 linke Hälfte mit A(..)=0.95
#
#
#
#
#P[1]=[-59.53,233.73]; P[2]=[-8.68,224.90]; D=ab(1,2); A(2,1); L(3,1,2);L(4,3,2); L(5,4,2); L(6,4,5); L(7,6,5); L(8,6,7); L(9,8,7); M(10,1,3,blauerWinkel,2); L(13,12,10); L(14,11,12); N(15,13,3); L(16,13,15); L(17,16,15); L(18,16,17); L(19,18,17); L(20,18,19); A(8,19); R(8,19); A(9,20,ab(9,20,[1,20],"gespiegelt"));
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(8.846562868098259,14.528689078437663,P1)
p(9.831818674535409,14.357601393662048,P2)
p(9.48735705260718,15.296401793650553,P3)
p(10.47261285904433,15.125314108874937,P4)
p(10.81707448097256,14.186513708886434,P5)
p(11.457868665481481,14.954226424099321,P6)
p(11.80233028740971,14.015426024110818,P7)
p(12.443124471918631,14.783138739323707,P8)
p(12.78758609384686,13.844338339335202,P9)
p(9.345825741662923,15.395139644298148,P10)
p(8.34582610372201,15.394288693041323,P11)
p(8.845088977286675,16.260739258901808,P12)
p(9.845088615227588,16.26159021015863,P13)
p(7.845089339345762,16.25988830764498,P14)
p(10.470165977677366,15.48102740618138,P15)
p(10.83361451394599,16.412641683382088,P16)
p(11.458691876395768,15.632078879404837,P17)
p(11.822140412664393,16.563693156605545,P18)
p(12.447217775114172,15.783130352628294,P19)
p(12.810666311382793,16.714744629829,P20)
p(16.739104423505747,14.465227129997302,P21)
p(15.751224841091025,14.310004932331777,P22)
p(16.11073826588879,15.243144845415651,P23)
p(15.122858683474067,15.087922647750126,P24)
p(14.763345258676303,14.154782734666252,P25)
p(14.134979101059347,14.932700450084601,P26)
p(13.775465676261582,13.999560537000727,P27)
p(13.147099518644627,14.777478252419076,P28)
p(16.253839026948924,15.339594040913164,P29)
p(17.253695682308997,15.322662746450971,P30)
p(16.768430285752174,16.197029657366834,P31)
p(15.768573630392101,16.21396095182903,P32)
p(17.768286941112247,16.18009836290464,P33)
p(15.131025281574356,15.443550604728362,P34)
p(14.782604524055664,16.380888844495686,P35)
p(14.14505617523792,15.610478497395022,P36)
p(13.79663541771923,16.547816737162343,P37)
p(13.159087068901487,15.777406390061678,P38)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5)
s(P4,P6) s(P5,P6)
s(P6,P7) s(P5,P7)
s(P6,P8) s(P7,P8) s(P19,P8)
s(P8,P9) s(P7,P9) s(P27,P9) s(P28,P9)
s(P1,P10)
s(P1,P11) s(P10,P11)
s(P11,P12) s(P10,P12)
s(P12,P13) s(P10,P13)
s(P11,P14) s(P12,P14)
s(P13,P15) s(P3,P15)
s(P13,P16) s(P15,P16)
s(P16,P17) s(P15,P17)
s(P16,P18) s(P17,P18)
s(P18,P19) s(P17,P19)
s(P18,P20) s(P19,P20) s(P37,P20) s(P38,P20)
s(P21,P22)
s(P21,P23) s(P22,P23)
s(P22,P24) s(P23,P24)
s(P22,P25) s(P24,P25)
s(P24,P26) s(P25,P26)
s(P25,P27) s(P26,P27)
s(P26,P28) s(P27,P28) s(P38,P28)
s(P21,P29)
s(P21,P30) s(P29,P30)
s(P29,P31) s(P30,P31)
s(P29,P32) s(P31,P32)
s(P30,P33) s(P31,P33)
s(P23,P34) s(P32,P34)
s(P32,P35) s(P34,P35)
s(P34,P36) s(P35,P36)
s(P35,P37) s(P36,P37)
s(P36,P38) s(P37,P38)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P10,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P8,P19) abstand(P8,P19,A0) print(abs(P8,P19):,7.85,17.877) print(A0,9.1,17.877)
print(min=0.9999999999999972,7.85,17.587)
print(max=1.0000000000000042,7.85,17.296)
\geooff
\geoprint()
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.836, vom Themenstarter, eingetragen 2017-03-25
|
Diese Variante gibt es auch noch.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_mit_84_b_-_Slash.png
Es lassen sich also immer 18, 24 und 26 Kanten dazwischen setzen.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_erweiterungen_-_slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9140
Wohnort: Cuxhaven
| Beitrag No.837, vom Themenstarter, eingetragen 2017-03-25
|
Habe noch diesen 4/5 gefunden.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_5_mit_150_neu_-_Slash.png
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.838, eingetragen 2017-03-26
|
58-42=16
also ist die reihe nach rechts auch zwanglos mit +16 erklärt
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st42-58-74.PNG
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4495
| Beitrag No.839, eingetragen 2017-03-26
|
die sowisoschon variantenreiche erweiterung um 28 hölzer vom 70iger ist flexibel genug auch die breiteren enden an einen kite anzuschliessen
damit sind jetzt also ab 70 8er schritte darstellbar!!
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st-4-2_28n.png
das senkt die in #831 noch mit 188 angegebene grenze für "alle grösseren 4/2 sind herstellbar" doch wohl nochmal?
|
Profil
|
|
Home / Seite ohne Frame
Wie unterstütze ich den Matheplaneten mit Geld?
