login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A270811 Records in A266569. 3

%I

%S 1,5,30,68,132,154,248,261,322,326,468,533,646,702,896,943,1065,1103,

%T 1282,1311,1442,1462,1740,1751,1891,1893,2117,2259,2542,2675,2910,

%U 3034,3416,3531,3775,3881,4209,4306,4559,4647,5050,5129,5391,5461,5834,5895,6166,6218,6756

%N Records in A266569.

%H R. J. Mathar, <a href="/A270811/b270811.txt">Table of n, a(n) for n = 1..1000</a>

%F a(n) = A266569(A270812(n)). - _R. J. Mathar_, May 06 2016

%t a[1] = 1; a[n_] := a[n] = If[EvenQ@ n, 2 n + a[n/2], (n - 1)/2 + a[2 (n + 1)]]; Union@ Rest@ FoldList[Max, 0, #] &@ Array[a, 10^3] (* _Michael De Vlieger_, May 06 2016 *)

%Y Cf. A266569, A270812.

%K nonn

%O 1,2

%A _N. J. A. Sloane_, Apr 07 2016

%E Typo in definition corrected by _Felix Fröhlich_, Apr 07 2016

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 August 26 03:33 EDT 2019. Contains 326324 sequences. (Running on oeis4.)