login
A044009
Numbers k such that 1 and 6 occur juxtaposed in the base-10 representation of k but not of k+1.
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
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
KEYWORD
nonn,base
STATUS
approved