New answers tagged

7

Here's something you can start with, rinit = 6; rfactor = 0.05; rstep = .025; npoints = Floor[(rinit - rfactor rinit)/rstep]; imglist = Table[ With[{r = rinit - n rstep}, Graphics[{Thickness[.03], Circle[#, rfactor r]} & /@ CirclePoints[{0, -r + 2 (rinit - npoints rstep)}, {r, 2 π/npoints n}, 40.], ImageSize -> ...


9

Fun question. A simple but fast two-part solution which revolves around performing a 2D cross product on the coordinates of the vertices of the route to calculate the Left / Right / Straight, and then finding just those vertices at which a decision actually has to be made via their VertexDegree: Using your style def g = GridGraph[{20, 30}, EdgeWeight -> ...



Top 50 recent answers are included