A328184 Denominator of time taken for a vertex of a rolling regular n-sided polygon to reach the ground.
4, 8, 20, 12, 28, 16, 12, 20, 44, 24, 52, 28, 20, 32, 68, 36, 76, 40, 28, 44, 92, 48, 100, 52, 36, 56, 116, 60, 124, 64, 44, 68, 140, 72, 148, 76, 52, 80, 164, 84, 172, 88, 60, 92, 188, 96, 196, 100, 68, 104, 212, 108, 220, 112, 76, 116, 236, 120, 244, 124, 84
Offset: 3
Examples
For n = 3, a(3) = denominator of ((2*3-3)/4*n) = denominator of (3/12) = denominator of (1/4) = 4. a(4) = 8 since it takes 3/8 of a full revolution of a square for a vertex to go from the highest point to the lowest point. When the vertex is at its highest position the square will be oriented at 45 degrees to the plane.
Crossrefs
Cf. A328185 (numerators).
Programs
-
Mathematica
Array[Denominator[(2 (# - 1) - Mod[#, 2])/(4 #)] &, 61, 3] (* Michael De Vlieger, Oct 06 2019 *)
-
PARI
a(n) = {denominator((2*(n-1) - n%2)/(4*n))} \\ Andrew Howroyd, Oct 06 2019
Formula
a(n) = denominator((n - 1) / (2*n)) for even n; a(n) = denominator((2*n - 3) / (4*n)) for odd n.
Comments