A088736 10^p - p for prime p.

98, 997, 99995, 9999993, 99999999989, 9999999999987, 99999999999999983, 9999999999999999981, 99999999999999999999977, 99999999999999999999999999971, 9999999999999999999999999999969

Offset

2,1

Links

Table of n, a(n) for n=2..12.

Mathematica

Table[10^p-p, {p, Prime[Range[20]]}] (* Harvey P. Dale, Jul 29 2018 *)

Prog

(PARI) tenpmp(n)= { forprime(x=2, n, print1(10^x-x", ") ) }

Crossrefs

Sequence in context: A203083 A202370 A184608 * A292552 A233373 A221747

Adjacent sequences: A088733 A088734 A088735 * A088737 A088738 A088739

Keyword

nonn

Author

Cino Hilliard, Nov 23 2003

Status

approved