A103948 a(n) is the number of distinct n-th powers of functions {1, 2, 3} -> {1, 2, 3}.

1, 27, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19, 12, 21, 10, 21, 12, 19

Offset: 0

Author

David Wasserman, Feb 21 2005

Keywords

• easy
• nonn

Links

• Index entries for linear recurrences with constant coefficients, signature (-1, 0, 1, 1).

Crossrefs

Cf. A102687, A102709, A103947, A103949, A103950.

Row n=3 of A247026.

Programs

Mathematica

Join[{1, 27},LinearRecurrence[{-1, 0, 1, 1},{12, 19, 12, 21},68]] (* Ray Chandler, Sep 08 2015 *)

Formula

For n > 1, a(n) = a(n+6).

G.f.: (6*x^5-3*x^4-30*x^3-39*x^2-28*x-1) / ((x-1)*(x+1)*(x^2+x+1)). - Colin Barker, Aug 07 2013