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

%I

%S 0,3,4,7,9,16,20,21,24,26,29,32,38,39,43,45,46,48,52,60

%N Records in A087666.

%F a(n) = A087666(A087663(n))

%t 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}

%Y Cf. A087666, A087663.

%K nonn,more

%O 1,2

%A _N. J. A. Sloane_, Sep 27 2003

%E More terms from _Robert G. Wilson v_, Oct 10 2003

%E a(11) from _N. J. A. Sloane_, Oct 16 2003

%E More terms from _Robert G. Wilson v_, Mar 11 2004

%E a(17)-a(20) from _Max Alekseyev_, Jul 29 2011

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 May 27 11:23 EDT 2020. Contains 334657 sequences. (Running on oeis4.)