A363415 a(n) = the real part of Product_{k = 0..n} 1 + k*sqrt(-5).
1, 1, -9, -54, 426, 6426, -50274, -1465884, 10992996, 552727476, -3792193524, -312571718424, 1853425616616, 248005863100296, -1173524207653224, -263102748395914224, 865735128320476176, 359884863190774985616, -584551982838131141904, -616984573598760535235424, -155177934223071790979424
Offset: 0
Examples
Type 2 prime p = 3: the sequence of 3-adic valuations [v_3(a(n)) : n = 0..80] = [0, 0, 2, 3, 1, 3, 3, 3, 4, 4, 4, 5, 5, 5, 7, 7, 7, 8, 8, 8, 9, 9, 9, 12, 12, 12, 13, 13, 13, 14, 14, 14, 16, 16, 16, 17, 17, 17, 18, 18, 18, 20, 20, 20, 21, 21, 21, 22, 22, 22, 25, 25, 25, 26, 26, 26, 27, 27, 27, 29, 29, 29, 30, 30, 30, 31, 31, 31, 33, 33, 33, 34, 34, 34, 35, 35, 35, 39, 39, 40, 40]. Note that v_3(a(80)) = 40 = 80/(3 - 1), in agreement with the asymptotic behavior for type 2 primes conjectured above. Type 3 prime p = 17: the sequence of 17-adic valuations [v_17(a(n)) : n = 0..100] = [0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 2, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0], showing the oscillatory behavior for type 3 primes conjectured above.
Links
- Victor H. Moll, An arithmetic conjecture on a sequence of arctangent sums, 2012, see f_n.
Programs
-
Maple
a := proc(n) option remember; if n = 0 then 1 elif n = 1 then 1 else ( (2*n - 1)*a(n-1) - n*(5*n^2 - 10*n + 6)*a(n-2) )/(n - 1) end if; end: seq(a(n), n = 0..20);
Formula
a(n) = Sum_{k = 0..floor((n+1)/2)} (-5)^k*Stirling1(n+1,n+1-2*k).
a(n+1)/a(n) = 1 - (5*n + 5)*tan(Sum_{k = 1..n} arctan(sqrt(5)*k))/sqrt(5).
P-recursive: (n - 1)*a(n) = (2*n - 1)*a(n-1) - n*(5*n^2 - 10*n + 6)*a(n-2) with
a(0) = a(1) = 1.
Comments