|
|
A143980
|
|
Binomial transform of A079260.
|
|
1
|
|
|
0, 0, 0, 0, 1, 6, 21, 56, 126, 252, 462, 792, 1288, 2016, 3108, 4928, 8569, 17154, 38931, 94164, 229824, 550088, 1278662, 2884752, 6335005, 13590930, 28575315, 59014620, 119878606, 239662236, 471605976, 913302656, 1740247806, 3262146492, 6015853242
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,6
|
|
LINKS
|
|
|
FORMULA
|
a(n) = Sum_{k=5..n} C(n,k) * A079260(k).
|
|
EXAMPLE
|
a(13) = [1287,1716,1716,1287,715,286,78,13,1] * [1,0,0,0,0,0,0,0,1] = 1287+1 = 1288.
|
|
MAPLE
|
bintrans:= proc(p) proc (n) add (p(k) *binomial(n, k), k=0..n) end end: f:= proc(n) if isprime(n) and modp(n, 4)=1 then 1 else 0 fi end: a:= bintrans(f): seq (a(n), n=1..40);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|