|
%I #9 Apr 15 2018 07:38:21
%S 342,438,546,666,798,942,1098,1266,1446,1638,1842,2058,2286,2526,2778,
%T 3042,3318,3606,3906,4218,4542,4878,5226,5586,5958,6342,6738,7146,
%U 7566,7998,8442,8898,9366,9846,10338,10842,11358,11886,12426
%N "666" in bases 7 and higher rewritten in base 10.
%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (3,-3,1).
%F a(n) = 6*(n^2 + n + 1) = a(n-1) + 12*n.
%e In octal notation "666" means 6*8*8 + 6*8 + 6 = 438.
%t Table[FromDigits[{6,6,6},n],{n,7,50}] (* or *) LinearRecurrence[{3,-3,1},{342,438,546},40] (* _Harvey P. Dale_, Apr 15 2018 *)
%o (PARI) a(n) = 6*(n^2 + n + 1); \\ _Michel Marcus_, Aug 20 2013
%K easy,nonn
%O 7,1
%A _Axel Harvey_, Aug 19 2006
%E More terms from _Michel Marcus_, Aug 20 2013
|
