|
|
|
|
1, 6, 13, 23, 36, 51, 69, 89, 112, 138, 166, 197, 231, 267, 306, 347, 391, 438, 487, 539, 593, 650, 710, 772, 837, 905, 975, 1048, 1123, 1201, 1282, 1365, 1451, 1540, 1631, 1725, 1821, 1920, 2022, 2126, 2233, 2342, 2454, 2569, 2686, 2806, 2929
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
a(n)=-1+sum(floor(j+j*r) : 1<=j<=n), where r=(1+sqrt(5))/2, the golden ratio.
|
|
MATHEMATICA
|
c[k_]:=-1+Sum[Floor[j+j*GoldenRatio], {j, 1, k}];
c=Table[c[k], {k, 1, 40}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|