A166669 Totally multiplicative sequence with a(p) = 3p-2 for prime p.

1, 4, 7, 16, 13, 28, 19, 64, 49, 52, 31, 112, 37, 76, 91, 256, 49, 196, 55, 208, 133, 124, 67, 448, 169, 148, 343, 304, 85, 364, 91, 1024, 217, 196, 247, 784, 109, 220, 259, 832, 121, 532, 127, 496, 637, 268, 139, 1792, 361, 676

Offset

1,2

Links

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

Formula

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

Mathematica

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

Crossrefs

Sequence in context: A213358 A065935 A361975 * A286701 A077582 A037373

Adjacent sequences: A166666 A166667 A166668 * A166670 A166671 A166672

Keyword

nonn,mult

Author

Jaroslav Krizek, Oct 18 2009

Status

approved