OFFSET
1,2
LINKS
Muniru A Asiru, Table of n, a(n) for n = 1..250
MAPLE
select(x-> "1"=""||x[1], [9^n$n=0..60])[]; # Alois P. Heinz, Oct 22 2018
MATHEMATICA
Select[9^Range[0, 50], First[IntegerDigits[#]]==1&] (* Harvey P. Dale, Oct 01 2015 *)
PROG
(GAP) Filtered(List([0..40], n->9^n), i->ListOfDigits(i)[1]=1); # Muniru A Asiru, Oct 22 2018
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Feb 09 2002
EXTENSIONS
More terms from Harvey P. Dale, Oct 01 2015
STATUS
approved