OFFSET
0,2
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..10000
Eric Weisstein's World of Mathematics, Pappus Graph.
Wikipedia, Pappus graph.
Wolframalpha, Pappus graph.
Index entries for linear recurrences with constant coefficients, signature (19,-171,969,-3876,11628,-27132,50388,-75582,92378,-92378,75582,-50388,27132,-11628,3876,-969,171,-19,1).
FORMULA
a(n) = (n-3)*n^4*(n+3)*(n^2-3)^6.
MATHEMATICA
Table[n^4*(n^2 - 9)*(n^2 - 3)^6, {n, 0, 20}] (* Paolo Xausa, Dec 07 2024 *)
PROG
(Python)
a = lambda n: (n-3)*(n**4)*(n+3)*(n**2-3)**6
print([a(n) for n in range(0, 18)])
(PARI) a(n)=(n-3)*(n+3)*n^4*(n^2-3)^6 \\ Charles R Greathouse IV, Oct 12 2024
(Python)
def A376951(n): return (m:=n**2)**2*(m-9)*(m-3)**6 # Chai Wah Wu, Oct 12 2024
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Darío Clavijo, Oct 10 2024
STATUS
approved