login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A044709 Numbers n such that string 8,5 occurs in the base 9 representation of n but not of n+1. 2
77, 158, 239, 320, 401, 482, 563, 644, 701, 725, 806, 887, 968, 1049, 1130, 1211, 1292, 1373, 1430, 1454, 1535, 1616, 1697, 1778, 1859, 1940, 2021, 2102, 2159, 2183, 2264, 2345, 2426, 2507, 2588, 2669, 2750, 2831, 2888, 2912, 2993, 3074, 3155, 3236, 3317 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Georg Fischer, Table of n, a(n) for n = 1..1000

MAPLE

q:= n-> searchtext("58", cat("", convert(n, base, 9)[]))>0:

a:= proc(n) option remember; local k; for k from 1+

     `if`(n=1, 0, a(n-1)) while not q(k) or q(k+1) do od; k

    end:

seq(a(n), n=1..50);  # Alois P. Heinz, Jun 27 2019

MATHEMATICA

SequencePosition[Table[If[SequenceCount[IntegerDigits[n, 9], {8, 5}]>0, 1, 0], {n, 3500}], {1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 19 2021 *)

CROSSREFS

Cf. A007095, A044328.

Sequence in context: A118226 A113945 A044328 * A338189 A308963 A075253

Adjacent sequences:  A044706 A044707 A044708 * A044710 A044711 A044712

KEYWORD

nonn,base

AUTHOR

Clark Kimberling

EXTENSIONS

Corrected and extended by Harvey P. Dale, Dec 24 2015

Previous values restored by Georg Fischer, Jun 27 2019

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 30 07:55 EDT 2021. Contains 346348 sequences. (Running on oeis4.)