OFFSET
1,3
MATHEMATICA
Table[Prime[n]-IntegerLength[Prime[n]^4], {n, 60}] (* Harvey P. Dale, Nov 10 2017 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Juri-Stepan Gerasimov, Jul 24 2008
EXTENSIONS
104 inserted, 163 replaced by 164, 181 inserted and extended by R. J. Mathar, Sep 13 2008
STATUS
approved