|
%I #12 Oct 22 2018 17:03:35
%S 1,1853020188851841,16677181699666569,150094635296999121,
%T 1350851717672992089,12157665459056928801,109418989131512359209,
%U 1824800363140073127359051977856583921,16423203268260658146231467800709255289,147808829414345923316083210206383297601
%N Powers of 9 having initial digit 1.
%H Muniru A Asiru, <a href="/A067495/b067495.txt">Table of n, a(n) for n = 1..250</a>
%p select(x-> "1"=""||x[1],[9^n$n=0..60])[]; # _Alois P. Heinz_, Oct 22 2018
%t Select[9^Range[0,50],First[IntegerDigits[#]]==1&] (* _Harvey P. Dale_, Oct 01 2015 *)
%o (GAP) Filtered(List([0..40],n->9^n),i->ListOfDigits(i)[1]=1); # _Muniru A Asiru_, Oct 22 2018
%Y Cf. A067480, A067481, A067482, A067483, A067484, A067485, A067486, A067487, A067488, A067489, A067490, A067491, A067492, A067493, A067494.
%K base,easy,nonn
%O 1,2
%A _Amarnath Murthy_, Feb 09 2002
%E More terms from _Harvey P. Dale_, Oct 01 2015
|
