OFFSET
1,1
COMMENTS
The digits of A129808 at prime indices.
FORMULA
a(n) = A129808(prime(n)) .
MAPLE
a129808 := [1] : for n from 4 to 400 do if not isprime(n) then a129808 := [op(a129808), op(ListTools[Reverse](convert(n, base, 10))) ] ; fi; od:
for n from 1 do p := ithprime(n) ; printf("%d, ", op(p, a129808) ) ; od: # R. J. Mathar, Aug 03 2009
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Juri-Stepan Gerasimov, Jan 11 2009
EXTENSIONS
Edited and corrected by R. J. Mathar, Aug 03 2009
STATUS
approved