A044009 Numbers k such that 1 and 6 occur juxtaposed in the base-10 representation of k but not of k+1.

16, 61, 116, 169, 216, 261, 316, 361, 416, 461, 516, 561, 619, 661, 716, 761, 816, 861, 916, 961, 1016, 1061, 1116, 1169, 1216, 1261, 1316, 1361, 1416, 1461, 1516, 1561, 1699, 1716, 1761, 1816, 1861, 1916, 1961, 2016, 2061

Offset

1,1

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000

Mathematica

With[{j = 1, k = 6}, SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {j, k}] > 0 || SequenceCount[IntegerDigits[n], {k, j}] > 0, 1, 0], {n, 2100}], {1, 0}][[All, 1]]] (* Michael De Vlieger, Aug 27 2021 *)

Crossrefs

Sequence in context: A039406 A031190 A043229 * A317431 A241523 A264632

Adjacent sequences: A044006 A044007 A044008 * A044010 A044011 A044012

Keyword

nonn,base

Author

Clark Kimberling

Status

approved