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!)
A173871 Row sums of A114994. 2
0, 1, 5, 16, 53, 145, 441, 1165, 3325, 8840, 24268, 63542, 172420, 446485, 1182329, 3055461, 7966038, 20351233, 52507157, 133014971, 339170500, 853849745, 2154442760, 5382418592, 13481157491, 33449252747, 83091028844, 205013093570, 505799029994, 1240477207822, 3042433058325 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,3

LINKS

Table of n, a(n) for n=0..30.

EXAMPLE

A114994 begins:

0;

1; => row sum 1;

2,3; => row sum 5;

4,5,7; => row sum 16;

8,9,10,11,15; => row sum 53.

MAPLE

isA114994aux := proc(n) local k; for k from 0 do fk1 := 4^(k+1) ; if 2^k mod fk1 = n mod fk1 then return true; elif (2^k mod fk1) > n then return false; end if; end do: end proc:

isA114994 := proc(n) option remember ; if n = 0 then return true; elif type(n, 'odd') then if n <= 11 then true; else return procname((n-1)/2) ; fi; else return ( isA114994(n/2) and isA114994aux(n/2) ); end if; end proc:

A173871 := proc(n) a := 0 ; for k from 2^n to 2^(n+1)-1 do if isA114994(k) then a := a+k; end if; end do; a ; end proc:

seq(A173871(n), n=0..19) ; # R. J. Mathar, Mar 26 2010

CROSSREFS

Cf. A114994, A171426.

Sequence in context: A007343 A274492 A147536 * A108300 A041469 A089102

Adjacent sequences:  A173868 A173869 A173870 * A173872 A173873 A173874

KEYWORD

nonn

AUTHOR

Alford Arnold, Mar 05 2010

EXTENSIONS

a(9)-a(19) from R. J. Mathar, Mar 26 2010

a(0) prepended by and more terms from Jinyuan Wang, Feb 23 2020

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 5 16:55 EST 2021. Contains 341827 sequences. (Running on oeis4.)