A366490 a(n) = (n^17 - n)/17.
0, 0, 7710, 7596480, 1010580540, 44878791360, 995685849690, 13684147881600, 132458812569720, 981010688215680, 5882352941176470, 29732178147017280, 130506535690613940, 508847995257725760, 1793608631137129170, 5795654431511374080, 17361641481138401520
Offset: 0
Links
- Stefano Spezia, Table of n, a(n) for n = 0..10000
- Jack Jeffries, Differentiating by prime numbers, Notices Amer. Math. Soc., 70:11 (2023), 1772-1779.
- Index entries for linear recurrences with constant coefficients, signature (18,-153,816,-3060,8568,-18564,31824,-43758,48620,-43758,31824,-18564,8568, -3060,816,-153,18,-1).
Programs
-
Mathematica
A366490[n_]:=(n^17-n)/17;Array[A366490,30,0] (* Paolo Xausa, Nov 14 2023 *)
Formula
a(n) == 0 (mod 30), with 30 = A110936(primepi(17)). - Hugo Pfoertner, Nov 14 2023
Comments