This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A146179 #9 Aug 06 2017 20:56:47 %S A146179 1,3,9,7,11,8,16,24,15,19,8,20,22,27,30,22,32,23,37,39,27,25,47,53,34, %T A146179 42,42,55,53,56,31,63,57,58,50,50,55,57,54,52,47,71,79,87,69,82,62,65, %U A146179 76,90,66,94,77,77,82,75,72,79,92,89,88,69,87,91,71,92,103,117,93,103 %N A146179 Digit sums of Cullen numbers. %H A146179 Harvey P. Dale, <a href="/A146179/b146179.txt">Table of n, a(n) for n = 1..1000</a> %e A146179 The sum of all the digits of the Cullen number 49153 is 22. %p A146179 A002064 := proc(n) n*2^n+1; end: A007953 := proc(n) if n < 10 then n; else add ( d, d=convert(n,base,10) ) ; fi; end: A146179 := proc(n) A007953(A002064(n)) ; end: seq(A146179(n),n=0..80) ; # _R. J. Mathar_, Jul 08 2009 %t A146179 Table[Total[IntegerDigits[2^n n+1]],{n,0,70}] (* _Harvey P. Dale_, Jun 10 2013 *) %Y A146179 Cf. A002064. %K A146179 nonn,base %O A146179 1,2 %A A146179 _Parthasarathy Nambi_, Oct 27 2008 %E A146179 More terms from _R. J. Mathar_, Jul 08 2009