A166675 Totally multiplicative sequence with a(p) = 7p+2 for prime p.

1, 16, 23, 256, 37, 368, 51, 4096, 529, 592, 79, 5888, 93, 816, 851, 65536, 121, 8464, 135, 9472, 1173, 1264, 163, 94208, 1369, 1488, 12167, 13056, 205, 13616, 219, 1048576, 1817, 1936, 1887, 135424, 261, 2160, 2139, 151552, 289, 18768, 303, 20224

Offset

1,2

Links

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

Formula

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

Mathematica

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

Crossrefs

Sequence in context: A006616 A225929 A179370 * A114405 A098351 A206267

Adjacent sequences: A166672 A166673 A166674 * A166676 A166677 A166678

Keyword

nonn,mult

Author

Jaroslav Krizek, Oct 18 2009

Status

approved