WOLFRAM|DEMONSTRATIONS PROJECT

Maximum Size of Involute Gear Teeth

​
grow involute surface
number of pairs
2
3
4
5
6
7
8
9
10
width
show polygon
show left
Lighter
:Darker[ColorData[97][2],0.7] should be a valid color directive, an image, or a list of them.
Lighter
:Darker[ColorData[97][1],0.58] should be a valid color directive, an image, or a list of them.
Lighter
:Darker[ColorData[97][3],0.75] should be a valid color directive, an image, or a list of them.
General
:Further output of Lighter::arg will be suppressed during this calculation.
MapThread
:Object ColorData[97,ColorList]〚{2,1,3,4,5,6,7,8,9,10}〛 at position {2, 2​} in MapThread[{Specularity[White,#1],#2,Lighting#3}&,{{3,3,3,6,6,6,6,3,6,6},1,{{{Ambient,Lighter[Darker[ColorData[1][1],0.7],0.05]},{Directional,Darker[ColorData[97][2],0.7],ImageScaled[{0,2,2}]},{1},{Directional,Darker[ColorData[97][2],0.7],ImageScaled[{2,0,2}]}},9}}] has only 0 of required 1 dimensions.
Pairs of surfaces with the involutes of a circle as cross sections are plotted from the vertices of regular polygons. The diameter of the circle where the surfaces meet determines the maximum theoretically possible involute gear tooth size.