A044029 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

A044029

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

48, 84, 148, 184, 248, 284, 348, 384, 448, 489, 548, 584, 648, 684, 748, 784, 849, 884, 948, 984, 1048, 1084, 1148, 1184, 1248, 1284, 1348, 1384, 1448, 1489, 1548, 1584, 1648, 1684, 1748, 1784, 1849, 1884, 1948, 1984, 2048

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Table of n, a(n) for n=1..41.

MATHEMATICA

SequencePosition[Table[If[SequenceCount[IntegerDigits[n], {4, 8}]>0 || SequenceCount[ IntegerDigits[n], {8, 4}]>0, 1, 0], {n, 2200}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 21 2019 *)

CROSSREFS

Sequence in context: A260494 A039426 A043249 * A333814 A062902 A260106

Adjacent sequences: A044026 A044027 A044028 * A044030 A044031 A044032

KEYWORD

nonn,base

AUTHOR

Clark Kimberling

STATUS

approved