|
|
A289443
|
|
a(0) = 2, a(1) = 6; thereafter a(n) = 3*n^2.
|
|
1
|
|
|
2, 6, 12, 27, 48, 75, 108, 147, 192, 243, 300, 363, 432, 507, 588, 675, 768, 867, 972, 1083, 1200, 1323, 1452, 1587, 1728, 1875, 2028, 2187, 2352, 2523, 2700, 2883, 3072, 3267, 3468, 3675, 3888, 4107, 4332, 4563, 4800, 5043, 5292, 5547, 5808, 6075, 6348, 6627, 6912, 7203, 7500
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Join[{2, 6}, Table[3 n^2, {n, 2, 50}]] (* or *) {2, 6}~Join~LinearRecurrence[{3, -3, 1}, {12, 27, 48}, 50] (* Vincenzo Librandi, Jul 08 2017 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|