A166659 Totally multiplicative sequence with a(p) = 10p-1 for prime p.

1, 19, 29, 361, 49, 551, 69, 6859, 841, 931, 109, 10469, 129, 1311, 1421, 130321, 169, 15979, 189, 17689, 2001, 2071, 229, 198911, 2401, 2451, 24389, 24909, 289, 26999, 309, 2476099, 3161, 3211, 3381, 303601, 369, 3591, 3741, 336091, 409, 38019, 429

Offset

1,2

Links

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

Formula

Multiplicative with a(p^e) = (10p-1)^e. If n = Product p(k)^e(k) then a(n) = Product (10*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 21 2016 *)

Crossrefs

Sequence in context: A276732 A038542 A269262 * A298763 A309962 A316678

Adjacent sequences: A166656 A166657 A166658 * A166660 A166661 A166662

Keyword

nonn,mult

Author

Jaroslav Krizek, Oct 18 2009

Status

approved