login
A051808
Numbers with nonzero multiplicative digital root 6.
3
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
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
KEYWORD
nonn,easy,base
AUTHOR
Dan Hoey, Dec 09 1999
STATUS
approved