|
|
A204517
|
|
Square root of floor[A055859(n)/7].
|
|
10
|
|
|
0, 0, 0, 1, 3, 6, 17, 48, 96, 271, 765, 1530, 4319, 12192, 24384, 68833, 194307, 388614, 1097009, 3096720, 6193440, 17483311, 49353213, 98706426, 278635967, 786554688, 1573109376, 4440692161, 12535521795, 25071043590, 70772438609, 199781794032, 399563588064
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,5
|
|
LINKS
|
|
|
FORMULA
|
G.f. = (x^4 + 3*x^5 + 6*x^6 + x^7)/(1 - 16*x^3 + x^6)
|
|
PROG
|
(PARI) b=7; for(n=1, 2e9, issquare(n^2\b) & print1(sqrtint(n^2\b), ", "))
(PARI) A204517(n)=polcoeff((x^4 + 3*x^5 + 6*x^6 + x^7)/(1 - 16*x^3 + x^6+O(x^n)), n)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|