OFFSET
4,1
EXAMPLE
a(11) =2511 is a multiple of prime(11)=31.
MATHEMATICA
f[n_] := Block[{k = 1, p = Prime[n], m = 10^Floor[Log[10, n] + 1]}, While[ Mod[k*p, m] != n, k++ ]; k*p]; Table[ f[n], {n, 4, 46}] (* Robert G. Wilson v *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 12 2005
EXTENSIONS
More terms from Robert G. Wilson v, Nov 17 2005
STATUS
approved