| |
| Autor |
 Streichholzgraphen 4-regulär und 4/n-regulär (n>4) und 2/5 |
|
haribo
Senior 
Dabei seit: 25.10.2012
Mitteilungen: 4683
 |  Beitrag No.960, eingetragen 2017-04-29
|
dann kann man auch die beiden mittleren dreiecke (oben+unten) ganz rausnehmen?
|
 Profil
|
Slash
Aktiv 
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
 | Beitrag No.961, vom Themenstarter, eingetragen 2017-04-29
|
\quoteon(2017-04-29 12:12 - haribo in Beitrag No. 960)
dann kann man auch die beiden mittleren dreiecke (oben+unten) ganz rausnehmen?
\quoteoff
Dann wird der 2/4 aus #934 noch beweglicher, also doppelt beweglich. Aber ich bin mir auch hier nicht ganz sicher.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.962, vom Themenstarter, eingetragen 2017-04-30
|
Mir ist soeben ein Fehler im ersten Artikel aufgefallen, der schon über ein Jahr besteht, da ich ihn schon so anfangs hier gepostet hatte. Der 4/5 Fig.16 v2 besitzt 123 statt 121 Kanten. Damit gehört er eigentlich nicht mit in den Artikel, da er nichts besonderes ist.
Ich habe ihn rausgenommen und alles im PDF und im MGC angepasst. Die Graphen sind einfach nachgerückt bis Fig.17 v7. Fig.17 v8 gibt es also nicht mehr. War zum Glück in 10 Minuten erledigt. :-)
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.963, vom Themenstarter, eingetragen 2017-04-30
|
Hier noch mal im Vergleich. Die roten Kanten sind senkrecht, die blauen waagerecht.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_extrem_flex_vergleich_-_slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.964, vom Themenstarter, eingetragen 2017-04-30
|
Ich habe es geschafft den starren Extrem-Graphen zu retten.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_starr_extrem_mit_200_Kanten_-_Slash.png
Es ist also möglich, den 2/4 dank seiner Beweglichkleit so zu verformen, dass zwischen die Spitzen der rosa Dreiecke genau ein Doppelkite passt.
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4333
Wohnort: Raun
| Beitrag No.965, eingetragen 2017-04-30
|
\quoteon(2017-04-29 20:47 - Slash in Beitrag No. 961)
\quoteon(2017-04-29 12:12 - haribo in Beitrag No. 960)
dann kann man auch die beiden mittleren dreiecke (oben+unten) ganz rausnehmen?
\quoteoff
Dann wird der 2/4 aus #934 noch beweglicher, also doppelt beweglich. Aber ich bin mir auch hier nicht ganz sicher.
\quoteoff
So?
\geo
ebene(644.22,212.72)
x(7.27,16.32)
y(10.58,13.56)
form(.)
#//Eingabe war:
#
##961
#
#
#
#
#P[1]=[155,41]; P[2]=[226,46]; D=ab(1,2); A(2,1,Bew(1)); L(3,1,2); L(4,3,2);
#L(5,4,2);
#M(6,3,1,blue_angle); N(7,6,4); M(8,7,4,gruenerWinkel);
#A(7,8,ab(7,4,[1,7],"gespiegelt")); Q(14,12,5,ab(3,5,[1,5]),D); A(5,17);
#R(5,17); A(6,13,ab(6,13,[1,17],"gespiegelt"));
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(12.177705286725233,10.576038172617642,P1)
p(13.175234805160663,10.64628673025394,P2)
p(12.615633010450699,11.47504835542573,P3)
p(13.613162528886129,11.545296913062028,P4)
p(14.172764323596091,10.716535287890238,P5)
p(11.619395440158861,11.561712670683018,P6)
p(12.61692495859429,11.63196122831932,P7)
p(13.61552855483192,11.684789796171108,P8)
p(12.213767977102352,12.702172360756949,P9)
p(13.20834131473337,12.598134501909815,P10)
p(12.620955217200903,11.788827655018244,P11)
p(14.202914652364388,12.49409664306268,P12)
p(11.622351620963272,11.735999087166457,P13)
p(15.123388725089217,11.026879044530899,P14)
p(15.970487200561298,11.55831499820065,P15)
p(15.086700926462843,12.026205820631665,P16)
p(14.239602450990763,11.494769866961914,P17)
p(11.02797908401978,10.595539397092526,P18)
p(10.03340574638876,10.699577255939662,P19)
p(10.62079184392123,11.508884102831233,P20)
p(9.626218506290211,11.61292196167837,P21)
p(9.038832408757742,10.8036151147868,P22)
p(10.624822102527842,11.665750529530158,P23)
p(9.628584532236005,11.752414844787449,P24)
p(11.0640417743969,12.721673585231834,P25)
p(10.066512255961472,12.651425027595538,P26)
p(10.626114050671433,11.822663402423746,P27)
p(9.068982737526042,12.58117646995924,P28)
p(8.09927967373861,11.146019346825584,P29)
p(7.270691322367988,11.705877671737264,P30)
p(8.169837029947013,12.143527070848252,P31)
p(8.99842538131764,11.583668745936572,P32)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5) s(P17,P5)
s(P3,P6) s(P20,P6)
s(P6,P7) s(P4,P7) s(P13,P7)
s(P7,P8) s(P10,P8) s(P11,P8)
s(P9,P10)
s(P9,P11) s(P10,P11)
s(P10,P12) s(P8,P12) s(P16,P12) s(P17,P12)
s(P11,P13) s(P27,P13)
s(P15,P14) s(P16,P14) s(P5,P14)
s(P15,P16)
s(P16,P17) s(P14,P17)
s(P18,P19)
s(P18,P20) s(P19,P20)
s(P19,P21) s(P20,P21)
s(P19,P22) s(P21,P22) s(P32,P22)
s(P21,P23) s(P6,P23) s(P13,P23)
s(P23,P24) s(P26,P24) s(P27,P24)
s(P25,P26)
s(P25,P27) s(P26,P27)
s(P24,P28) s(P26,P28) s(P31,P28) s(P32,P28)
s(P22,P29) s(P30,P29) s(P31,P29)
s(P30,P31)
s(P29,P32) s(P31,P32)
pen(2)
color(#0000FF) m(P1,P3,MA10) m(P3,P6,MB10) b(P3,MA10,MB10)
color(#008000) m(P4,P7,MA11) m(P7,P8,MB11) f(P7,MA11,MB11)
pen(2)
color(red) s(P5,P17) abstand(P5,P17,A0) print(abs(P5,P17):,7.27,13.565) print(A0,8.18,13.565)
print(min=0.7810994785150557,7.27,13.354)
print(max=1.0000000000000024,7.27,13.143)
\geooff
\geoprint()
Dazu sagt das extra GAP-Programm 3-fach beweglich, also drei Winkel können beliebig variiert werden. Dabei habe ich noch nicht die Kante P5-P17 auf Länge 1 eingestellt, damit in der Mitte mehr Platz ist und ich habe auch noch nicht versteckte Beweglichkeiten gesucht (die durch Runden der Punktkoordinaten verloren gegangen sein könnten).
[Die Antwort wurde nach Beitrag No.963 begonnen.]
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4333
Wohnort: Raun
| Beitrag No.966, eingetragen 2017-04-30
|
Den #964 versuche ich auch gleich mit
\geo
ebene(471.51,553.52)
x(3.93,15.72)
y(5.45,19.29)
form(.)
#//Eingabe war:
#
##964
#
#
#
#
#P[1]=[0,0]; P[2]=[40,0]; D=ab(1,2); A(2,1,Bew(1)); L(3,1,2); L(4,3,2);
#L(5,4,2);
#M(6,1,3,blue_angle,1); L(7,1,6); M(9,6,1,gruenerWinkel); L(8,6,9); L(10,8,9);
#L(11,8,10); N(12,9,3); N(13,12,4); N(14,10,12); A(13,14,ab(14,13,[1,14]));
#Q(27,25,5,ab(3,5,[1,5]),D); Q(31,11,19,D,ab(4,1,[1,5])); A(5,30); R(5,30);
#A(11,33); L(35,21,20); L(36,15,21); Q(37,36,35,D,ab(1,5,[1,5])); L(41,39,40);
#L(42,36,37); A(41,42,ab(41,42,15,20,21,[35,42],"gespiegelt")); L(52,43,44);
#Q(53,34,52,D,ab(20,52,15,21,[35,52],"gespiegelt")); A(54,34); R(54,34);
#R(3,26); R(11,33); A(20,15); A(28,7,ab(34,21,[35,73])); A(74,1); A(73,6);
#A(1,6);
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(10,10,P1)
p(11,10,P2)
p(10.5,10.86602540378444,P3)
p(11.5,10.86602540378444,P4)
p(12,10,P5)
p(9.002404083032385,10.069299252878686,P6)
p(9.441187128059969,9.170706219633757,P7)
p(8.00263560793757,10.090816599522448,P8)
p(8.521154414300511,10.945882823535507,P9)
p(7.521385939205697,10.96740017017927,P10)
p(7.002867132842755,10.11233394616621,P11)
p(9.516200492387059,11.045297623663966,P12)
p(10.516200492387059,11.045297623663966,P13)
p(8.516432017292244,11.066814970307727,P14)
p(9.032632509679303,12.112112593971691,P15)
p(8.032632509679303,12.112112593971691,P16)
p(8.532632509679301,11.246087190187248,P17)
p(7.532632509679303,11.246087190187255,P18)
p(7.032632509679303,12.112112593971693,P19)
p(10.030228426646916,12.042813341093005,P20)
p(9.591445381619334,12.941406374337934,P21)
p(11.02999690174173,12.021295994449243,P22)
p(10.511478095378791,11.166229770436185,P23)
p(11.511246570473606,11.144712423792425,P24)
p(12.029765376836547,11.999778647805481,P25)
p(9.516432017292244,11.066814970307725,P26)
p(12.873370767071746,10.487055954921516,P27)
p(13.74674162101756,10.974111754063628,P28)
p(12.888253498927053,11.486945200934555,P29)
p(12.01488264498124,10.999889401792442,P30)
p(6.1443790564882,10.625167469599551,P31)
p(6.159261699170523,11.625056716939872,P32)
p(7.01774986699698,11.112223346631374,P33)
p(5.285890888661743,11.13800083990805,P34)
p(10.589041298586949,12.872107121459248,P35)
p(8.593849464651719,13.01070562721662,P36)
p(8.910347156969564,13.95929890716197,P37)
p(9.749694227778257,13.41570301431061,P38)
p(9.800788544976074,14.414396846648673,P39)
p(10.640135615784766,13.870800953797312,P40)
p(10.691229932982582,14.869494786135375,P41)
p(7.930592432518765,13.759097308975702,P42)
p(7.585287254627748,15.710459734883944,P43)
p(8.257057098939772,16.451219666489994,P44)
p(8.562689095660224,15.499069950016438,P45)
p(9.234458939972246,16.23982988162249,P46)
p(7.8909192513481985,14.758310018410388,P47)
p(8.7760994320882,14.293061646435694,P48)
p(9.005279186030222,15.266445764029093,P49)
p(9.733664682535391,14.581278216285535,P50)
p(9.962844436477415,15.554662333878934,P51)
p(7.279655257907297,16.6626094513575,P52)
p(4.69752615601781,11.946596499914232,P53)
p(5.691972874616565,12.051837764958737,P54)
p(5.103607906262236,12.860433253453081,P55)
p(4.10916118766348,12.755191988408576,P56)
p(6.098054624860991,12.965674518497586,P57)
p(5.7475435284985155,13.902233097192354,P58)
p(4.9283523580809945,13.328712542800467,P59)
p(4.841264573593841,14.324913184133887,P60)
p(4.022073403176324,13.751392629741998,P61)
p(3.9349856186891694,14.747593271075418,P62)
p(6.733882597961671,13.737505321603216,P63)
p(7.008569886880052,15.700054143016718,P64)
p(6.310515222822994,16.416098615091027,P65)
p(6.0394298517957585,15.45354330675024,P66)
p(5.341375187738689,16.169587778824557,P67)
p(6.737484515852815,14.737498834675929,P68)
p(5.86966377096663,14.240621430535647,P69)
p(5.60551947935266,15.205104604680102,P70)
p(4.9023246948278985,14.494107350805534,P71)
p(4.63818040321393,15.458590524949987,P72)
p(8.443591211092345,9.24000547251246,P73)
p(10.438783045027577,9.101406966755068,P74)
p(10.12228535270973,8.152813686809717,P75)
p(9.282938281901043,8.696409579661074,P76)
p(9.23184396470322,7.6977157473230164,P77)
p(8.39249689389453,8.241311640174377,P78)
p(8.341402576696709,7.242617807836316,P79)
p(11.10204007716053,8.353015284995983,P80)
p(11.44734525505154,6.401652859087741,P81)
p(10.775575410739512,5.660892927481693,P82)
p(10.469943414019067,6.613042643955248,P83)
p(9.798173569707041,5.872282712349196,P84)
p(11.141713258331093,7.353802575561298,P85)
p(10.256533077591092,7.8190509475359935,P86)
p(10.02735332364907,6.845666829942595,P87)
p(9.298967827143901,7.530834377686156,P88)
p(9.069788073201874,6.557450260092759,P89)
p(11.752977251771988,5.449503142614183,P90)
p(14.33510635366149,10.165516094057445,P91)
p(13.340659635062735,10.060274829012942,P92)
p(13.929024603417062,9.251679340518596,P93)
p(14.923471322015818,9.356920605563097,P94)
p(12.934577884818307,9.146438075474094,P95)
p(13.28508898118078,8.209879496779324,P96)
p(14.104280151598301,8.783400051171208,P97)
p(14.191367936085452,7.787199409837788,P98)
p(15.01055910650297,8.360719964229675,P99)
p(15.097646890990124,7.364519322896255,P100)
p(12.298749911717625,8.374607272368467,P101)
p(12.024062622799237,6.412058450954964,P102)
p(12.722117286856294,5.696013978880653,P103)
p(12.99320265788353,6.658569287221441,P104)
p(13.691257321940597,5.942524815147122,P105)
p(12.295147993826475,7.3746137592957535,P106)
p(13.162968738712664,7.871491163436032,P107)
p(13.42711303032663,6.907007989291576,P108)
p(14.130307814851395,7.618005243166142,P109)
p(14.394452106465359,6.6535220690216885,P110)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5) s(P30,P5)
s(P1,P7) s(P6,P7)
s(P6,P8) s(P9,P8)
s(P6,P9)
s(P8,P10) s(P9,P10)
s(P8,P11) s(P10,P11) s(P33,P11)
s(P9,P12) s(P3,P12)
s(P12,P13) s(P4,P13) s(P24,P13) s(P26,P13)
s(P10,P14) s(P12,P14) s(P18,P14) s(P26,P14)
s(P15,P16)
s(P15,P17) s(P16,P17)
s(P16,P18) s(P17,P18)
s(P16,P19) s(P18,P19)
s(P15,P21) s(P20,P21)
s(P20,P22) s(P23,P22)
s(P20,P23)
s(P22,P24) s(P23,P24)
s(P22,P25) s(P24,P25) s(P29,P25) s(P30,P25)
s(P17,P26) s(P23,P26)
s(P28,P27) s(P29,P27) s(P5,P27)
s(P28,P29)
s(P29,P30) s(P27,P30)
s(P11,P31) s(P32,P31) s(P33,P31)
s(P19,P32)
s(P19,P33) s(P32,P33)
s(P32,P34) s(P31,P34)
s(P21,P35) s(P20,P35) s(P38,P35) s(P40,P35)
s(P15,P36) s(P21,P36)
s(P36,P37)
s(P37,P38)
s(P37,P39) s(P38,P39)
s(P38,P40) s(P39,P40)
s(P39,P41) s(P40,P41) s(P50,P41) s(P51,P41)
s(P36,P42) s(P37,P42) s(P47,P42) s(P48,P42)
s(P43,P44)
s(P43,P45) s(P44,P45)
s(P44,P46) s(P45,P46) s(P49,P46) s(P51,P46)
s(P43,P47) s(P45,P47)
s(P47,P48)
s(P48,P49)
s(P48,P50) s(P49,P50)
s(P49,P51) s(P50,P51)
s(P43,P52) s(P44,P52) s(P64,P52) s(P65,P52)
s(P34,P53) s(P54,P53)
s(P34,P54)
s(P54,P55) s(P53,P55)
s(P53,P56) s(P55,P56) s(P59,P56) s(P61,P56)
s(P54,P57) s(P55,P57)
s(P57,P58)
s(P58,P59)
s(P58,P60) s(P59,P60)
s(P59,P61) s(P60,P61)
s(P60,P62) s(P61,P62) s(P71,P62) s(P72,P62)
s(P57,P63) s(P58,P63) s(P68,P63) s(P69,P63)
s(P64,P65)
s(P64,P66) s(P65,P66)
s(P65,P67) s(P66,P67) s(P70,P67) s(P72,P67)
s(P64,P68) s(P66,P68)
s(P68,P69)
s(P69,P70)
s(P69,P71) s(P70,P71)
s(P70,P72) s(P71,P72)
s(P7,P73) s(P76,P73) s(P78,P73) s(P6,P73)
s(P7,P74) s(P1,P74)
s(P74,P75)
s(P75,P76)
s(P75,P77) s(P76,P77)
s(P76,P78) s(P77,P78)
s(P77,P79) s(P78,P79) s(P88,P79) s(P89,P79)
s(P74,P80) s(P75,P80) s(P85,P80) s(P86,P80)
s(P81,P82)
s(P81,P83) s(P82,P83)
s(P82,P84) s(P83,P84) s(P87,P84) s(P89,P84)
s(P81,P85) s(P83,P85)
s(P85,P86)
s(P86,P87)
s(P86,P88) s(P87,P88)
s(P87,P89) s(P88,P89)
s(P81,P90) s(P82,P90) s(P102,P90) s(P103,P90)
s(P28,P91) s(P92,P91)
s(P28,P92)
s(P91,P93) s(P92,P93)
s(P91,P94) s(P93,P94) s(P97,P94) s(P99,P94)
s(P92,P95) s(P93,P95)
s(P95,P96)
s(P96,P97)
s(P96,P98) s(P97,P98)
s(P97,P99) s(P98,P99)
s(P98,P100) s(P99,P100) s(P109,P100) s(P110,P100)
s(P95,P101) s(P96,P101) s(P106,P101) s(P107,P101)
s(P102,P103)
s(P102,P104) s(P103,P104)
s(P103,P105) s(P104,P105) s(P108,P105) s(P110,P105)
s(P102,P106) s(P104,P106)
s(P106,P107)
s(P107,P108)
s(P107,P109) s(P108,P109)
s(P108,P110) s(P109,P110)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P6,MA11) m(P6,P9,MB11) b(P6,MA11,MB11)
pen(2)
color(red) s(P5,P30) abstand(P5,P30,A0) print(abs(P5,P30):,3.93,19.288) print(A0,5.56,19.288)
color(red) s(P54,P34) abstand(P54,P34,A1) print(abs(P54,P34):,3.93,18.913) print(A1,5.56,18.913)
color(red) s(P3,P26) abstand(P3,P26,A2) print(abs(P3,P26):,3.93,18.538) print(A2,5.56,18.538)
color(red) s(P11,P33) abstand(P11,P33,A3) print(abs(P11,P33):,3.93,18.163) print(A3,5.56,18.163)
print(min=0.9999999999999876,3.93,17.788)
print(max=1.0000000000000109,3.93,17.413)
\geooff
\geoprint()
Die Eingabe ist nicht so gut zum Nachmachen gelungen. Das extra GAP-Programm sagt "einfach beweglich", doch das kann eine falsche Beweglichkeit sein (nicht statisch bestimmt aber Bewegungsspielraum nur 0), weil eine von P15 auf P21 einwirkende Kraft nicht von den Kanten P35-P21 und P36-P21 aufgenommen werden kann. Versteckte Beweglichkeit wegen gerundeter Punktkoordinaten habe ich nicht gesucht. Also allles nur schnell schnell eingegeben wegen der Neugier, ob sich die Winkel einstellen lassen.
EDIT: Mit Streichholzgraph-964.htm mit Buttons zum Drehen und Vergrößern, Verkleinern kann man sich den geringen Abstand P12-P26 "aus der Nähe" anschauen.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.967, vom Themenstarter, eingetragen 2017-04-30
|
Hier ist mein Versuch mit Handjustierung der Winkel. Das große gleichseitige Dreieck hat Doppelkite-Kantenlänge. Noch nicht perfekt, aber es geht. Unsere Winkel stimmen fast überein.
\geo
ebene(642.25,462.2)
x(7.28,20.12)
y(10.11,19.35)
form(.)
#//Eingabe war:
#
##934-1m
#
#
#
#
#D=50; P[1]=[2*D,D]; P[2]=[3*D,D]; A(2,1,Bew(1)); L(3,1,2); L(4,3,2); L(5,4,2);
#M(6,1,3,blue_angle,1); L(7,1,6); M(9,6,1,gruenerWinkel); L(8,6,9); L(10,8,9);
#L(11,8,10); N(12,9,3); N(13,12,4); N(14,10,12); A(13,14,ab(14,13,[1,14]));
#Q(27,25,5,ab(3,5,[1,5]),D); Q(31,11,19,D,ab(4,1,[1,5])); A(5,30); R(5,30);
#A(11,33); R(11,33);
#
#Z(15,20); L(35,21,20); L(36,15,21); Q(37,36,35,ab(36,35,[20,21]),ab(1,2,3));
#L(41,39,37); L(42,38,41); A(38,41);
#A(40,42,ab(40,42,[36,42],"gespiegelt"),Bew(2));
#A(43,40,ab(43,40,[42,47],"gespiegelt"),Bew(2)); A(44,49);
#
#//A(5,48,ab(5,48,[35,52],"gespiegelt"),Bew(2)); H(70,54,53,2); A(53,70); A(54,70); L(71,70,53); L(72,54,70); A(71,72);
#//L(73,72,71); R(48,73);
#
#Q(53,48,28,5.87336309321770944081*D,5.87336309321770944081*D); L(54,28,53);
#R(48,54);
#
#
#
#
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(12,11,P1)
p(13,11,P2)
p(12.5,11.866025403784437,P3)
p(13.5,11.866025403784437,P4)
p(14,11,P5)
p(11.001150867920295,10.952037396404902,P6)
p(11.542112267105145,10.11098997527339,P7)
p(10.001382282639158,10.97354962281118,P8)
p(10.519896709839525,11.828618502367135,P9)
p(9.520128124558388,11.850130728773411,P10)
p(9.001613697358023,10.995061849217457,P11)
p(11.50731431108569,11.9867528779762,P12)
p(12.50731431108569,11.986752877976198,P13)
p(10.507545725804553,12.008265104382476,P14)
p(11.014860036890244,12.995017982358672,P15)
p(10.014860036890243,12.995017982358672,P16)
p(10.514860036890244,12.128992578574234,P17)
p(9.514860036890243,12.128992578574232,P18)
p(9.014860036890244,12.995017982358672,P19)
p(12.01370916896995,13.04298058595377,P20)
p(11.4727477697851,13.884028007085284,P21)
p(13.013477754251085,13.021468359547494,P22)
p(12.49496332705072,12.166399479991538,P23)
p(13.494731912331856,12.144887253585262,P24)
p(14.01324633953222,12.999956133141218,P25)
p(11.507545725804553,12.008265104382462,P26)
p(14.869317993760411,11.494253200014299,P27)
p(15.738635987520848,11.988506400028552,P28)
p(14.875941163526534,12.494231266584885,P29)
p(14.006623169766097,11.99997806657063,P30)
p(8.138918873363721,11.50078671577381,P31)
p(8.145542043129819,12.500764782344396,P32)
p(9.008236867124145,11.995039915788084,P33)
p(7.276224049369395,12.006511582330122,P34)
p(12.471596901864805,13.931990610680382,P35)
p(10.473898637705393,13.836065403490188,P36)
p(12.17544502760374,14.887131473261213,P37)
p(10.444160276441192,14.835623120617779,P38)
p(11.324671840485617,14.36159842569819,P39)
p(13.150697215921856,14.666036088459254,P40)
p(11.294933464326846,15.361156142382647,P41)
p(10.414421923008042,15.835180825067859,P42)
p(11.900147227569525,17.174068523034553,P43)
p(12.31679532994367,15.2179488030818,P44)
p(11.157284568001671,16.50462467249907,P45)
p(12.108471293330826,16.19600866616245,P46)
p(11.365608623787477,15.526564826696477,P47)
p(13.86354012637544,17.55497306921294,P48)
p(13.211716704467513,15.66417266329139,P49)
p(12.881843682597282,17.364520801009725,P50)
p(12.555931954768917,16.419120583391017,P51)
p(13.53762840695872,16.60957287599461,P52)
p(19.621310636491415,16.39545904272999,P53)
p(13.863440370151721,17.55447760201761,P54)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5) s(P30,P5)
s(P1,P6)
s(P1,P7) s(P6,P7)
s(P6,P8) s(P9,P8)
s(P6,P9)
s(P8,P10) s(P9,P10)
s(P8,P11) s(P10,P11) s(P33,P11)
s(P9,P12) s(P3,P12)
s(P12,P13) s(P4,P13) s(P24,P13) s(P26,P13)
s(P10,P14) s(P12,P14) s(P18,P14) s(P26,P14)
s(P15,P16)
s(P15,P17) s(P16,P17)
s(P16,P18) s(P17,P18)
s(P16,P19) s(P18,P19)
s(P15,P21) s(P20,P21)
s(P20,P22) s(P23,P22)
s(P20,P23)
s(P22,P24) s(P23,P24)
s(P22,P25) s(P24,P25) s(P29,P25) s(P30,P25)
s(P17,P26) s(P23,P26)
s(P28,P27) s(P29,P27) s(P5,P27)
s(P28,P29)
s(P29,P30) s(P27,P30)
s(P11,P31) s(P32,P31) s(P33,P31)
s(P19,P32)
s(P19,P33) s(P32,P33)
s(P32,P34) s(P31,P34)
s(P21,P35) s(P20,P35) s(P37,P35)
s(P15,P36) s(P21,P36) s(P38,P36) s(P39,P36)
s(P39,P37)
s(P41,P38)
s(P38,P39)
s(P37,P40) s(P35,P40) s(P44,P40) s(P49,P40)
s(P39,P41) s(P37,P41)
s(P38,P42) s(P41,P42) s(P45,P42) s(P47,P42)
s(P45,P43) s(P46,P43) s(P50,P43) s(P51,P43)
s(P46,P44) s(P49,P44)
s(P47,P45)
s(P45,P46)
s(P44,P47) s(P46,P47)
s(P50,P48) s(P52,P48)
s(P51,P49)
s(P52,P50)
s(P50,P51)
s(P49,P52) s(P51,P52)
s(P48,P53) s(P28,P53)
s(P28,P54) s(P53,P54)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) b(P1,MA10,MB10)
color(#008000) m(P1,P6,MA11) m(P6,P9,MB11) b(P6,MA11,MB11)
pen(2)
color(red) s(P5,P30) abstand(P5,P30,A0) print(abs(P5,P30):,7.28,19.355) print(A0,8.58,19.355)
color(red) s(P11,P33) abstand(P11,P33,A1) print(abs(P11,P33):,7.28,19.055) print(A1,8.58,19.055)
color(red) s(P48,P54) abstand(P48,P54,A2) print(abs(P48,P54):,7.28,18.755) print(A2,8.58,18.755)
print(min=0.9999999870952145,7.28,18.455)
print(max=5.8733630932177086,7.28,18.155)
\geooff
\geoprint()
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_mit_200_starr_extrem_-_Slash.png
\quoteon(2017-04-28 03:58 - Slash in Beitrag No. 956)
Existiert noch ein extremerer starrer Streichholzgraph mit kleineren Winkeln und Abständen als 1,29° und 0.02256318256793?
\quoteoff
Das schöne ist, dass dieser Graph mit ca. 0,0215 und ca. 1,23° noch extremer ist als der vermeintliche Rekordgraph von vorher. :-)
EDIT: Also wenn der wieder nicht starr ist, fress ich einen Besen.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.968, eingetragen 2017-04-30
|
\quoteon(2017-04-30 07:50 - StefanVogel in Beitrag No. 965)
\quoteon(2017-04-29 20:47 - Slash in Beitrag No. 961)
\quoteon(2017-04-29 12:12 - haribo in Beitrag No. 960)
dann kann man auch die beiden mittleren dreiecke (oben+unten) ganz rausnehmen?
\quoteoff
Dann wird der 2/4 aus #934 noch beweglicher, also doppelt beweglich. Aber ich bin mir auch hier nicht ganz sicher.
\quoteoff
So?
\quoteoff
#965
na, ich meinte ansich schon p25 - p9 sowie p18-p1 jeweils zusammenzubringen...
könnte aber auch trivial enden
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.969, vom Themenstarter, eingetragen 2017-04-30
|
\quoteon(2017-04-30 18:27 - haribo in Beitrag No. 968)
\quoteon(2017-04-30 07:50 - StefanVogel in Beitrag No. 965)
\quoteon(2017-04-29 20:47 - Slash in Beitrag No. 961)
\quoteon(2017-04-29 12:12 - haribo in Beitrag No. 960)
dann kann man auch die beiden mittleren dreiecke (oben+unten) ganz rausnehmen?
\quoteoff
Dann wird der 2/4 aus #934 noch beweglicher, also doppelt beweglich. Aber ich bin mir auch hier nicht ganz sicher.
\quoteoff
So?
\quoteoff
#965
na, ich meinte ansich schon p25 - p9 sowie p18-p1 jeweils zusammenzubringen...
könnte aber auch trivial enden
\quoteoff
Das endet gar nicht, da man seitlich keine Dreiecke mehr hinbekommt. Die äußeren Punkte P5,P12 und P22,P28 haben dann einen Abstand zwischen 3 und ca. 3,46.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.970, vom Themenstarter, eingetragen 2017-05-02
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.971, vom Themenstarter, eingetragen 2017-05-04
|
\quoteon(2017-04-30 11:55 - Slash in Beitrag No. 967)
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_4_mit_200_starr_extrem_-_Slash.png
\quoteon(2017-04-28 03:58 - Slash in Beitrag No. 956)
Existiert noch ein extremerer starrer Streichholzgraph mit kleineren Winkeln und Abständen als 1,29° und 0.02256318256793?
\quoteoff
Das schöne ist, dass dieser Graph mit ca. 0,0215 und ca. 1,23° noch extremer ist als der vermeintliche Rekordgraph von vorher. :-)
\quoteoff
Die kurze Diagonale der schmalen Raute des 4/11-Kerns ist mit einer Länge von 0,004769184654615 natürlich noch extremer, aber es ist halt kein 4-regulärer sondern ein (3, 4, 11)-regulärer. Nachfolgend soweit reduziert, dass nur eine entfernte Kante Beweglichkeit erzeugt.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_starr_extrem_2_3_4_11_minimal.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.972, vom Themenstarter, eingetragen 2017-05-04
|
Es gibt einen einfachen (2, 4)-regulären starren Graphen der einen unendlich minimalen Knotenabstand und Winkel besitzt. Man muss nur bei folgendem Graph die beiden Arme verlängern. Allerdings werden so auch Knoten- und Kantenanzahl unendlich groß. Ein Rekord muss also auch hier auf die Minimalität der Knoten- und Kantenanzahl setzen.
\geo
ebene(416.23,219.48)
x(7.7,16.1)
y(11.63,16.05)
form(.)
#//Eingabe war:
#
#Fig.2b (2, 4)-regular matchstick graph with 30 vertices. This
#graph is rigid. Only the red dotted underline edges change their length while
#animation.
#
#
#
#P[1]=[-61.38,113.44]; P[2]=[-13.06,102.47]; D=ab(1,2); A(2,1,Bew(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,blue_angle,2); L(12,10,8);
#N(13,12,3); L(14,12,13); L(15,14,13); L(16,14,15); A(6,15,Bew(3)); R(6,15);
#A(7,16,ab(7,16,[1,16],"gespiegelt"),Bew(2)); R(22,30); W();
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(8.761241372242813,12.289422918422538,P1)
p(9.736425746521524,12.068028618218948,P2)
p(9.440566647611554,13.023260209819739,P3)
p(10.415751021890266,12.80186590961615,P4)
p(10.711610120800236,11.846634318015358,P5)
p(11.390935396168977,12.58047160941256,P6)
p(11.686794495078948,11.625240017811768,P7)
p(9.228217929959953,13.173692614014698,P8)
p(8.228929630921842,13.135971328173472,P9)
p(8.695906188638983,14.020241023765632,P10)
p(7.69661788960087,13.982519737924408,P11)
p(9.695194487677096,14.057962309606856,P12)
p(10.389614449305455,13.33839235686281,P13)
p(10.665570327367586,14.299562660900008,P14)
p(11.359990288995947,13.579992708155963,P15)
p(11.635946167058078,14.54116301219316,P16)
p(14.587411687703295,12.39102060117233,P17)
p(13.620539290161846,12.13576040671881,P18)
p(13.882913675960866,13.100726562434433,P19)
p(12.916041278419415,12.845466367980913,P20)
p(12.653666892620397,11.88050021226529,P21)
p(11.949168880877966,12.590206173527392,P22)
p(14.089888353536221,13.258471194554616,P23)
p(15.089884271016702,13.255613744227695,P24)
p(14.592360936849627,14.123064337609978,P25)
p(15.59235685433011,14.120206887283057,P26)
p(13.592365019369147,14.125921787936903,P27)
p(12.923455581839145,13.382577880728874,P28)
p(12.614155593213614,14.33354240006503,P29)
p(11.945246155683611,13.590198492857002,P30)
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(P15,P6)
s(P6,P7) s(P5,P7) s(P21,P7) s(P22,P7)
s(P1,P8)
s(P1,P9) s(P8,P9)
s(P9,P10) s(P8,P10)
s(P9,P11) s(P10,P11)
s(P10,P12) s(P8,P12)
s(P12,P13) s(P3,P13)
s(P12,P14) s(P13,P14)
s(P14,P15) s(P13,P15)
s(P14,P16) s(P15,P16) s(P29,P16) s(P30,P16)
s(P17,P18)
s(P17,P19) s(P18,P19)
s(P18,P20) s(P19,P20)
s(P18,P21) s(P20,P21)
s(P20,P22) s(P21,P22) s(P30,P22)
s(P17,P23)
s(P17,P24) s(P23,P24)
s(P23,P25) s(P24,P25)
s(P24,P26) s(P25,P26)
s(P23,P27) s(P25,P27)
s(P19,P28) s(P27,P28)
s(P27,P29) s(P28,P29)
s(P28,P30) s(P29,P30)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P8,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P6,P15) abstand(P6,P15,A0) print(abs(P6,P15):,7.7,16.055) print(A0,9.01,16.055)
color(red) s(P22,P30) abstand(P22,P30,A1) print(abs(P22,P30):,7.7,15.752) print(A1,9.01,15.752)
print(min=0.9999999999999983,7.7,15.449)
print(max=1.0000000000000016,7.7,15.147)
\geooff
\geoprint()
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.973, vom Themenstarter, eingetragen 2017-05-04
|
Den hatten wir noch nicht.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_4_5_mit_121_neu_-_Slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.974, vom Themenstarter, eingetragen 2017-05-07
|
Nur so. Mit dem ersten Graph kann man 2/4 mit zwei 2er-Knoten basteln. In den zweiten Graph passt seitlich ein Kite rein und ist dann auch ein 2/4 mit 2.
\geo
ebene(248.19,304.96)
x(8.82,13.78)
y(10.46,16.55)
form(.)
#//Eingabe war:
#
#(2, 4)-regular matchstick graph.
#
#
#
#P[1]=[46.506054558761406,22.77681695452111];
#P[2]=[96.10659433379371,29.084467390732556]; D=ab(1,2); A(2,1,Bew(1));
#L(3,1,2); L(4,3,2); L(5,4,2); M(6,1,3,blue_angle,2);
#N(10,6,3); N(11,10,4); L(12,10,11); L(13,12,11); N(14,8,12);
#A(9,14,ab(9,14,[1,14],"gespiegelt"),Bew(2)); R(26,13); A(26,13); N(27,26,13);
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(10.930121091175229,10.455536339090422,P1)
p(11.922131886675874,10.58168934781465,P2)
p(11.316874778606529,11.377719393184506,P3)
p(12.308885574107174,11.503872401908735,P4)
p(12.91414268217652,10.70784235653888,P5)
p(11.073641515199515,11.44518369440841,P6)
p(10.144821552693909,11.074652349916363,P7)
p(10.288341976718195,12.064299705234351,P8)
p(9.359522014212589,11.693768360742304,P9)
p(11.460395202630815,12.367366748502494,P10)
p(12.452405998131463,12.493519757226723,P11)
p(11.847148890062117,13.289549802596579,P12)
p(12.839159685562763,13.415702811320807,P13)
p(10.986650550301558,12.780096559139123,P14)
p(8.818034068934931,13.61907114345441,P15)
p(9.314862819885755,14.48691974328542,P16)
p(9.818027378502752,13.622729123716008,P17)
p(10.314856129453577,14.490577723547016,P18)
p(9.811691570836581,15.354768343116428,P19)
p(9.787086615157122,13.372216606003128,P20)
p(9.08877804157376,12.656419752098357,P21)
p(10.057830587795952,12.409565214647076,P22)
p(10.787079924724944,13.375874586264727,P23)
p(11.283908675675772,14.243723186095735,P24)
p(11.787073234292755,13.379532566526342,P25)
p(12.283901985243592,14.247381166357334,P26)
p(13.281785418642464,14.312409262962401,P27)
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(P21,P9) s(P22,P9)
s(P6,P10) s(P3,P10)
s(P10,P11) s(P4,P11)
s(P10,P12) s(P11,P12)
s(P12,P13) s(P11,P13)
s(P8,P14) s(P12,P14) s(P22,P14) s(P25,P14)
s(P15,P16)
s(P15,P17) s(P16,P17)
s(P16,P18) s(P17,P18)
s(P16,P19) s(P18,P19)
s(P15,P20)
s(P15,P21) s(P20,P21)
s(P20,P22) s(P21,P22)
s(P17,P23) s(P20,P23)
s(P18,P24) s(P23,P24)
s(P23,P25) s(P24,P25)
s(P24,P26) s(P25,P26) s(P13,P26)
s(P26,P27) s(P13,P27)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P26,P13) abstand(P26,P13,A0) print(abs(P26,P13):,8.82,16.555) print(A0,10.12,16.555)
print(min=0.9999999999999782,8.82,16.255)
print(max=1.0000000000000016,8.82,15.955)
\geooff
\geoprint()
\geo
ebene(402.69,403.45)
x(8.75,16.8)
y(10.46,18.52)
form(.)
#//Eingabe war:
#
#(2, 4)-regular matchstick graph.
#
#
#
#P[1]=[46.506054558761406,22.77681695452111];
#P[2]=[96.10659433379371,29.084467390732556]; D=ab(1,2); A(2,1,Bew(1));
#L(3,1,2); L(4,3,2); L(5,4,2); M(6,1,3,blue_angle,2);
#N(10,6,3); N(11,10,4); L(12,10,11); L(13,12,11); N(14,8,12);
#A(9,14,ab(9,14,[1,14],"gespiegelt"),Bew(2)); R(31,5);
#A(26,13,ab(26,13,[1,27],"gespiegelt"),Bew(2));
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(10.930121091175229,10.455536339090422,P1)
p(11.922131886675874,10.58168934781465,P2)
p(11.316874778606529,11.377719393184506,P3)
p(12.308885574107174,11.503872401908735,P4)
p(12.91414268217652,10.70784235653888,P5)
p(11.088841890910443,11.442859846220387,P6)
p(10.15443425211474,11.086654337335084,P7)
p(10.313155051849954,12.073977844465048,P8)
p(9.378747413054251,11.717772335579744,P9)
p(11.475595578341744,12.36504290031447,P10)
p(12.46760637384239,12.4911959090387,P11)
p(11.862349265773044,13.287225954408553,P12)
p(12.854360061273692,13.413378963132782,P13)
p(10.977445165917922,12.821452689761909,P14)
p(8.748373117688368,13.61583140940805,P15)
p(9.217966233108548,14.498714360851768,P16)
p(9.747768739916902,13.650593317733756,P17)
p(10.21736185533708,14.533476269177475,P18)
p(9.687559348528728,15.381597312295487,P19)
p(9.727850379439278,13.414276717790758,P20)
p(9.06356026537131,12.666801872493897,P21)
p(10.043037527122218,12.465247180876606,P22)
p(10.727246001667812,13.449038626116465,P23)
p(11.19683911708799,14.331921577560184,P24)
p(11.72664162389634,13.483800534442176,P25)
p(12.196234739316523,14.366683485885886,P26)
p(16.302221682901845,14.16423103961062,P27)
p(15.832628567481663,13.281348088166904,P28)
p(15.302826060673311,14.129469131284914,P29)
p(14.833232945253133,13.246586179841199,P30)
p(15.363035452061483,12.398465136723184,P31)
p(15.322744421150935,14.365785731227913,P32)
p(15.987034535218902,15.113260576524775,P33)
p(15.007557273467993,15.314815268142066,P34)
p(15.671847387535962,16.062290113438927,P35)
p(14.323348798922403,14.331023822902207,P36)
p(13.853755683502223,13.448140871458488,P37)
p(13.32395317669387,14.296261914576501,P38)
p(14.07314963467229,14.958609759256763,P39)
p(14.120473709414984,17.32452610992825,P40)
p(13.128462913914339,17.198373101204023,P41)
p(13.733720021983682,16.402343055834166,P42)
p(12.741709226483037,16.27619004710994,P43)
p(12.136452118413692,17.072220092479792,P44)
p(13.961752909679772,16.337202602798286,P45)
p(14.896160548475475,16.69340811168359,P46)
p(14.737439748740258,15.706084604553624,P47)
p(13.574999222248469,15.4150195487042,P48)
p(12.582988426747821,15.288866539979974,P49)
p(13.188245534817163,14.492836494610122,P50)
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(P21,P9) s(P22,P9)
s(P6,P10) s(P3,P10)
s(P10,P11) s(P4,P11)
s(P10,P12) s(P11,P12)
s(P12,P13) s(P11,P13) s(P37,P13) s(P38,P13)
s(P8,P14) s(P12,P14) s(P22,P14) s(P25,P14)
s(P15,P16)
s(P15,P17) s(P16,P17)
s(P16,P18) s(P17,P18)
s(P16,P19) s(P18,P19)
s(P15,P20)
s(P15,P21) s(P20,P21)
s(P20,P22) s(P21,P22)
s(P17,P23) s(P20,P23)
s(P18,P24) s(P23,P24)
s(P23,P25) s(P24,P25)
s(P24,P26) s(P25,P26) s(P49,P26) s(P50,P26)
s(P27,P28)
s(P27,P29) s(P28,P29)
s(P28,P30) s(P29,P30)
s(P28,P31) s(P30,P31)
s(P27,P32)
s(P27,P33) s(P32,P33)
s(P32,P34) s(P33,P34)
s(P33,P35) s(P34,P35) s(P46,P35) s(P47,P35)
s(P29,P36) s(P32,P36)
s(P30,P37) s(P36,P37)
s(P36,P38) s(P37,P38)
s(P34,P39) s(P38,P39) s(P47,P39) s(P50,P39)
s(P40,P41)
s(P40,P42) s(P41,P42)
s(P41,P43) s(P42,P43)
s(P41,P44) s(P43,P44)
s(P40,P45)
s(P40,P46) s(P45,P46)
s(P45,P47) s(P46,P47)
s(P42,P48) s(P45,P48)
s(P43,P49) s(P48,P49)
s(P48,P50) s(P49,P50)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P31,P5) abstand(P31,P5,A0) print(abs(P31,P5):,8.75,18.525) print(A0,10.05,18.525)
print(min=0.9999999999999971,8.75,18.225)
print(max=1.000000000000003,8.75,17.925)
\geooff
\geoprint()
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4333
Wohnort: Raun
| Beitrag No.975, eingetragen 2017-05-07
|
Auch beim zweiten Graph geht der Winkel mit Button "Feinjustieren(1)" einzustellen. Normalerweise wird dabei der zuerst aufgeführte farbige Abstand (hier P31-P5) auf die nächstgelegene ganzzahlige Länge gebracht (allgemein Länge 1, diesmal Länge 3). Das ist für das Einfügen von Kites nicht geeignet und extra für diesen Zweck kann nach den Punktnummern 31 und 5 als drittes eine Linienfarbe angegeben werden ("" für unverändert rot gestrichelt) und danach als viertes Funktionsargument ein gewünschter Abstand. Dann stellt Button "Feinjustieren(1)" den ersten farbigen Abstand (fast) auf die gewünschte Länge ein.
\geo
ebene(402.69,403.44)
x(8.75,16.8)
y(10.46,18.52)
form(.)
#//Eingabe war:
#
#(2, 4)-regular matchstick graph with 53 edges. This graph is
#rigid.
#
#
#
#P[1]=[46.506054558761406,22.77681695452111];
#P[2]=[96.10659433379371,29.084467390732556]; D=ab(1,2); A(2,1,Bew(1));
#L(3,1,2); L(4,3,2); L(5,4,2); M(6,1,3,blue_angle,2);
#N(10,6,3); N(11,10,4); L(12,10,11); L(13,12,11); N(14,8,12); //N(15,9,14); L(16,9,15); L(17,15,14);
#A(9,14,ab(9,14,[1,14],"gespiegelt"),Bew(2));
#R(31,5,"",2.97558430669502005372*D);
#A(26,13,ab(26,13,[1,27],"gespiegelt"),Bew(2));
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(10.930121091175229,10.455536339090422,P1)
p(11.922131886675874,10.58168934781465,P2)
p(11.316874778606529,11.377719393184506,P3)
p(12.308885574107174,11.503872401908735,P4)
p(12.91414268217652,10.70784235653888,P5)
p(11.088803468660155,11.442866022162764,P6)
p(10.154409692466604,11.086624150661452,P7)
p(10.313092069951532,12.073953833733793,P8)
p(9.378698293757981,11.717711962232482,P9)
p(11.475557156091456,12.365049076256847,P10)
p(12.467567951592104,12.491202084981076,P11)
p(11.862310843522758,13.287232130350931,P12)
p(12.854321639023404,13.413385139075158,P13)
p(10.977458203158402,12.821361112964972,P14)
p(8.748517045389633,13.61583513900603,P15)
p(9.218165596477435,14.49868860275929,P16)
p(9.747914848362942,13.65053429479007,P17)
p(10.217563399450743,14.53338775854333,P18)
p(9.687814147565238,15.38154206651255,P19)
p(9.727973802780678,13.414180829850434,P20)
p(9.063607669573807,12.666773550619256,P21)
p(10.043064426964852,12.46511924146366,P22)
p(10.727371605753987,13.448879985634473,P23)
p(11.197020156841788,14.331733449387734,P24)
p(11.726769408727296,13.48357914141851,P25)
p(12.196417959815093,14.366432605171774,P26)
p(16.302222553448864,14.1639826052409,P27)
p(15.832574002361063,13.281129141487643,P28)
p(15.302824750475558,14.12928344945686,P29)
p(14.833176199387756,13.246429985703603,P30)
p(15.362925451273261,12.398275677734382,P31)
p(15.322765796057823,14.365636914396497,P32)
p(15.987131929264692,15.113044193627676,P33)
p(15.007675171873647,15.31469850278327,P34)
p(15.672041305080516,16.06210578201445,P35)
p(14.323367993084513,14.330937758612457,P36)
p(13.853719441996711,13.448084294859198,P37)
p(13.323970190111204,14.296238602828417,P38)
p(14.073281395680096,14.958456631281958,P39)
p(14.120618507663272,17.324281405156505,P40)
p(13.128607712162626,17.19812839643228,P41)
p(13.73386482023197,16.402098351062424,P42)
p(12.741854024731323,16.275945342338197,P43)
p(12.136596916661981,17.07197538770805,P44)
p(13.961936130178344,16.336951722084166,P45)
p(14.896329906371895,16.69319359358548,P46)
p(14.737647528886967,15.705863910513138,P47)
p(13.575182442747042,15.414768667990081,P48)
p(12.583171647246395,15.288615659265856,P49)
p(13.188428755315744,14.492585613895997,P50)
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(P21,P9) s(P22,P9)
s(P6,P10) s(P3,P10)
s(P10,P11) s(P4,P11)
s(P10,P12) s(P11,P12)
s(P12,P13) s(P11,P13) s(P37,P13) s(P38,P13)
s(P8,P14) s(P12,P14) s(P22,P14) s(P25,P14)
s(P15,P16)
s(P15,P17) s(P16,P17)
s(P16,P18) s(P17,P18)
s(P16,P19) s(P18,P19)
s(P15,P20)
s(P15,P21) s(P20,P21)
s(P20,P22) s(P21,P22)
s(P17,P23) s(P20,P23)
s(P18,P24) s(P23,P24)
s(P23,P25) s(P24,P25)
s(P24,P26) s(P25,P26) s(P49,P26) s(P50,P26)
s(P27,P28)
s(P27,P29) s(P28,P29)
s(P28,P30) s(P29,P30)
s(P28,P31) s(P30,P31)
s(P27,P32)
s(P27,P33) s(P32,P33)
s(P32,P34) s(P33,P34)
s(P33,P35) s(P34,P35) s(P46,P35) s(P47,P35)
s(P29,P36) s(P32,P36)
s(P30,P37) s(P36,P37)
s(P36,P38) s(P37,P38)
s(P34,P39) s(P38,P39) s(P47,P39) s(P50,P39)
s(P40,P41)
s(P40,P42) s(P41,P42)
s(P41,P43) s(P42,P43)
s(P41,P44) s(P43,P44)
s(P40,P45)
s(P40,P46) s(P45,P46)
s(P45,P47) s(P46,P47)
s(P42,P48) s(P45,P48)
s(P43,P49) s(P48,P49)
s(P48,P50) s(P49,P50)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P31,P5) abstand(P31,P5,A0) print(abs(P31,P5):,8.75,18.524) print(A0,10.05,18.524)
print(min=0.9999999999999974,8.75,18.224)
print(max=1.0000000000000062,8.75,17.924)
\geooff
\geoprint()
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.976, eingetragen 2017-05-08
|
mein weg wäre:
Q(k,i,j,a*D,b*D)
Q(99,5,31,0.1*D,3.8541*D; mit 3.8541 als kite spannweite
und dann
R(99,5); (oder R,99,31) weiss nicht genau welches richtig ist
also eine linie mit kitespannweite zeichnen zu punkt 99 und diesen dann mit einer kleinen messlinie mit dem zielpunkt verbinden und letztere durch das program auf null bringen lassen...
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.977, vom Themenstarter, eingetragen 2017-05-08
|
Neuer 4/4 mit 136. Und schon braucht das neue Paper ein Update. ;-)
\geo
ebene(410.99,390.45)
x(8.95,17.17)
y(10.46,18.26)
form(.)
#//Eingabe war:
#
#4-regular matchstick graph with 68 vertices and 136 edges.
#
#
#
#P[1]=[46.506054558761406,22.776816954521117];
#P[2]=[96.10659433379371,29.084467390732563]; D=ab(1,2); A(2,1,Bew(1));
#L(3,1,2); L(4,3,2); L(5,4,2); M(6,1,3,blue_angle,2);
#N(10,6,3); N(11,10,4); L(12,10,11); L(13,12,11); N(14,8,12);
#A(9,14,ab(9,14,[6,9],"gespiegelt"),Bew(2)); L(18,16,15);
#A(5,13,ab(5,13,[1,18],"gespiegelt"),Bew(2));
#A(18,34,ab(18,34,[1,34],"gespiegelt"),Bew(2));
#N(67,49,15); N(68,31,64); R(67,14); A(67,48); A(67,14); A(68,30); A(68,63);
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(10.930121091175229,10.455536339090422,P1)
p(11.922131886675874,10.58168934781465,P2)
p(11.316874778606529,11.377719393184506,P3)
p(12.308885574107176,11.503872401908735,P4)
p(12.91414268217652,10.70784235653888,P5)
p(11.058625420591351,11.447245286978518,P6)
p(10.135528113851862,11.062678826805117,P7)
p(10.264032443267984,12.054387774693211,P8)
p(9.340935136528495,11.66982131451981,P9)
p(11.445379108022653,12.3694283410726,P10)
p(12.437389903523298,12.49558134979683,P11)
p(11.832132795453953,13.291611395166685,P12)
p(12.824143590954598,13.417764403890912,P13)
p(11.016591402424096,12.712912651211836,P14)
p(9.899474303173522,13.309343805772516,P15)
p(9.14691534401741,12.65081892925389,P16)
p(10.093494095684605,12.328346191038436,P17)
p(8.952895551506327,13.63181654398797,P18)
p(14.910532655337512,10.587729596757697,P19)
p(13.912337668757017,10.647785976648288,P20)
p(14.463445512691845,11.482220003011967,P21)
p(13.46525052611135,11.54227638290256,P22)
p(14.716512862826427,11.568727211491778,P23)
p(15.663091614493624,11.246254473276322,P24)
p(15.469071821982538,12.227252088010403,P25)
p(16.415650573649735,11.904779349794948,P26)
p(14.26942572018076,12.46321761774605,P27)
p(13.271230733600264,12.52327399763664,P28)
p(13.822338577535094,13.35770802400032,P29)
p(14.67447884465917,12.834394575725096,P30)
p(15.749561925742489,13.503630785397736,P31)
p(16.544154903065856,12.896488297683042,P32)
p(15.621057596326366,12.511921837509643,P33)
p(16.672659232481976,13.888197245571138,P34)
p(10.71502212865079,16.93228419280141,P35)
p(11.713217115231288,16.87222781291082,P36)
p(11.162109271296456,16.03779378654714,P37)
p(12.160304257876954,15.977737406656548,P38)
p(12.711412101811783,16.81217143302023,P39)
p(10.909041921161876,15.951286578067332,P40)
p(9.962463169494681,16.27375931628279,P41)
p(10.156482962005764,15.292761701548706,P42)
p(9.20990421033857,15.615234439764162,P43)
p(11.356129063807543,15.056796171813058,P44)
p(12.354324050388039,14.996739791922469,P45)
p(11.80321620645321,14.162305765558788,P46)
p(12.801411193033704,14.102249385668193,P47)
p(10.951075939329133,14.685619213834014,P48)
p(9.875992858245816,14.016383004161373,P49)
p(9.081399880922447,14.623525491876066,P50)
p(10.004497187661936,15.008091952049467,P51)
p(14.695433692813076,17.064477450468683,P52)
p(13.703422897312429,16.938324441744456,P53)
p(14.308680005381774,16.142294396374606,P54)
p(13.316669209881129,16.016141387650375,P55)
p(14.566929363396952,16.07276850258059,P56)
p(15.49002667013644,16.45733496275399,P57)
p(15.361522340720317,15.465626014865904,P58)
p(16.28461964745981,15.850192475039302,P59)
p(14.18017567596565,15.15058544848651,P60)
p(13.188164880465004,15.024432439762279,P61)
p(13.79342198853435,14.228402394392425,P62)
p(14.608963381564207,14.807101138347278,P63)
p(15.726080480814781,14.210669983786598,P64)
p(16.478639439970895,14.869194860305221,P65)
p(15.532060688303698,15.191667598520674,P66)
p(10.82257160991301,13.693910265945918,P67)
p(14.802983174075294,13.826103523613192,P68)
nolabel()
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5) s(P20,P5) s(P22,P5)
s(P1,P6)
s(P1,P7) s(P6,P7)
s(P7,P8) s(P6,P8)
s(P7,P9) s(P8,P9) s(P16,P9) s(P17,P9)
s(P6,P10) s(P3,P10)
s(P10,P11) s(P4,P11)
s(P10,P12) s(P11,P12)
s(P12,P13) s(P11,P13) s(P28,P13) s(P29,P13)
s(P8,P14) s(P12,P14) s(P17,P14)
s(P15,P16)
s(P15,P17) s(P16,P17)
s(P16,P18) s(P15,P18) s(P49,P18) s(P50,P18)
s(P19,P20)
s(P19,P21) s(P20,P21)
s(P20,P22) s(P21,P22)
s(P19,P23)
s(P19,P24) s(P23,P24)
s(P23,P25) s(P24,P25)
s(P24,P26) s(P25,P26) s(P32,P26) s(P33,P26)
s(P21,P27) s(P23,P27)
s(P22,P28) s(P27,P28)
s(P27,P29) s(P28,P29)
s(P25,P30) s(P29,P30) s(P33,P30)
s(P31,P32)
s(P31,P33) s(P32,P33)
s(P31,P34) s(P32,P34) s(P64,P34) s(P65,P34)
s(P35,P36)
s(P35,P37) s(P36,P37)
s(P36,P38) s(P37,P38)
s(P36,P39) s(P38,P39) s(P53,P39) s(P55,P39)
s(P35,P40)
s(P35,P41) s(P40,P41)
s(P40,P42) s(P41,P42)
s(P41,P43) s(P42,P43) s(P50,P43) s(P51,P43)
s(P37,P44) s(P40,P44)
s(P38,P45) s(P44,P45)
s(P44,P46) s(P45,P46)
s(P45,P47) s(P46,P47) s(P61,P47) s(P62,P47)
s(P42,P48) s(P46,P48) s(P51,P48)
s(P49,P50)
s(P49,P51) s(P50,P51)
s(P52,P53)
s(P52,P54) s(P53,P54)
s(P53,P55) s(P54,P55)
s(P52,P56)
s(P52,P57) s(P56,P57)
s(P56,P58) s(P57,P58)
s(P57,P59) s(P58,P59) s(P65,P59) s(P66,P59)
s(P54,P60) s(P56,P60)
s(P55,P61) s(P60,P61)
s(P60,P62) s(P61,P62)
s(P58,P63) s(P62,P63) s(P66,P63)
s(P64,P65)
s(P64,P66) s(P65,P66)
s(P49,P67) s(P15,P67) s(P48,P67) s(P14,P67)
s(P31,P68) s(P64,P68) s(P30,P68) s(P63,P68)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P6,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P67,P14) abstand(P67,P14,A0) print(abs(P67,P14):,8.95,18.264) print(A0,10.25,18.264)
print(min=0.9999999999999933,8.95,17.964)
print(max=1.000000000000005,8.95,17.664)
\geooff
\geoprint()
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.978, vom Themenstarter, eingetragen 2017-05-08
|
2/4 mit zwei 2er-Knoten mal anders. 94 Kanten.
\geo
ebene(383.92,352.76)
x(9.36,17.04)
y(9.98,17.03)
form(.)
#//Eingabe war:
#
#(2, 4)-regular matchstick graph with 94 edges.
#
#
#
#P[1]=[51.018872534224045,266.63765377965933];
#P[2]=[17.07713421048934,229.9231008127074]; D=ab(1,2); A(2,1,Bew(1)); L(3,1,2);
#L(4,3,2); L(5,4,2); L(6,4,5); M(7,1,3,blue_angle,2); L(11,9,7); N(12,11,3);
#L(13,11,12);
#A(6,13,ab(6,13,[1,13],"gespiegelt"),Bew(2));N(25,18,5);
#A(22,10,ab(22,10,[1,25],"gespiegelt"),Bew(2)); R(12,24); A(12,24); A(36,47);
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(11.020377450684482,15.332753075593185,P1)
p(10.341542684209786,14.598462016254146,P2)
p(11.316874778606527,14.377719393184504,P3)
p(10.638040012131833,13.643428333845465,P4)
p(9.662707917735093,13.864170956915109,P5)
p(9.95920524565714,12.909137274506428,P6)
p(11.720352617032042,14.61858589173726,P7)
p(11.988851957626686,15.581865759740449,P8)
p(12.688827123974246,14.867698575884523,P9)
p(12.95732646456889,15.830978443887712,P10)
p(12.420327783379603,13.904418707881334,P11)
p(11.553344979768745,13.406080651695518,P12)
p(12.418409797903648,12.904420547217168,P13)
p(11.011072740572004,10.481468686510624,P14)
p(10.335059682506143,11.21835832907893,P15)
p(11.31123136178886,11.435357989369818,P16)
p(10.635218303723,12.172247631938122,P17)
p(9.659046624440283,11.955247971647236,P18)
p(11.713782276499847,11.192945536531814,P19)
p(11.978584534858806,10.228642801926133,P20)
p(12.681294070786652,10.940119651947322,P21)
p(12.94609632914561,9.97581691734164,P22)
p(12.416491812427692,11.904422386553003,P23)
p(11.55142699429279,12.406082491031352,P24)
p(9.362549296518237,12.910281654055916,P25)
p(14.892350053142497,15.325326674718728,P26)
p(15.568363111208356,14.588437032150424,P27)
p(14.59219143192564,14.371437371859535,P28)
p(15.2682044899915,13.634547729291231,P29)
p(16.24437616927422,13.851547389582118,P30)
p(15.944217548057358,12.897658086722926,P31)
p(14.189640517214649,14.613849824697539,P32)
p(13.924838258855694,15.57815255930322,P33)
p(13.222128722927833,14.866675709282031,P34)
p(13.486930981286807,13.90237297467635,P35)
p(14.351995799421708,13.400712870198,P36)
p(13.48501299581085,12.902374814012184,P37)
p(14.88304534303002,10.474042285636166,P38)
p(15.561880109504713,11.208333344975204,P39)
p(14.586548015107972,11.429075968044849,P40)
p(15.265382781582666,12.163367027383886,P41)
p(16.240714875979407,11.942624404314245,P42)
p(14.183070176682456,11.188209469492094,P43)
p(13.914570836087815,10.224929601488904,P44)
p(13.214595669740252,10.93909678534483,P45)
p(13.483095010334896,11.90237665334802,P46)
p(14.350077813945752,12.400714709533833,P47)
p(16.540873497196262,12.896513707173437,P48)
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(P17,P6) s(P18,P6)
s(P1,P7)
s(P1,P8) s(P7,P8)
s(P8,P9) s(P7,P9)
s(P8,P10) s(P9,P10) s(P33,P10) s(P34,P10)
s(P9,P11) s(P7,P11)
s(P11,P12) s(P3,P12) s(P24,P12)
s(P11,P13) s(P12,P13) s(P23,P13) s(P24,P13)
s(P14,P15)
s(P14,P16) s(P15,P16)
s(P15,P17) s(P16,P17)
s(P15,P18) s(P17,P18)
s(P14,P19)
s(P14,P20) s(P19,P20)
s(P19,P21) s(P20,P21)
s(P20,P22) s(P21,P22) s(P44,P22) s(P45,P22)
s(P19,P23) s(P21,P23)
s(P16,P24) s(P23,P24)
s(P18,P25) s(P5,P25)
s(P26,P27)
s(P26,P28) s(P27,P28)
s(P27,P29) s(P28,P29)
s(P27,P30) s(P29,P30)
s(P29,P31) s(P30,P31) s(P41,P31) s(P42,P31)
s(P26,P32)
s(P26,P33) s(P32,P33)
s(P32,P34) s(P33,P34)
s(P32,P35) s(P34,P35)
s(P28,P36) s(P35,P36) s(P47,P36)
s(P35,P37) s(P36,P37) s(P46,P37) s(P47,P37)
s(P38,P39)
s(P38,P40) s(P39,P40)
s(P39,P41) s(P40,P41)
s(P39,P42) s(P41,P42)
s(P38,P43)
s(P38,P44) s(P43,P44)
s(P43,P45) s(P44,P45)
s(P43,P46) s(P45,P46)
s(P40,P47) s(P46,P47)
s(P30,P48) s(P42,P48)
pen(2)
color(#0000FF) m(P3,P1,MA10) m(P1,P7,MB10) f(P1,MA10,MB10)
pen(2)
color(red) s(P12,P24) abstand(P12,P24,A0) print(abs(P12,P24):,9.36,17.031) print(A0,10.66,17.031)
print(min=0.9999999999999942,9.36,16.731)
print(max=1.0000000000000124,9.36,16.431)
\geooff
\geoprint()
Und noch zwei mit 80 Kanten.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_mit_80_zwei_2er_-_slash.png
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.979, vom Themenstarter, eingetragen 2017-05-10
|
Ich habe mir mal die Mühe gemacht und einen eigenen kleinen Artikel bzw. einen Katalog zu Table 3 aus unserem aktuellen Paper erstellt. Schön mit TikZ Grafiken zum Zoomen. Dieser Artikel ist aber nur eine Ergänzung zu der Liste aus Table 3 und soll nicht in einer Fachzeitschrift veröffentlicht werden. Zumal er bestimmt immer wieder aktualisiert werden muss. Macht so aber einen besseren Eindruck als eine reine Bildersammlung. Zu Table 2 werde ich auch noch so eine Übericht erstellen.
Graphs of Table 3
Ich habe noch ein, zwei Graphen mit 132 bzw. 134 Kanten ergänzt. Ein 140er war falsch, da 160 Kanten. Das war der erweiterte 120er.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.980, eingetragen 2017-05-11
|
\quoteon(2017-05-08 10:49 - Slash in Beitrag No. 977)
Neuer 4/4 mit 136. Und schon braucht das neue Paper ein Update. ;-)
\quoteoff
dieser konkav-konvexe 136 gefällt mir sehr gut
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4333
Wohnort: Raun
| Beitrag No.981, eingetragen 2017-05-13
|
Eine Programmversion mit Buttons zum Drehen, Vergrößern, Verkleinern war noch übrig, ich habe sie unter Graph #966 ergänzt.
\quoteon(2017-05-08 07:46 - haribo in Beitrag No. 976)
mein weg wäre:
Q(k,i,j,a*D,b*D)
Q(99,5,31,0.1*D,3.8541*D; mit 3.8541 als kite spannweite
und dann
R(99,5); (oder R,99,31) weiss nicht genau welches richtig ist
also eine linie mit kitespannweite zeichnen zu punkt 99 und diesen dann mit einer kleinen messlinie mit dem zielpunkt verbinden und letztere durch das program auf null bringen lassen...
\quoteoff
Es können nur solche Kanten auf eine bestimmte Länge gebracht werden, die bei Verändern der farbigen Winkel ihre Länge ändern. Bei R(99,5) und R(99,31) geht das nicht, weil sie von Q bereits auf eine unveränderliche Länge gesetzt wurden. Die Idee geht aber zu retten mit Eingabe Q(99,31,4,2.97978244899154*D,D) und dann R(99,2) auf Länge 1 bringen. Wenn man dann P5 bei der vorangegangenen Eingabe weglässt, hat man auch keine doppelten Punkte und Kanten. Die Bedingung an die R(i,j) notiere ich mit in der Kurzbeschreibung und nehme sie später in die ausführliche auf. Es gibt bestimmt noch mehr solcher Klippen, die ich nicht sehe.
Ja die Beschreibung... Im Moment ist es nur eine Streichholzgraph-981.htm Zusammenstellung der bisherigen Programmversionen. Damit kann man sich zumindest die angesammelten Downloadfiles aus einer Seite heraus anschauen. In den einzelnen Versionen sind ja schon etliche ausführliche Beschreibungen enthalten. Doch das pure Herauskopieren und Aneinanderreihen hat mir nicht gefallen, weil immer passende Eingabebeispiele dabei sind zum Anklicken und Probieren. Teilweise sind sie nicht mehr zur jetzigen Version kompatibel oder nicht in optimaler Form eingegeben. Diese Versionen will ich nach und nach ersetzen durch Links innerhalb der Seite.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.982, vom Themenstarter, eingetragen 2017-05-14
|
Der 2/4 mit 41 besitzt 16 Variationen, wobei die letzten 6 eigentlich eigene Graphen sind wegen des neuen Mittelstücks. Seht ihr noch mehr?
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_mit_41_-_10_var_-_Slash.png
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_mit_41_-_6_var_-_Slash.png
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4333
Wohnort: Raun
| Beitrag No.983, eingetragen 2017-05-15
|
1 weniger und 1 mehr: Von den letzten 6 Graphen ist der zweite um 180° gedreht nochmal dabei und beim letzten kann man auch die linke Flügelspitze noch von oben nach unten drehen.
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.984, vom Themenstarter, eingetragen 2017-05-15
|
\quoteon(2017-05-15 04:59 - StefanVogel in Beitrag No. 983)
1 weniger und 1 mehr: Von den letzten 6 Graphen ist der zweite um 180° gedreht nochmal dabei und beim letzten kann man auch die linke Flügelspitze noch von oben nach unten drehen.
\quoteoff
Danke. Wie immer sehen vier Augen mehr als zwei.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_2_4_mit_41_-_6_var_-_Slash_neu.png
Ich verlinke dann später den Artikel zur weiteren Kontrolle. Freiwillig natürlich. ;-)
Hier der Link: Graphs of Table 2
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.985, eingetragen 2017-05-16
|
alle oberen die keine vertikale symetrieachse haben kann man an der roten linie spiegeln, also sind es dann 16 stück wie es auch zu erwarten ist wenn man an vier stellen jeweils zwei anlegemöglichkeiten hat (2^4=16)
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_80iger.PNG
auch die unteren, (wenn es denn schon alle sind? (wiso sind es eigendlich sechs und nicht acht?)), kann man nochmal spiegeln, denke ich
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_80iger-weitere.PNG
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.986, vom Themenstarter, eingetragen 2017-05-16
|
\quoteon(2017-05-16 19:58 - haribo in Beitrag No. 985)
(wiso sind es eigendlich sechs und nicht acht?)
\quoteoff
Wegen des mittleren Teilgraphen (Raute). Dadurch fallen zwei weg, die auch mit Drehung und Spiegelung darstellbar sind. Bei deinem unsymmetrischen 70er sind es acht Versionen, da der Mittel-Teilgraph ebenfalls unysmmetrisch ist.
Generell werden nur die Graphen gezählt, die nicht durch Drehung und Spiegelung eines schon vorhandenen Graphen erzeugt werden können.
Hier sind aber Flüchtigkeitsfehler vorprogrammiert. Deshalb alles kontrollieren und Unklarheiten posten.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.987, eingetragen 2017-05-16
|
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_80iger-weitere20.PNG
ok, die eine hälfte ist gespiegelt
dann muss ich mal versuchen innerhalb der linken hälfte noch die gedrehten auszusortieren...
... etwas später.....:
ist ja etwas mühsam keine fehler zu machen, aber die zehn sind IMO nicht durch spiegeln oder drehen ineinander zu überführen!
(die obersten jeder spalte sind punktsymetrisch und können darum durch drehen in sich selber überführt werden,)
also hab ich sie mit deinen sechs formen aus #984 verglichen und die vier rosa hinterlegten als neue identifiziert
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_80iger-die_neuen.png
dann haben wir also jetzt 20 verschiedene 4/2 80iger (ich kann immer noch nur striche und nicht knoten zählen...)
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.988, vom Themenstarter, eingetragen 2017-05-17
|
...und 6 Augen sehen mehr als 4. ;-)
Einer meiner vier weiteren ist anders. Dein ganz rechter mit rosa Hintergrund ist der mittlere links der ersten sechs um 180 Grad gedreht.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_Table_2_-_Sammlung_2_4_10x80er_-_slash.png
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.989, eingetragen 2017-05-17
|
moin slash,
das darf echt nicht wahr sein
evtl sollten wir sie doch nach spannweite sortieren....
also neuer identifikationsversuch:
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_80iger-die_neuen2.png
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.990, eingetragen 2017-05-17
|
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_80iger-spannweiten.PNG
und stell bitte nicht die frage ob alle 240iger 4/4er ringpermutationen herstellbar sind (20^3-spigelduplikaten) ist zzzziemlich viel
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.991, vom Themenstarter, eingetragen 2017-05-17
|
Tolle Grafik mit den Spannweiten! Das muss natürlich auch noch im Artikel erwähnt werden.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.992, eingetragen 2017-05-19
|
diese anordnung von 80igern mit ortogonalen federsteifen als unsymetrisch vierfach gespiegelter 4/4er knoten ist in gewissem rahmen elastisch!
angeordnet nach einer idee meines bruders...
die elastizität könnte man mal annimieren
ich suche noch eine variante die in noch grösserem bereich beweglich ist, d.h. die federstreifen müssen beide viel stärker komprimiert sein
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st488elastic.PNG
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.993, eingetragen 2017-05-19
|
das dürfte ungefähr der elastischste sein welchen man auf diese weise erstellen kann, auf ne animation der beweglichkeit wäre ich sehr gespannt
http://www.matheplanet.com/matheplanet/nuke/html/uploads/b/35059_st464-elastic.PNG
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4333
Wohnort: Raun
| Beitrag No.994, eingetragen 2017-05-20
|
Bei der Eingabe verwende ich 6 bewegliche Winkel und am Ende bleiben 5 Kanten übrig, die mit Button "Feinjustieren(5)" auf Länge 1 gebracht werden müssen. Das heißt, 1 Winkel bleibt frei beweglich übrig, der Graph ist einfach beweglich.
\geo
ebene(415.35,482.35)
x(10.93,30.37)
y(11.16,33.74)
form(.)
#//Eingabe war:
#
##993
#
#
#
#
#
#
#
#
#
#P[1]=[235.82,75.45]; P[2]=[240.51,96.29]; D=ab(1,2); A(2,1,Bew(1)); L(3,1,2);
#L(4,3,2); L(5,4,2); L(6,3,4); Q(7,1,6,ab(1,6,[1,6]),ab(1,2,3));
#A(11,12,ab(12,11,1,3,4,[6,12]),Bew(2));L(21,15,14); L(22,15,21); L(23,22,21);
#L(24,22,23); N(25,23,13); Q(26,24,25,ab(17,13,12,[18,20]),ab(17,16,11));
#A(27,31,ab(5,12,[1,12])); M(42,41,38,blauerWinkel,1);
#M(44,43,42,gruenerWinkel,1); N(46,44,42); L(47,44,46); L(48,46,42);
#N(49,47,48); L(50,47,49); L(51,49,48); N(52,50,51); L(53,50,52); L(54,52,51);
#N(55,53,54); L(56,53,55); L(57,55,54); N(58,56,57); L(59,56,58); L(60,58,57);
#N(61,59,60); L(62,59,61); L(63,61,60); N(64,62,63); L(65,62,64); L(66,64,63);
#M(67,66,63,orangerWinkel,1); M(69,68,67,vierterWinkel,1); N(71,69,67);
#L(72,69,71); L(73,71,67); N(74,72,73); L(75,72,74); L(76,74,73); N(77,75,76);
#A(76,5); R(76,5); A(77,5); R(77,5); L(78,75,77); M(79,70,69,fuenfterWinkel,1);
#M(81,80,79,sechsterWinkel,1); N(83,81,79); L(84,81,83); L(85,83,79);
#N(86,84,85); L(87,84,86); L(88,86,85); N(89,87,88); L(90,87,89); L(91,89,88);
#N(92,90,91); L(93,90,92); L(94,92,91); N(95,93,94); L(96,93,95); L(97,95,94);
#N(98,96,97); L(99,96,98); L(100,98,97); Q(101,100,78,D,ab(5,41,[1,41]));
#L(141,100,101); A(141,99); R(141,99); L(142,99,141); N(143,65,82);
#L(144,65,143); L(145,143,82); N(146,144,145); L(147,144,146); L(148,146,145);
#N(149,147,148); L(150,147,149); L(151,149,148); N(152,150,151);
#Q(153,45,150,ab(41,5,[1,41]),D); A(152,153); R(152,153);
#Q(193,151,142,D,ab(41,5,[1,41],"gespiegelt")); A(193,152); R(193,152);
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(21.039631872113766,13.532101707874581,P1)
p(21.25918862506183,14.507701437392225,P2)
p(20.304516098900294,14.210043298258853,P3)
p(20.52407285184836,15.1856430277765,P4)
p(21.4787453780099,15.48330116690987,P5)
p(19.569400325686818,14.887984888643128,P6)
p(19.09676514667527,14.006726704249516,P7)
p(19.376963175968996,13.046784484957172,P8)
p(20.068198509394517,13.769414206062049,P9)
p(20.348396538688245,12.809471986769704,P10)
p(19.657161205262724,12.086842265664828,P11)
p(18.569890761203226,14.856669868192528,P12)
p(17.18742009435219,13.411410425982776,P13)
p(17.922535867565657,12.7334688355985,P14)
p(17.70297911461759,11.757869106080857,P15)
p(18.657651640779132,12.055527245214227,P16)
p(19.13028681979068,12.936785429607838,P17)
p(18.850088790496955,13.896727648900184,P18)
p(18.158853457071437,13.174097927795305,P19)
p(17.878655427777705,14.134040147087651,P20)
p(16.96786334140412,12.43581069646513,P21)
p(16.748306588456053,11.460210966947486,P22)
p(16.01319081524258,12.138152557331756,P23)
p(15.793634062294515,11.162552827814112,P24)
p(16.23274756819065,13.113752286849401,P25)
p(15.23323800370706,13.0824372663988,P26)
p(13.850767336856022,11.637177824189045,P27)
p(14.542002670281539,12.359807545293924,P28)
p(15.513436033000787,12.122495047106458,P29)
p(14.82220069957527,11.399865326001578,P30)
p(15.705873182718605,13.963695450792411,P31)
p(12.95549745011101,13.425610610146508,P32)
p(13.403132393483515,12.531394217167778,P33)
p(13.953729034597334,13.366165646239342,P34)
p(14.401363977969838,12.47194925326061,P35)
p(14.951960619083657,13.306720682332173,P36)
p(14.759960061769165,14.28811549890241,P37)
p(13.935368836579187,14.853844507651022,P38)
p(13.857728755940089,13.856863054524458,P39)
p(13.033137530750107,14.422592063273072,P40)
p(13.110777611389208,15.419573516399637,P41)
p(14.104605555977809,15.530506002871341,P42)
p(13.511621232294042,16.33572000664009,P43)
p(13.21309557636189,17.290121616419896,P44)
p(12.535822364845894,16.554390009811335,P45)
p(13.806079900045658,16.484907612651142,P46)
p(14.206923520950493,17.401054102891596,P47)
p(14.781878767493804,16.266237609479898,P48)
p(15.182722388398641,17.182384099720352,P49)
p(14.884196732466489,18.136785709500153,P50)
p(15.77570671208241,16.3771700959516,P51)
p(15.47718105615025,17.3315717057314,P52)
p(15.878024677055093,18.24771819597185,P53)
p(16.4529799235984,17.11290170256016,P54)
p(16.853823544503243,18.02904819280061,P55)
p(16.555297888571083,18.98344980258041,P56)
p(17.446807868187,17.22383418903185,P57)
p(17.148282212254845,18.178235798811656,P58)
p(17.549125833159685,19.094382289052106,P59)
p(18.124081079702997,17.959565795640415,P60)
p(18.524924700607833,18.875712285880866,P61)
p(18.226399044675677,19.830113895660666,P62)
p(19.1179090242916,18.070498282112112,P63)
p(18.819383368359446,19.024899891891913,P64)
p(19.22022698926428,19.94104638213237,P65)
p(19.795182235807594,18.806229888720665,P66)
p(19.89107709869304,17.810838420366544,P67)
p(20.705163965555286,18.39158154189483,P68)
p(21.654943270297686,18.70450209456441,P69)
p(20.90905646994836,19.370574824125264,P70)
p(20.840856403435442,18.123758973036132,P71)
p(21.75083813318313,17.709110626210286,P72)
p(20.63696389904237,17.144765690805695,P73)
p(21.54694562879006,16.730117343979853,P74)
p(22.496724933532462,17.043037896649437,P75)
p(20.732858761927815,16.14937422245157,P76)
p(21.682638066670215,16.46229477512116,P77)
p(22.592619796417903,16.04764642829531,P78)
p(21.902884399765398,19.48150744293316,P79)
p(21.309899968860904,20.286721367741265,P80)
p(21.011374185842495,21.241122937769966,P81)
p(20.334101072295095,20.50539124097703,P82)
p(21.604358616746993,20.435909012961858,P83)
p(22.005202115659536,21.352055556577863,P84)
p(22.580157513312802,20.217239139726093,P85)
p(22.981001012225345,21.133385683342098,P86)
p(22.682475229206936,22.0877872533708,P87)
p(23.573985443129843,20.328171758533994,P88)
p(23.27545966011143,21.28257332856269,P89)
p(23.676303159023977,22.198719872178692,P90)
p(24.251258556677243,21.06390345532693,P91)
p(24.65210205558979,21.98004999894293,P92)
p(24.353576272571374,22.93445156897163,P93)
p(25.24508648649428,21.174836074134824,P94)
p(24.946560703475868,22.12923764416352,P95)
p(25.347404202388418,23.045384187779522,P96)
p(25.92235960004168,21.91056777092776,P97)
p(26.32320309895423,22.82671431454376,P98)
p(26.024677315935815,23.781115884572458,P99)
p(26.91618752985872,22.02150038973565,P100)
p(27.593461972658876,22.757230862891237,P101)
p(28.883909719499645,21.229243751468637,P102)
p(28.23868584607926,21.99323730717994,P103)
p(27.899659955215864,21.052460263814037,P104)
p(27.25443608179548,21.81645381952534,P105)
p(26.91541019093208,20.87567677615944,P106)
p(27.33264250789571,19.966876911678177,P107)
p(28.2670801868735,19.610750214972363,P108)
p(28.108276113697674,20.598060331573407,P109)
p(29.042713792675467,20.241933634867593,P110)
p(29.201517865851294,19.25462351826655,P111)
p(26.336982579817267,20.05994305814847,P112)
p(26.654590726168923,18.08532282494638,P113)
p(27.638840490452687,18.262106312600977,P114)
p(28.284064363873075,17.49811275688968,P115)
p(28.62309025473647,18.438889800255573,P116)
p(28.20585793777285,19.347689664736837,P117)
p(27.271420258795057,19.703816361442655,P118)
p(27.430224331970887,18.71650624484161,P119)
p(26.495786652993093,19.072632941547425,P120)
p(27.299814599589308,17.32132926923508,P121)
p(27.945038473009692,16.557335713523777,P122)
p(26.96078870872591,16.38055222586918,P123)
p(27.6060125821463,15.616558670157886,P124)
p(26.315564835305516,17.144545781580486,P125)
p(25.73713722419071,16.328812063569515,P126)
p(26.054745370542367,14.354191830367423,P127)
p(25.89594129736654,15.341501946968467,P128)
p(26.67157490316849,15.972685366863699,P129)
p(26.83037897634433,14.985375250262651,P130)
p(25.31990490722708,17.237611928050775,P131)
p(24.08850639437304,14.720121179549288,P132)
p(25.07162588245771,14.537156504958357,P133)
p(24.73851819460629,15.480045293890688,P134)
p(25.72163768269093,15.297080619299749,P135)
p(25.3885299948395,16.23996940823208,P136)
p(24.49023368497479,16.67935959893213,P137)
p(23.54142674069636,16.363503013613713,P138)
p(24.28937003967392,15.699740389240715,P139)
p(23.340563095395478,15.383883803922298,P140)
p(26.617663471167713,22.97590249911233,P141)
p(27.018505640827513,23.89205026636568,P142)
p(19.424119387506952,20.920039686470478,P143)
p(18.47434011669394,20.60711903081811,P144)
p(20.238206317338076,21.50078271972885,P145)
p(19.28842704652507,21.187862064076477,P146)
p(18.37844536173693,21.60251050956993,P147)
p(19.492319444767737,22.166855368414588,P148)
p(18.582337759979595,22.581503813908043,P149)
p(17.63255848916659,22.268583158255673,P150)
p(19.396424689810722,23.162246847166408,P151)
p(18.44664541899771,22.849326191514045,P152)
p(17.536664219898437,23.263974683798033,P153)
p(11.24537454486024,18.08237705946008,P154)
p(11.89059845485306,17.318383534635725,P155)
p(12.229624300681376,18.25916059423082,P156)
p(12.874848210674227,17.49516706940642,P157)
p(13.213874056502513,18.435944129001527,P158)
p(12.796641696034563,19.344743973509843,P159)
p(11.86220400000895,19.700870625484047,P160)
p(12.021008120447405,18.71356051648498,P161)
p(11.086570424421797,19.069687168459176,P162)
p(10.927766303983347,20.05699727745825,P163)
p(13.792301628568087,19.251677874701898,P164)
p(13.47469338769119,21.22629809270004,P165)
p(12.490443631870058,21.049514557929328,P166)
p(11.845219721877232,21.813508082753696,P167)
p(11.506193876048913,20.872731023158607,P168)
p(11.923426236516875,19.96393117865029,P169)
p(12.857863932542482,19.607804526676084,P170)
p(12.69905981210403,20.595114635675166,P171)
p(13.633497508129635,20.23898798370097,P172)
p(12.829469477698364,21.990291617524413,P173)
p(12.184245567705537,22.75428514234879,P174)
p(13.168495323526674,22.931068677119516,P175)
p(12.52327141353385,23.695062201943887,P176)
p(13.813719233519492,22.167075152295144,P177)
p(14.392146805585062,22.98280889799549,P178)
p(14.074538564708163,24.957429115993648,P179)
p(14.233342685146617,23.970119006994572,P180)
p(13.457709109559456,23.338935549969687,P181)
p(13.298904989121002,24.326245658968766,P182)
p(14.809379166053024,22.07400905348718,P183)
p(16.04077755839454,24.591499860935826,P184)
p(15.057658061551354,24.774464488464734,P185)
p(15.39076579453895,23.831575715478305,P186)
p(14.407646297695758,24.01454034300722,P187)
p(14.740754030683359,23.071651570020784,P188)
p(15.639050361581726,22.63226142232226,P189)
p(16.587857290740082,22.948118053060146,P190)
p(15.839913959988131,23.611880641629043,P191)
p(16.78872088914649,23.927737272366926,P192)
p(18.650537897285627,23.828319585489048,P193)
p(26.54972471907817,25.83633533996057,P194)
p(26.784115179952842,24.864192803163114,P195)
p(25.82501981654947,25.147275978039644,P196)
p(26.059410277424142,24.175133441242174,P197)
p(25.10031491402078,24.458216616118712,P198)
p(24.61431228133594,25.332173961201057,P199)
p(24.879857109965144,26.29627247483351,P200)
p(25.582018500207056,25.58425465058081,P201)
p(25.84756332883626,26.548353164213257,P202)
p(25.14540193859434,27.260370988465944,P203)
p(24.100444335013037,24.474304662448695,P204)
p(22.69612155452921,25.898340310954094,P205)
p(23.4208264570579,26.58739967287502,P206)
p(23.186435996183235,27.559542209672458,P207)
p(24.1455313595866,27.276459034795938,P208)
p(24.631533992271436,26.402501689713585,P209)
p(24.365989163642233,25.43840317608113,P210)
p(23.663827773400328,26.150421000333843,P211)
p(23.398282944771122,25.1863224867014,P212)
p(22.461731093654535,26.87048284775153,P213)
p(22.22734063277987,27.842625384548967,P214)
p(21.50263573025118,27.15356602262804,P215)
p(21.268245269376507,28.125708559425487,P216)
p(21.73702619112585,26.18142348583061,P217)
p(20.7371556121181,26.197511532160604,P218)
p(19.332832831634278,27.621547180666,P219)
p(20.03499422187619,26.909529356413298,P220)
p(21.002700440747304,27.161610045793044,P221)
p(20.300539050505396,27.873627870045738,P222)
p(21.223158244802942,25.323554187078237,P223)
p(18.464906074751752,25.819686158087567,P224)
p(18.898869453193015,26.720616669376778,P225)
p(19.462116473793344,25.894328103689915,P226)
p(19.896079852234607,26.795258614979133,P227)
p(20.45932687283494,25.96897004929227,P228)
p(20.28229602613615,24.98476474585345,P229)
p(19.466416961710888,24.406542165671247,P230)
p(19.373601050443952,25.40222545197051,P231)
p(18.557721986018688,24.82400287178831,P232)
nolabel()
s(P9,P1) s(P10,P1)
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5)
s(P3,P6) s(P4,P6) s(P7,P6)
s(P7,P8)
s(P7,P9) s(P8,P9)
s(P8,P10) s(P9,P10)
s(P8,P11) s(P10,P11) s(P16,P11) s(P17,P11)
s(P7,P12) s(P6,P12) s(P18,P12) s(P20,P12)
s(P19,P13) s(P20,P13)
s(P13,P14)
s(P14,P15)
s(P14,P16) s(P15,P16) s(P17,P16)
s(P17,P18)
s(P17,P19) s(P18,P19)
s(P18,P20) s(P19,P20)
s(P15,P21) s(P14,P21)
s(P15,P22) s(P21,P22)
s(P22,P23) s(P21,P23)
s(P22,P24) s(P23,P24) s(P29,P24) s(P30,P24)
s(P23,P25) s(P13,P25) s(P26,P25)
s(P28,P27) s(P30,P27) s(P33,P27) s(P35,P27)
s(P26,P28)
s(P26,P29) s(P28,P29)
s(P28,P30) s(P29,P30)
s(P25,P31) s(P26,P31) s(P36,P31) s(P37,P31)
s(P39,P32) s(P40,P32)
s(P32,P33)
s(P32,P34) s(P33,P34)
s(P33,P35) s(P34,P35)
s(P34,P36) s(P35,P36) s(P37,P36)
s(P37,P38)
s(P37,P39) s(P38,P39)
s(P38,P40) s(P39,P40)
s(P38,P41) s(P40,P41)
s(P41,P42)
s(P41,P43) s(P42,P43)
s(P43,P44)
s(P43,P45) s(P44,P45) s(P155,P45) s(P157,P45)
s(P44,P46) s(P42,P46)
s(P44,P47) s(P46,P47)
s(P46,P48) s(P42,P48)
s(P47,P49) s(P48,P49)
s(P47,P50) s(P49,P50)
s(P49,P51) s(P48,P51)
s(P50,P52) s(P51,P52)
s(P50,P53) s(P52,P53)
s(P52,P54) s(P51,P54)
s(P53,P55) s(P54,P55)
s(P53,P56) s(P55,P56)
s(P55,P57) s(P54,P57)
s(P56,P58) s(P57,P58)
s(P56,P59) s(P58,P59)
s(P58,P60) s(P57,P60)
s(P59,P61) s(P60,P61)
s(P59,P62) s(P61,P62)
s(P61,P63) s(P60,P63)
s(P62,P64) s(P63,P64)
s(P62,P65) s(P64,P65)
s(P64,P66) s(P63,P66)
s(P66,P67)
s(P66,P68) s(P67,P68)
s(P68,P69)
s(P68,P70) s(P69,P70)
s(P69,P71) s(P67,P71)
s(P69,P72) s(P71,P72)
s(P71,P73) s(P67,P73)
s(P72,P74) s(P73,P74)
s(P72,P75) s(P74,P75)
s(P74,P76) s(P73,P76) s(P5,P76)
s(P75,P77) s(P76,P77) s(P5,P77)
s(P75,P78) s(P77,P78) s(P138,P78) s(P140,P78)
s(P70,P79)
s(P70,P80) s(P79,P80)
s(P80,P81)
s(P80,P82) s(P81,P82)
s(P81,P83) s(P79,P83)
s(P81,P84) s(P83,P84)
s(P83,P85) s(P79,P85)
s(P84,P86) s(P85,P86)
s(P84,P87) s(P86,P87)
s(P86,P88) s(P85,P88)
s(P87,P89) s(P88,P89)
s(P87,P90) s(P89,P90)
s(P89,P91) s(P88,P91)
s(P90,P92) s(P91,P92)
s(P90,P93) s(P92,P93)
s(P92,P94) s(P91,P94)
s(P93,P95) s(P94,P95)
s(P93,P96) s(P95,P96)
s(P95,P97) s(P94,P97)
s(P96,P98) s(P97,P98)
s(P96,P99) s(P98,P99)
s(P98,P100) s(P97,P100)
s(P100,P101) s(P103,P101) s(P105,P101)
s(P109,P102) s(P110,P102)
s(P102,P103)
s(P102,P104) s(P103,P104)
s(P103,P105) s(P104,P105)
s(P104,P106) s(P105,P106) s(P107,P106)
s(P107,P108)
s(P107,P109) s(P108,P109)
s(P108,P110) s(P109,P110)
s(P108,P111) s(P110,P111) s(P116,P111) s(P117,P111)
s(P106,P112) s(P107,P112) s(P118,P112) s(P120,P112)
s(P119,P113) s(P120,P113)
s(P113,P114)
s(P114,P115)
s(P114,P116) s(P115,P116) s(P117,P116)
s(P117,P118)
s(P117,P119) s(P118,P119)
s(P118,P120) s(P119,P120)
s(P114,P121) s(P115,P121)
s(P115,P122) s(P121,P122)
s(P121,P123) s(P122,P123)
s(P122,P124) s(P123,P124) s(P129,P124) s(P130,P124)
s(P113,P125) s(P123,P125) s(P126,P125)
s(P128,P127) s(P130,P127) s(P133,P127) s(P135,P127)
s(P126,P128)
s(P126,P129) s(P128,P129)
s(P128,P130) s(P129,P130)
s(P125,P131) s(P126,P131) s(P136,P131) s(P137,P131)
s(P139,P132) s(P140,P132)
s(P132,P133)
s(P132,P134) s(P133,P134)
s(P133,P135) s(P134,P135)
s(P134,P136) s(P135,P136) s(P137,P136)
s(P137,P138)
s(P137,P139) s(P138,P139)
s(P138,P140) s(P139,P140)
s(P100,P141) s(P101,P141) s(P99,P141)
s(P99,P142) s(P141,P142) s(P195,P142) s(P197,P142)
s(P65,P143) s(P82,P143)
s(P65,P144) s(P143,P144)
s(P143,P145) s(P82,P145)
s(P144,P146) s(P145,P146)
s(P144,P147) s(P146,P147)
s(P146,P148) s(P145,P148)
s(P147,P149) s(P148,P149)
s(P147,P150) s(P149,P150)
s(P149,P151) s(P148,P151)
s(P150,P152) s(P151,P152) s(P153,P152)
s(P190,P153) s(P192,P153) s(P150,P153)
s(P161,P154) s(P162,P154)
s(P154,P155)
s(P154,P156) s(P155,P156)
s(P155,P157) s(P156,P157)
s(P156,P158) s(P157,P158) s(P159,P158)
s(P159,P160)
s(P159,P161) s(P160,P161)
s(P160,P162) s(P161,P162)
s(P160,P163) s(P162,P163) s(P168,P163) s(P169,P163)
s(P158,P164) s(P159,P164) s(P170,P164) s(P172,P164)
s(P171,P165) s(P172,P165)
s(P165,P166)
s(P166,P167)
s(P166,P168) s(P167,P168) s(P169,P168)
s(P169,P170)
s(P169,P171) s(P170,P171)
s(P170,P172) s(P171,P172)
s(P166,P173) s(P167,P173)
s(P167,P174) s(P173,P174)
s(P173,P175) s(P174,P175)
s(P174,P176) s(P175,P176) s(P181,P176) s(P182,P176)
s(P165,P177) s(P175,P177) s(P178,P177)
s(P180,P179) s(P182,P179) s(P185,P179) s(P187,P179)
s(P178,P180)
s(P178,P181) s(P180,P181)
s(P180,P182) s(P181,P182)
s(P177,P183) s(P178,P183) s(P188,P183) s(P189,P183)
s(P191,P184) s(P192,P184)
s(P184,P185)
s(P184,P186) s(P185,P186)
s(P185,P187) s(P186,P187)
s(P186,P188) s(P187,P188) s(P189,P188)
s(P189,P190)
s(P189,P191) s(P190,P191)
s(P190,P192) s(P191,P192)
s(P151,P193) s(P230,P193) s(P232,P193) s(P152,P193)
s(P201,P194) s(P202,P194)
s(P194,P195)
s(P194,P196) s(P195,P196)
s(P195,P197) s(P196,P197)
s(P196,P198) s(P197,P198) s(P199,P198)
s(P199,P200)
s(P199,P201) s(P200,P201)
s(P200,P202) s(P201,P202)
s(P200,P203) s(P202,P203) s(P208,P203) s(P209,P203)
s(P198,P204) s(P199,P204) s(P210,P204) s(P212,P204)
s(P211,P205) s(P212,P205)
s(P205,P206)
s(P206,P207)
s(P206,P208) s(P207,P208) s(P209,P208)
s(P209,P210)
s(P209,P211) s(P210,P211)
s(P210,P212) s(P211,P212)
s(P206,P213) s(P207,P213)
s(P207,P214) s(P213,P214)
s(P213,P215) s(P214,P215)
s(P214,P216) s(P215,P216) s(P221,P216) s(P222,P216)
s(P205,P217) s(P215,P217) s(P218,P217)
s(P220,P219) s(P222,P219) s(P225,P219) s(P227,P219)
s(P218,P220)
s(P218,P221) s(P220,P221)
s(P220,P222) s(P221,P222)
s(P217,P223) s(P218,P223) s(P228,P223) s(P229,P223)
s(P231,P224) s(P232,P224)
s(P224,P225)
s(P224,P226) s(P225,P226)
s(P225,P227) s(P226,P227)
s(P226,P228) s(P227,P228) s(P229,P228)
s(P229,P230)
s(P229,P231) s(P230,P231)
s(P230,P232) s(P231,P232)
pen(2)
color(#0000FF) m(P38,P41,MA10) m(P41,P42,MB10) b(P41,MA10,MB10)
color(#008000) m(P42,P43,MA11) m(P43,P44,MB11) b(P43,MA11,MB11)
color(#FFA500) m(P63,P66,MA12) m(P66,P67,MB12) b(P66,MA12,MB12)
color(#EE82EE) m(P67,P68,MA13) m(P68,P69,MB13) b(P68,MA13,MB13)
color(#00FFFF) m(P69,P70,MA14) m(P70,P79,MB14) b(P70,MA14,MB14)
color(#32CD32) m(P79,P80,MA15) m(P80,P81,MB15) b(P80,MA15,MB15)
pen(2)
color(red) s(P76,P5) abstand(P76,P5,A0) print(abs(P76,P5):,10.93,33.743) print(A0,13.97,33.743)
color(red) s(P77,P5) abstand(P77,P5,A1) print(abs(P77,P5):,10.93,33.041) print(A1,13.97,33.041)
color(red) s(P141,P99) abstand(P141,P99,A2) print(abs(P141,P99):,10.93,32.339) print(A2,13.97,32.339)
color(red) s(P152,P153) abstand(P152,P153,A3) print(abs(P152,P153):,10.93,31.637) print(A3,13.97,31.637)
color(red) s(P193,P152) abstand(P193,P152,A4) print(abs(P193,P152):,10.93,30.935) print(A4,13.97,30.935)
print(min=0.9999999999999829,10.93,30.232)
print(max=1.0000000000000637,10.93,29.53)
\geooff
\geoprint()
Nun ist es eine mühsame Angelegenheit, den sechsten Winkel höchstens in 0,1°-Schritten (sonst zerknüllt es den Graph) zu verändern und jedesmal die anderen Winkel neu einzustellen. Dabei stellt sich aber heraus, dass das Innere des Graphen immer symmetrisch bleibt. Deshalb habe ich noch eine andere Eingabevariante ausprobiert, bei der der Graph von Anfang an symmetrisch bleibt und deshalb weniger bewegliche Winkel nötig sind. Das geht dann viel besser zu animieren. Die äußeren Kites habe ich auch symmetrisch angeordnet. Weil von denen nur die Spannweite benötigt wird, hat das keinen Einfluss auf das Innere des Graphen.
\geo
ebene(505.24,466.53)
x(2.57,21.8)
y(9.6,27.35)
form(.)
#//Eingabe war:
#
##993-2
#
#
#
#
#
#P[1]=[285.04528188302345,128.6795250004144];
#P[2]=[278.5289350521718,154.13900188945584]; D=ab(1,2); A(2,1,Bew(1));
#L(3,1,2); L(4,3,2); L(5,4,2); L(6,3,4); Q(7,1,6,ab(1,6,[1,6]),ab(1,2,3));
#A(11,12,ab(12,11,1,3,4,[6,12]),Bew(2));L(21,15,14); L(22,15,21); L(23,22,21);
#L(24,22,23); N(25,23,13); Q(26,24,25,ab(17,13,12,[18,20]),ab(17,16,11));
#A(27,31,ab(5,12,[1,12])); M(42,41,38,blauerWinkel,1);
#M(44,43,42,gruenerWinkel,1); N(46,44,42); L(47,44,46); L(48,46,42);
#N(49,47,48); L(50,47,49); L(51,49,48); N(52,50,51); L(53,50,52); L(54,52,51);
#M(55,54,51,orangerWinkel,1); M(57,56,55,420-gruenerWinkel-2*orangerWinkel,1);
#N(59,57,55); L(60,57,59); L(61,59,55); N(62,60,61); L(63,60,62); L(64,62,61);
#N(65,63,64); L(66,63,65); L(67,65,64); N(68,66,67); L(69,66,68); L(70,68,67);
#N(71,69,70); L(72,69,71); L(73,71,70); N(74,72,73); L(75,72,74); L(76,74,73);
#N(77,75,76); L(78,75,77); A(5,77); A(5,76); R(5,77); R(5,76);
#Q(79,58,78,ab(54,41,[41,54]),ab(41,5,[1,41],"gespiegelt"));
#Q(131,45,53,ab(5,41,[1,41],"gespiegelt"),ab(54,5,[54,78]));
#A(174,91,ab(5,41,[1,41]));
#
#
#
#
#
#
#
#
#
#//Ende der Eingabe, weiter mit fedgeo:
p(20.846398575834122,14.896448057246834,P1)
p(20.598441849383917,15.865219166337159,P2)
p(19.883439821684373,15.16609678764689,P3)
p(19.635483095234164,16.134867896737212,P4)
p(20.350485122933712,16.833990275427485,P5)
p(18.920481067534624,15.435745518046945,P6)
p(18.900134495530715,14.435952530970274,P7)
p(19.586100927648857,13.70831934453146,P8)
p(19.87326653568242,14.666200294108554,P9)
p(20.559232967800565,13.93856710766974,P10)
p(20.272067359767007,12.980686158092645,P11)
p(18.044461656198745,14.953469672743923,P12)
p(17.470130440131626,13.037707773589736,P13)
p(18.43308919428138,12.768059043189679,P14)
p(18.681045920731584,11.799287934099354,P15)
p(19.396047948431125,12.498410312789623,P16)
p(19.416394520435034,13.498203299866294,P17)
p(18.73042808831689,14.225836486305106,P18)
p(18.44326248028333,13.267955536728014,P19)
p(17.757296048165184,13.995588723166827,P20)
p(17.71808716658183,12.068936664499407,P21)
p(17.966043893032044,11.100165555409083,P22)
p(17.00308513888229,11.369814285809134,P23)
p(17.2510418653325,10.40104317671881,P24)
p(16.75512841243209,12.33858539489946,P25)
p(15.87910900109621,11.856309549596439,P26)
p(15.304777785029094,9.94054765044225,P27)
p(15.591943393062653,10.898428600019345,P28)
p(16.565075433214353,11.128676363157624,P29)
p(16.2779098251808,10.17079541358053,P30)
p(15.89945557310012,12.85610253667311,P31)
p(13.694334203709001,11.126495149864091,P32)
p(14.499555994369047,10.53352140015317,P33)
p(14.610475430065996,11.527350801401026,P34)
p(15.415697220726043,10.934377051690106,P35)
p(15.526616656422991,11.92820645293796,P36)
p(14.909454534174825,12.715042468167399,P37)
p(13.917813285176216,12.844068176010744,P38)
p(14.301894368941912,11.920768809015744,P39)
p(13.310253119943301,12.049794516859087,P40)
p(12.9261720361776,12.973093883854087,P41)
p(12.381208673743712,13.811553741930043,P42)
p(11.927562817813385,12.920371696892532,P43)
p(11.382599455379497,13.758831554968488,P44)
p(10.928953599449168,12.867649509930978,P45)
p(11.836245311309826,14.650013600005998,P46)
p(10.837636092945608,14.597291413044443,P47)
p(12.834854529674042,14.702735786967555,P48)
p(11.836245311309826,14.650013600005998,P49)
p(11.291281948875938,15.488473458081954,P50)
p(12.289891167240153,15.541195645043508,P51)
p(11.744927804806267,16.379655503119466,P52)
p(10.746318586442051,16.32693331615791,P53)
p(12.743537023170482,16.43237769008102,P54)
p(13.710511985798284,16.177506307515298,P55)
p(13.44774959648396,17.14236688125734,P56)
p(13.607453599661628,18.129531827641188,P57)
p(12.672691676778879,17.774257078287196,P58)
p(13.870215988975954,17.164671253899144,P59)
p(14.57442856228943,17.87466044507547,P60)
p(14.645273908681034,16.53278105686929,P61)
p(15.349486481994512,17.242770248045613,P62)
p(15.50919048517218,18.229935194429462,P63)
p(15.612248871308836,16.27790967430357,P64)
p(15.771952874486503,17.265074620687415,P65)
p(16.476165447799982,17.97506381186374,P66)
p(16.547010794191586,16.63318442365756,P67)
p(17.251223367505062,17.343173614833887,P68)
p(17.41092737068273,18.330338561217737,P69)
p(17.513985756819388,16.378313041091843,P70)
p(17.673689759997053,17.365477987475693,P71)
p(18.37790233331053,18.075467178652012,P72)
p(18.448747679702137,16.733587790445835,P73)
p(19.152960253015614,17.443576981622158,P74)
p(19.31266425619328,18.430741928006007,P75)
p(19.41572264232994,16.478716407880114,P76)
p(19.575426645507605,17.465881354263963,P77)
p(20.279639218821085,18.17587054544029,P78)
p(12.490056567269876,21.23354087941925,P79)
p(12.127728290954904,18.612716921160587,P80)
p(11.674082459885426,17.721534863467944,P81)
p(11.12911907406145,18.559994706341335,P82)
p(10.675473242991975,17.668812648648696,P83)
p(11.582764905130926,19.451176764033974,P84)
p(10.584155688237475,19.398454549214723,P85)
p(12.581374122024377,19.503898978853222,P86)
p(11.582764905130926,19.451176764033974,P87)
p(11.03780151930695,20.289636606907365,P88)
p(12.036410736200402,20.342358821726613,P89)
p(11.491447350376426,21.1808186646,P90)
p(10.492838133482975,21.128096449780752,P91)
p(20.568777211913535,20.154859989816007,P92)
p(20.42420821536731,19.16536526762815,P93)
p(19.639565147315114,19.785313052330736,P94)
p(19.4949961507689,18.795818330142907,P95)
p(18.710353082716694,19.415766114845454,P96)
p(18.584843815235693,20.40785856203795,P97)
p(19.190378759737847,21.203677279452144,P98)
p(19.576810513574614,20.28135927592698,P99)
p(20.182345458076774,21.077177993341156,P100)
p(19.795913704240007,21.999495996866322,P101)
p(17.788421186804825,19.80311812439278,P102)
p(17.015557679131305,21.6477541314431,P103)
p(17.944769743729722,22.017301068928383,P104)
p(18.08933874027595,23.006795791116232,P105)
p(18.87398180832814,22.386848006413658,P106)
p(18.99949107580914,21.394755559221167,P107)
p(18.393956131306986,20.598936841806974,P108)
p(18.007524377470222,21.52125484533213,P109)
p(17.401989432968062,20.725436127917945,P110)
p(17.160126675677528,22.637248853630965,P111)
p(17.304695672223758,23.626743575818814,P112)
p(16.375483607625334,23.257196638333546,P113)
p(16.52005260417156,24.246691360521407,P114)
p(16.230914611079115,22.267701916145697,P115)
p(15.308982715167247,22.655053925693018,P116)
p(14.536119207493728,24.49968993274335,P117)
p(14.922550961330487,23.57737192921818,P118)
p(15.914517659669404,23.45087264310721,P119)
p(15.528085905832647,24.373190646632374,P120)
p(15.434491982648245,21.662961478500527,P121)
p(13.059505908652444,23.15075955437497,P122)
p(13.797812558073083,23.825224743559158,P123)
p(14.012763221164551,22.848599834785816,P124)
p(14.75106987058519,23.52306502397,P125)
p(14.966020533676655,22.54644011519666,P126)
p(14.435141315082756,21.69899262109149,P127)
p(13.462598941176319,21.46626675025537,P128)
p(13.747323611867598,22.42487608773323,P129)
p(12.774781237961161,22.19215021689711,P130)
p(3.1393705826315665,15.92531891337363,P131)
p(2.8502328259473586,13.94632943445778,P132)
p(2.994801704289462,14.935824173915703,P133)
p(3.779444846400035,14.315876482945857,P134)
p(3.9240137247421414,15.305371222403782,P135)
p(4.708656866852716,14.685423531433933,P136)
p(4.834166252848152,13.693331099234673,P137)
p(4.228631403413764,12.897512309483846,P138)
p(3.842199539397755,13.819830266846223,P139)
p(3.236664689963363,13.024011477095398,P140)
p(3.623096553979372,12.101693519733018,P141)
p(5.6305888090372855,14.298071632019735,P142)
p(6.4034525370693025,12.453435717294976,P143)
p(5.474240516616624,12.083888668806898,P144)
p(5.329671638274519,11.094393929348975,P145)
p(4.545028496163944,11.71434162031882,P146)
p(4.419519110168505,12.706434052518084,P147)
p(5.025053959602898,13.50225284226891,P148)
p(5.411485823618907,12.579934884906532,P149)
p(6.017020673053297,13.375753674657354,P150)
p(6.258883658727196,11.463940977837048,P151)
p(6.114314780385087,10.474446238379127,P152)
p(7.043526800837771,10.843993286867198,P153)
p(6.898957922495664,9.854498547409273,P154)
p(7.188095679179869,11.83348802632512,P155)
p(8.110027621364436,11.446136126910925,P156)
p(8.882891349396452,9.601500212186167,P157)
p(8.496459485380443,10.523818169548543,P158)
p(7.504492771930051,10.650317337160098,P159)
p(7.8909246359460585,9.72799937979772,P160)
p(7.984518235369009,12.438228559110193,P161)
p(10.35950448709576,10.950430766949385,P162)
p(9.621197918246112,10.275965489567774,P163)
p(9.406247138487943,11.252590372663303,P164)
p(8.667940569638292,10.578125095281699,P165)
p(8.452989789880126,11.55474997837722,P166)
p(8.983868907238731,12.402197535900727,P167)
p(9.956411253343948,12.634923522915852,P168)
p(9.67168669716725,11.676314151425064,P169)
p(10.644229043272462,11.909040138440183,P170)
p(4.106345606152734,15.670447761835764,P171)
p(3.8435829863157336,16.635308272799083,P172)
p(4.0032867536417935,17.622473257339085,P173)
p(3.0685249156406496,17.26719828465353,P174)
p(4.266049373478795,16.65761274637577,P175)
p(4.970261777162962,17.367602105801225,P176)
p(5.041107444178958,16.02572273404631,P177)
p(5.745319847838046,16.735712093946777,P178)
p(5.905023615164105,17.72287707848678,P179)
p(6.008082467675048,15.770851582983454,P180)
p(6.167786235001105,16.75801656752346,P181)
p(6.871998638685273,17.468005926948916,P182)
p(6.942844305540058,16.126126558247527,P183)
p(7.647056709360356,16.83611591509447,P184)
p(7.806760476686417,17.823280899634472,P185)
p(7.9098193291973615,15.871255404131148,P186)
p(8.069523096523417,16.85842038867116,P187)
p(8.773735500207582,17.568409748096613,P188)
p(8.844581167555372,16.22653037005737,P189)
p(9.548793570882667,16.93651973624218,P190)
p(9.708497338208726,17.923684720782163,P191)
p(9.811556190719674,15.971659225278843,P192)
p(9.971259958045737,16.95882420981884,P193)
p(10.675472361729895,17.6688135692443,P194)
p(2.572611112420568,19.204740413169915,P195)
p(2.8205680140306093,18.235969348911723,P196)
p(3.5355699153244684,18.935091856878792,P197)
p(3.7835268169345113,17.9663207926206,P198)
p(4.4985287182283695,18.665443300587672,P199)
p(4.518875109463491,19.665236291343113,P200)
p(3.832908545784754,20.392869353754918,P201)
p(3.5457431109420297,19.434988352256514,P202)
p(2.859776547263291,20.162621414668322,P203)
p(3.1469419821060125,21.120502416166726,P204)
p(5.3745480423657614,19.147719304280443,P205)
p(5.948878912051208,21.06348130727725,P206)
p(4.985920109147311,21.333129863568377,P207)
p(4.737963207537265,22.301900927826566,P208)
p(4.022961306243409,21.602778419859497,P209)
p(4.002614915008286,20.602985429104052,P210)
p(4.688581478687023,19.875352366692248,P211)
p(4.97574691352975,20.833233368190655,P212)
p(5.661713477208484,20.10560030577885,P213)
p(5.700922010441166,22.03225237153545,P214)
p(5.452965108831122,23.00102343579364,P215)
p(6.415923911735021,22.731374879502518,P216)
p(6.1679670101249835,23.700145943760713,P217)
p(6.66388081334506,21.76260381524433,P218)
p(7.539900137482455,22.2448798189371,P219)
p(8.114231007167904,24.160641821933908,P220)
p(7.827065572325175,23.202760820435504,P221)
p(6.8539335738037135,22.972512881348905,P222)
p(7.141099008646436,23.930393882847312,P223)
p(7.519553746247333,21.245086828181652,P224)
p(9.724674802914638,22.974694613690303,P225)
p(8.919452905041279,23.567668217812113,P226)
p(8.808533649034864,22.573838796509342,P227)
p(8.003311751161485,23.166812400631144,P228)
p(7.892392495155072,22.17298297932839,P229)
p(8.509554759668072,21.386147075685713,P230)
p(9.501196031995317,21.25712154713727,P231)
p(9.117114781291365,22.180420844688,P232)
p(10.10875605361861,22.051395316139562,P233)
nolabel()
s(P9,P1) s(P10,P1)
s(P1,P2)
s(P1,P3) s(P2,P3)
s(P3,P4) s(P2,P4)
s(P4,P5) s(P2,P5) s(P77,P5) s(P76,P5)
s(P3,P6) s(P4,P6) s(P7,P6)
s(P7,P8)
s(P7,P9) s(P8,P9)
s(P8,P10) s(P9,P10)
s(P8,P11) s(P10,P11) s(P16,P11) s(P17,P11)
s(P7,P12) s(P6,P12) s(P18,P12) s(P20,P12)
s(P19,P13) s(P20,P13)
s(P13,P14)
s(P14,P15)
s(P14,P16) s(P15,P16) s(P17,P16)
s(P17,P18)
s(P17,P19) s(P18,P19)
s(P18,P20) s(P19,P20)
s(P15,P21) s(P14,P21)
s(P15,P22) s(P21,P22)
s(P22,P23) s(P21,P23)
s(P22,P24) s(P23,P24) s(P29,P24) s(P30,P24)
s(P23,P25) s(P13,P25) s(P26,P25)
s(P28,P27) s(P30,P27) s(P33,P27) s(P35,P27)
s(P26,P28)
s(P26,P29) s(P28,P29)
s(P28,P30) s(P29,P30)
s(P25,P31) s(P26,P31) s(P36,P31) s(P37,P31)
s(P39,P32) s(P40,P32)
s(P32,P33)
s(P32,P34) s(P33,P34)
s(P33,P35) s(P34,P35)
s(P34,P36) s(P35,P36) s(P37,P36)
s(P37,P38)
s(P37,P39) s(P38,P39)
s(P38,P40) s(P39,P40)
s(P38,P41) s(P40,P41)
s(P41,P42)
s(P41,P43) s(P42,P43)
s(P43,P44)
s(P43,P45) s(P44,P45) s(P168,P45) s(P170,P45)
s(P44,P46) s(P42,P46)
s(P44,P47) s(P46,P47)
s(P46,P48) s(P42,P48)
s(P47,P49) s(P48,P49)
s(P47,P50) s(P49,P50)
s(P49,P51) s(P48,P51)
s(P50,P52) s(P51,P52)
s(P50,P53) s(P52,P53) s(P192,P53) s(P193,P53)
s(P52,P54) s(P51,P54)
s(P54,P55)
s(P54,P56) s(P55,P56)
s(P56,P57)
s(P56,P58) s(P57,P58)
s(P57,P59) s(P55,P59)
s(P57,P60) s(P59,P60)
s(P59,P61) s(P55,P61)
s(P60,P62) s(P61,P62)
s(P60,P63) s(P62,P63)
s(P62,P64) s(P61,P64)
s(P63,P65) s(P64,P65)
s(P63,P66) s(P65,P66)
s(P65,P67) s(P64,P67)
s(P66,P68) s(P67,P68)
s(P66,P69) s(P68,P69)
s(P68,P70) s(P67,P70)
s(P69,P71) s(P70,P71)
s(P69,P72) s(P71,P72)
s(P71,P73) s(P70,P73)
s(P72,P74) s(P73,P74)
s(P72,P75) s(P74,P75)
s(P74,P76) s(P73,P76)
s(P75,P77) s(P76,P77)
s(P75,P78) s(P77,P78) s(P93,P78) s(P95,P78)
s(P89,P79) s(P90,P79) s(P128,P79) s(P130,P79)
s(P58,P80)
s(P58,P81) s(P80,P81)
s(P81,P82)
s(P81,P83) s(P82,P83)
s(P80,P84) s(P82,P84)
s(P82,P85) s(P84,P85)
s(P80,P86) s(P84,P86)
s(P85,P87) s(P86,P87)
s(P85,P88) s(P87,P88)
s(P86,P89) s(P87,P89)
s(P88,P90) s(P89,P90)
s(P88,P91) s(P90,P91) s(P231,P91) s(P233,P91)
s(P99,P92) s(P100,P92)
s(P92,P93)
s(P92,P94) s(P93,P94)
s(P93,P95) s(P94,P95)
s(P94,P96) s(P95,P96) s(P97,P96)
s(P97,P98)
s(P97,P99) s(P98,P99)
s(P98,P100) s(P99,P100)
s(P98,P101) s(P100,P101) s(P106,P101) s(P107,P101)
s(P96,P102) s(P97,P102) s(P108,P102) s(P110,P102)
s(P109,P103) s(P110,P103)
s(P103,P104)
s(P104,P105)
s(P104,P106) s(P105,P106) s(P107,P106)
s(P107,P108)
s(P107,P109) s(P108,P109)
s(P108,P110) s(P109,P110)
s(P104,P111) s(P105,P111)
s(P105,P112) s(P111,P112)
s(P111,P113) s(P112,P113)
s(P112,P114) s(P113,P114) s(P119,P114) s(P120,P114)
s(P103,P115) s(P113,P115) s(P116,P115)
s(P118,P117) s(P120,P117) s(P123,P117) s(P125,P117)
s(P116,P118)
s(P116,P119) s(P118,P119)
s(P118,P120) s(P119,P120)
s(P115,P121) s(P116,P121) s(P126,P121) s(P127,P121)
s(P129,P122) s(P130,P122)
s(P122,P123)
s(P122,P124) s(P123,P124)
s(P123,P125) s(P124,P125)
s(P124,P126) s(P125,P126) s(P127,P126)
s(P127,P128)
s(P127,P129) s(P128,P129)
s(P128,P130) s(P129,P130)
s(P133,P131) s(P135,P131)
s(P139,P132) s(P140,P132)
s(P132,P133)
s(P132,P134) s(P133,P134)
s(P133,P135) s(P134,P135)
s(P134,P136) s(P135,P136) s(P137,P136)
s(P137,P138)
s(P137,P139) s(P138,P139)
s(P138,P140) s(P139,P140)
s(P138,P141) s(P140,P141) s(P146,P141) s(P147,P141)
s(P136,P142) s(P137,P142) s(P148,P142) s(P150,P142)
s(P149,P143) s(P150,P143)
s(P143,P144)
s(P144,P145)
s(P144,P146) s(P145,P146) s(P147,P146)
s(P147,P148)
s(P147,P149) s(P148,P149)
s(P148,P150) s(P149,P150)
s(P144,P151) s(P145,P151)
s(P145,P152) s(P151,P152)
s(P151,P153) s(P152,P153)
s(P152,P154) s(P153,P154) s(P159,P154) s(P160,P154)
s(P143,P155) s(P153,P155) s(P156,P155)
s(P158,P157) s(P160,P157) s(P163,P157) s(P165,P157)
s(P156,P158)
s(P156,P159) s(P158,P159)
s(P158,P160) s(P159,P160)
s(P155,P161) s(P156,P161) s(P166,P161) s(P167,P161)
s(P169,P162) s(P170,P162)
s(P162,P163)
s(P162,P164) s(P163,P164)
s(P163,P165) s(P164,P165)
s(P164,P166) s(P165,P166) s(P167,P166)
s(P167,P168)
s(P167,P169) s(P168,P169)
s(P168,P170) s(P169,P170)
s(P131,P171)
s(P131,P172) s(P171,P172)
s(P172,P173)
s(P172,P174) s(P173,P174) s(P196,P174) s(P198,P174)
s(P171,P175) s(P173,P175)
s(P173,P176) s(P175,P176)
s(P171,P177) s(P175,P177)
s(P176,P178) s(P177,P178)
s(P176,P179) s(P178,P179)
s(P177,P180) s(P178,P180)
s(P179,P181) s(P180,P181)
s(P179,P182) s(P181,P182)
s(P180,P183) s(P181,P183)
s(P182,P184) s(P183,P184)
s(P182,P185) s(P184,P185)
s(P183,P186) s(P184,P186)
s(P185,P187) s(P186,P187)
s(P185,P188) s(P187,P188)
s(P186,P189) s(P187,P189)
s(P188,P190) s(P189,P190)
s(P188,P191) s(P190,P191)
s(P189,P192) s(P190,P192)
s(P191,P193) s(P192,P193)
s(P191,P194) s(P193,P194)
s(P202,P195) s(P203,P195)
s(P195,P196)
s(P195,P197) s(P196,P197)
s(P196,P198) s(P197,P198)
s(P197,P199) s(P198,P199) s(P200,P199)
s(P200,P201)
s(P200,P202) s(P201,P202)
s(P201,P203) s(P202,P203)
s(P201,P204) s(P203,P204) s(P209,P204) s(P210,P204)
s(P199,P205) s(P200,P205) s(P211,P205) s(P213,P205)
s(P212,P206) s(P213,P206)
s(P206,P207)
s(P207,P208)
s(P207,P209) s(P208,P209) s(P210,P209)
s(P210,P211)
s(P210,P212) s(P211,P212)
s(P211,P213) s(P212,P213)
s(P207,P214) s(P208,P214)
s(P208,P215) s(P214,P215)
s(P214,P216) s(P215,P216)
s(P215,P217) s(P216,P217) s(P222,P217) s(P223,P217)
s(P206,P218) s(P216,P218) s(P219,P218)
s(P221,P220) s(P223,P220) s(P226,P220) s(P228,P220)
s(P219,P221)
s(P219,P222) s(P221,P222)
s(P221,P223) s(P222,P223)
s(P218,P224) s(P219,P224) s(P229,P224) s(P230,P224)
s(P232,P225) s(P233,P225)
s(P225,P226)
s(P225,P227) s(P226,P227)
s(P226,P228) s(P227,P228)
s(P227,P229) s(P228,P229) s(P230,P229)
s(P230,P231)
s(P230,P232) s(P231,P232)
s(P231,P233) s(P232,P233)
pen(2)
color(#FFA500) m(P51,P54,MA10) m(P54,P55,MB10) b(P54,MA10,MB10)
color(#0000FF) m(P38,P41,MA11) m(P41,P42,MB11) b(P41,MA11,MB11)
color(#008000) m(P42,P43,MA12) m(P43,P44,MB12) b(P43,MA12,MB12)
pen(2)
color(red) s(P5,P77) abstand(P5,P77,A0) print(abs(P5,P77):,2.57,27.354) print(A0,5.05,27.354)
color(red) s(P5,P76) abstand(P5,P76,A1) print(abs(P5,P76):,2.57,26.783) print(A1,5.05,26.783)
print(min=0.9999998490573175,2.57,26.212)
print(max=1.0000000676159098,2.57,25.641)
\geooff
\geoprint()
Die Animation startet mit zusammenfallenden Punkten P46=P49 und endet mit zusammenfallenden P46=P43.
Noch ein wenig Theorie: Ein starrer 4/4-Graph hat 3 Einsetzkanten. Wenn er vier Doppelkites enthält, verbrauchen diese 4 Einsetzkanten, dadurch wird der Graph einfach beweglich. Nimmt man an, dass die verlängerten Doppelkites dieses Graphen auch je eine Einsetzkante verbrauchen, dann ist der Graph ebenfalls einfach beweglich. Das extra GAP-Programm sagt zu den verlängerten Doppelkites 2 Einsetzkanten und 1 Beweglichkeit, was wohl eine falsche Beweglichkeit ist. Damit haben die verlängerten Doppelkites effektiv auch je eine Einsetzkante.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.995, eingetragen 2017-05-20
|
Ich weiß zwar nicht wie die Animation zu starten wäre?
Aber den Aufbau bei dem zweiten Bild hast du perfekt verstanden
P53 bildet immer mit den festliegenden Punkten p131 und p45 einen rechten Winkel , also bewegt sich p53 ein Stück weit auf einem taleskreis, (siehe linke Skizze in Bild 993)
Mit federelementen kann ab einer Länge von sieben, jede Länge hergestellt werden, genauer ab einer Länge von 6,xx
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4333
Wohnort: Raun
| Beitrag No.996, eingetragen 2017-05-20
|
Wie gewohnt die Eingabe aus dem fedgeo-Quelltext in das Streichholzprogramm holen, dann Button "neu zeichnen" und dann den farbigen Kreis links von "Start_Demo" links des SVG-Graphen anklicken, dann sollte die Animation starten.
|
Profil
|
haribo
Senior
Dabei seit: 25.10.2012
Mitteilungen: 4683
| Beitrag No.997, eingetragen 2017-05-20
|
sehr gut, und vielen dank
könnte eine vier-kammer-pumpe oder herzquerschnitt sein
haribo
|
Profil
|
Slash
Aktiv
Dabei seit: 23.03.2005
Mitteilungen: 9230
Wohnort: Pferdehof
| Beitrag No.998, vom Themenstarter, eingetragen 2017-05-21
|
Ich denke, Fig.17 v8 lässt sich mit Fig.15b beweisen, indem man die rechte Seite spiegelt und mit der Parallelität der roten und blauen Kanten argumentiert.
http://www.matheplanet.de/matheplanet/nuke/html/uploads/b/8038_geo_beweis_fig.17_v8_-_Slash.png
|
Profil
|
StefanVogel
Senior
Dabei seit: 26.11.2005
Mitteilungen: 4333
Wohnort: Raun
| Beitrag No.999, eingetragen 2017-05-21
|
Mit den parallelen roten Kanten, das geht, jetzt nur noch aufschreiben, warum diese parallel sind. Es reicht ja der Beweis für die beiden kurzen oberen roten Kanten.
|
Profil
|
|
Home / Seite ohne Frame
Wie unterstütze ich den Matheplaneten mit Geld?
