login
Powers of 3 with initial digit 1.
7

%I #10 Oct 22 2018 11:51:32

%S 1,19683,177147,1594323,14348907,129140163,1162261467,10460353203,

%T 1853020188851841,16677181699666569,150094635296999121,

%U 1350851717672992089,12157665459056928801,109418989131512359209

%N Powers of 3 with initial digit 1.

%H Muniru A Asiru, <a href="/A067489/b067489.txt">Table of n, a(n) for n = 1..625</a>

%t Select[3^Range[0,5*10^6],First[IntegerDigits[#]]==1&] (* _Harvey P. Dale_, Oct 09 2015 *)

%o (GAP) Filtered(List([0..50],n->3^n),i->ListOfDigits(i)[1]=1); # _Muniru A Asiru_, Oct 22 2018

%Y Cf. A067480, A067481, A067482, A067483, A067484, A067485, A067486, A067487, A067488.

%K base,easy,nonn

%O 1,2

%A _Amarnath Murthy_, Feb 09 2002

%E Offset 1 from _Michel Marcus_, Oct 19 2018