|
%I #9 Dec 05 2013 19:55:09
%S 1,3,9,27,81,243,19683,59049,177147,1594323,43046721,129140163,
%T 10460353203,7625597484987,617673396283947,50031545098999707,
%U 150094635296999121,4052555153018976267
%N Powers of 3 with digit sum also a power of 3.
%C a(n) = 3^A118872(n).
%t With[{l3s=3^Range[0,200]},Select[l3s,MemberQ[l3s,Total[IntegerDigits[ #]]]&]] (* _Harvey P. Dale_, May 20 2011 *)
%Y Cf. A067499.
%Y Cf. A004166, A000244.
%K base,easy,nonn
%O 1,2
%A _Amarnath Murthy_, Feb 11 2002
%E More terms from _Harvey P. Dale_, Mar 02 2002
%E Offset corrected by _Reinhard Zumkeller_, May 14 2011
|
