OFFSET
0,3
LINKS
Robert Israel, Table of n, a(n) for n = 0..86
FORMULA
EXAMPLE
-P = (0, -1), -3P = (-1 ,0), -5P = (1/4, -3/8), -7P = (-5/9, -35/27).
MAPLE
f:= proc(m) option remember; -(-145*procname(m - 7)*procname(m - 1) + 3225*procname(m - 6)*procname(m - 2) - 18705*procname(m - 5)*procname(m - 3) + 14964*procname(m - 4)^2)/procname(m - 8) end proc:
Data:= [1, 0, 3, 35, -92, 8555, 162024, 2882165, 3906507129, -88075171080]:
for i from 0 to 9 do f(i):= Data[i+1] od:
map(f, [$0..20]); # Robert Israel, Oct 06 2020
PROG
(PARI) {a(n) = -numerator(ellmul(ellinit([0, 0, 1, -1, 0]), [0, 0], -2*n-1)[2])};
CROSSREFS
KEYWORD
sign
AUTHOR
Michael Somos, Apr 13 2020
STATUS
approved