A277571 Numbers k such that k/6^m == 5 (mod 6), where 6^m is the greatest power of 6 that divides k.

5, 11, 17, 23, 29, 30, 35, 41, 47, 53, 59, 65, 66, 71, 77, 83, 89, 95, 101, 102, 107, 113, 119, 125, 131, 137, 138, 143, 149, 155, 161, 167, 173, 174, 179, 180, 185, 191, 197, 203, 209, 210, 215, 221, 227, 233, 239, 245, 246, 251, 257, 263, 269, 275, 281

Offset

1,1

Comments

Positions of 5 in A277544.

Numbers having 5 as rightmost nonzero digit in base 6. This is one sequence in a 5-way splitting of the positive integers; the other four are indicated in the Mathematica program.

Links

Clark Kimberling, Table of n, a(n) for n = 1..10000

Formula

a(n) = 5n + O(log n). - Charles R Greathouse IV, Nov 03 2016

Mathematica

z = 260; a[b_] := Table[Mod[n/b^IntegerExponent[n, b], b], {n, 1, z}]
p[b_, d_] := Flatten[Position[a[b], d]]
p[6, 1] (* A277567 *)
p[6, 2] (* A277568 *)
p[6, 3] (* A277569 *)
p[6, 4] (* A277570 *)
p[6, 5] (* A277571 *)

Prog

(PARI) is(n) = Mod(n/6^valuation(n, 6), 6)==5 \\ Felix Fröhlich, Nov 02 2016

Crossrefs

Cf. A277544, A277567, A277570.

Sequence in context: A111863 A333656 A043389 * A000966 A031480 A070753

Adjacent sequences: A277568 A277569 A277570 * A277572 A277573 A277574

Keyword

nonn,easy

Author

Clark Kimberling, Nov 01 2016

Status

approved