OFFSET
1,1
LINKS
Muniru A Asiru, Table of n, a(n) for n = 1..48
MATHEMATICA
Select[9^Range[100], First[IntegerDigits[#]]==9 &] (* Vincenzo Librandi, Oct 22 2018 *)
PROG
(GAP) Filtered(List([0..100], n->9^n), i->ListOfDigits(i)[1]=9); # Muniru A Asiru, Oct 21 2018
(Magma) [9^n: n in [1..100] | Intseq(9^n)[#Intseq(9^n)] eq 9]; // Vincenzo Librandi, Oct 22 2018
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Feb 09 2002
EXTENSIONS
More terms from Benoit Cloitre, Feb 28 2002
STATUS
approved