OFFSET
1,2
MATHEMATICA
Sort[FromDigits[Reverse[IntegerDigits[#]]]&/@(7^Range[0, 20])] (* Harvey P. Dale, Dec 23 2013 *)
PROG
(PARI) A134113_first(n, p=7, L=log(10)/log(p))=vecsort([A004086(p^k)|k<-[0..n\/L*L\1]])[1..n] \\ M. F. Hasler, Mar 27 2026
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Jonathan Vos Post, Oct 08 2007
STATUS
approved
