OFFSET
1,3
MATHEMATICA
Flatten@Table[Prime[n]-n, {n, 10}, {Prime[n]-n}]
CROSSREFS
KEYWORD
nonn,less
AUTHOR
Zak Seidov, Jan 30 2006
STATUS
approved