A166667 Totally multiplicative sequence with a(p) = 9p+1 for prime p.

1, 19, 28, 361, 46, 532, 64, 6859, 784, 874, 100, 10108, 118, 1216, 1288, 130321, 154, 14896, 172, 16606, 1792, 1900, 208, 192052, 2116, 2242, 21952, 23104, 262, 24472, 280, 2476099, 2800, 2926, 2944, 283024, 334, 3268, 3304, 315514, 370, 34048, 388

Offset

1,2

Links

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

Formula

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

Mathematica

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

Crossrefs

Sequence in context: A067452 A123944 A095046 * A121458 A268488 A254330

Adjacent sequences: A166664 A166665 A166666 * A166668 A166669 A166670

Keyword

nonn,mult

Author

Jaroslav Krizek, Oct 18 2009

Status

approved