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!)
A086336 Records in A087666. 6
0, 3, 4, 7, 9, 16, 20, 21, 24, 26, 29, 32, 38, 39, 43, 45, 46, 48, 52, 60 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

LINKS

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

FORMULA

a(n) = A087666(A087663(n))

MATHEMATICA

f[n_] := Block[{c = 1, k = n/3}, If[ IntegerQ[k], 0, While[tn = Floor[k]; tf = k - tn; tn = Mod[tn, 3^500]; k = tn(tn + tf); !IntegerQ[k], c++ ]; c++ ]]; f /@ {A087663}

CROSSREFS

Cf. A087666, A087663.

Sequence in context: A301767 A169898 A281734 * A237258 A108796 A048849

Adjacent sequences:  A086333 A086334 A086335 * A086337 A086338 A086339

KEYWORD

nonn,more

AUTHOR

N. J. A. Sloane, Sep 27 2003

EXTENSIONS

More terms from Robert G. Wilson v, Oct 10 2003

a(11) from N. J. A. Sloane, Oct 16 2003

More terms from Robert G. Wilson v, Mar 11 2004

a(17)-a(20) from Max Alekseyev, Jul 29 2011

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 March 28 14:24 EDT 2020. Contains 333089 sequences. (Running on oeis4.)