[math-fun] Is 17 trying to tell us something?
{Cos[π/17]==1/16 (1-√17+√(34-2 √17)+2 √(17+3 √17+√(170+38 √17))), Sin[π/34]==1/16 (-1+√17+√(34-2 √17)-2 √(17+3 √17-√(170+38 √17)))} or even 2 √(17 + 3 √17 - √(170 + 38 √17)) == √( 2 (3 + √17) (2 √17 - √(2 (17 - √17)))) et al. https://mathworld.wolfram.com/TrigonometryAnglesPi17.html includes a messier version of Cos[π/17]. (People keep forgetting that Sin[π/5] is messier than Sin[π/10].) —rwg
Bill Gosper wrote:
(People keep forgetting that Sin[π/5] is messier than Sin[π/10].)
Only people who paid (or are paid) for using Mathematica. Or didn't you mean that Mathematica command, but rather the value sin(π/5) ? Not that surprising, we all know that sin(π/3) is also messier than sin(π/6) ... Concerning 17, you can find through wikipedia.org/wiki/Trigonometric_constants_expressed_in_real_radicals that this is related to constructibility of the wikipedia.org/wiki/Heptadecagon . 17 is just the third (m=2) of the Fermat primes 2^2^m + 1, after 3 and 5. 257 and 65537 will tell you roughly the same thing as 17 (although more verbosely: Hermes spent 10 years to write it up in a 200 pages manuscript...). (Guess who proved that it can be done: Shares initial of last name with you! ;-)) For +1 they must be prime, but for 2^2^m - 1 you can use a²-1 = (a+1)(a-1) to go one further up to m=5 (i.e., n ~ 4.3e9). If you can do it (or show it can be done) for a larger odd n, people might be interested. (See also oeis.org/A045544.) - Maximilian
On Wed, Dec 2, 2020 at 4:18 PM Bill Gosper <billgosper@gmail.com> wrote:
{Cos[π/17]==1/16 (1-√17+√(34-2 √17)+2 √(17+3 √17+√(170+38 √17))),
Sin[π/34]==1/16 (-1+√17+√(34-2 √17)-2 √(17+3 √17-√(170+38 √17)))}
or even
2 √(17 + 3 √17 - √(170 + 38 √17)) == √( 2 (3 + √17) (2 √17 - √(2 (17 - √17))))
et al. I.e., {Cos[π/17]==1/16 (1-√17+√(34-2 √17)+2 √(17+3 √17+√(170+38 √17)))==1/16 (1-√17+√(34-2 √17)+√(2(3+√17)(2√17+√(2(17-√17))))), Sin[π/34]==1/16 (-1+√17+√(34-2 √17)-2 √(17+3 √17-√(170+38 √17)))==1/16 (-1+√17+√(34-2 √17)-√( 2 (3 + √17) (2 √17 - √(2 (17 - √17)))))} You might suspect that FullSimplify is sufficiently exhaustive, and I am sufficiently nefarious, to concoct these with a jiggered SimplifyCount function which favors "17"s. I confess to trying, but that didn't seem to do anything. —rwg
https://mathworld.wolfram.com/TrigonometryAnglesPi17.html includes a messier version of Cos[π/17].
(People keep forgetting that Sin[π/5] is messier than Sin[π/10].) —rwg
participants (2)
-
Bill Gosper -
M F Hasler