A166655 Totally multiplicative sequence with a(p) = 6p-1 for prime p.

1, 11, 17, 121, 29, 187, 41, 1331, 289, 319, 65, 2057, 77, 451, 493, 14641, 101, 3179, 113, 3509, 697, 715, 137, 22627, 841, 847, 4913, 4961, 173, 5423, 185, 161051, 1105, 1111, 1189, 34969, 221, 1243, 1309, 38599, 245, 7667, 257, 7865, 8381, 1507, 281

Offset

1,2

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Formula

Multiplicative with a(p^e) = (6p-1)^e. If n = Product p(k)^e(k) then a(n) = Product (6*p(k)-1)^e(k).

Mathematica

a[1] = 1; a[n_] := (fi = FactorInteger[n]; Times @@ ((6*fi[[All, 1]] - 1)^fi[[All, 2]])); Table[a[n], {n, 1, 100}] (* G. C. Greubel, May 21 2016 *)

Crossrefs

Sequence in context: A090286 A226677 A056577 * A262552 A279332 A286959

Adjacent sequences: A166652 A166653 A166654 * A166656 A166657 A166658

Keyword

nonn,mult

Author

Jaroslav Krizek, Oct 18 2009

Status

approved