A051808 Numbers with nonzero multiplicative digital root 6.

6, 16, 23, 28, 32, 44, 47, 48, 60, 61, 68, 74, 82, 84, 86, 106, 116, 123, 128, 132, 144, 147, 148, 160, 161, 168, 174, 182, 184, 186, 203, 208, 213, 218, 224, 227, 228, 230, 231, 238, 242, 244, 246, 256, 264, 265, 267, 272, 276

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Index entries for 10-automatic sequences.

Formula

A051802^-1(6)

Mathematica

nzdr6Q[n_]:=NestWhile[Times@@DeleteCases[IntegerDigits[#], 0]&, n, #>9&]==6; Select[Range[ 300], nzdr6Q] (* Harvey P. Dale, Jul 20 2024 *)

Crossrefs

Part of histogram of A051802.

Sequence in context: A118139 A087446 A340497 * A034053 A199988 A114222

Adjacent sequences: A051805 A051806 A051807 * A051809 A051810 A051811

Keyword

nonn,easy,base

Author

Dan Hoey, Dec 09 1999

Status

approved