OFFSET
2,1
LINKS
Jaroslav Krizek, Table of n, a(n) for n = 2..60
MATHEMATICA
Table[If[n == 3, 0, FromDigits[RealDigits[Prime[n-1]/Prime[n]][[1, 1]]]], {n, 2, 10}]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Jun 29 2012
EXTENSIONS
Corrected by T. D. Noe, Jun 29 2012
STATUS
approved