# User Portlet Ed Pegg
Discussions
How to solve something like this? Consider the problem of covering the largest possible equilateral triangle with two unit squares. I make a sketch in Geometer's Sketchpad first. ![two squares] Then put the equations right into...
Missing—one square to four, or one equilateral triangle to four. How about one square to five? AlgebraicSubstitutionTiling[{1,{{-3,-1},{-3,1},{-1,-3},{-1,-1},{-1,1},{-1,3},{1,-3},{1,-1},{1,1},{1,3},{3,-1},{3,1}}, {{1,6,12,7}->...
Manipulate[Module[{sol2}, sol2=ParametricNDSolve[{x'[t]==Cos[t],y'[t]==Sin[t],z'[t]==b*1/4,x==0,y==1,z==0},{x,y,z},{t,0,100},{a}]; ...
Code for a nice Venn 5. ![venn5] pp=RootReduce[2CirclePoints/(EuclideanDistance@@CirclePoints[[{1,2}]])]; sp=Join[Table[2.12CirclePoints[[Mod[n-2,10,1]]]+pp[],{n,1,9}], ...
Every node has six lines. Every line has six nodes. If you like these designs You can try out my codes. ![96_6 configuration] base={{0,-1},{0,Root[1+2 #1+2 #1^3+#1^4&,2]},{1/2,Root[-11-8 #1+24 #1^2-32 #1^3+16...
How to label faces of a cube with numbers 1 to 6? First, I'll turn text outlines into polygons. SymbolToPolygon[symbol_, dimension_: "3D"] := Module[{pol, poly, index, pos, minmax, diffs, poly2D}, pol =...
That's very nice. Thank you for bringing it to my attention.
On 17 October 2018, [Ivan Neretin discovered the octagonal dodecahedron](https://math.stackexchange.com/questions/2869725/), a toroid made from twelve octagons. **4**, 6, 8 triangles can make a tetrahedron and up. The [Snub...