OFFSET
1,2
LINKS
Muniru A Asiru, Table of n, a(n) for n = 1..330
MATHEMATICA
Select[8^Range[0, 30], IntegerDigits[#][[1]]==1&] (* Harvey P. Dale, Jun 10 2023 *)
PROG
(GAP) Filtered(List([0..40], n->8^n), i->ListOfDigits(i)[1]=1); # Muniru A Asiru, Oct 22 2018
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Amarnath Murthy, Feb 09 2002
EXTENSIONS
Offset 1 by Michel Marcus, Oct 19 2018
STATUS
approved