OFFSET
1,1
COMMENTS
Successive differences are multiples of the previous difference.
EXAMPLE
43, 67 and 139 are three successive terms and (139-67)/(67-43) = 3.
MATHEMATICA
a[0] = 2; a[1] = 3; a[n_] := a[n] = Block[{k = 1}, While[ !PrimeQ[ k( a[n - 1] - a[n - 2]) + a[n - 1]], k++ ]; k(a[n - 1] - a[n - 2]) + a[n - 1]]; Table[ a[n], {n, 0, 34}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), Jun 14 2003
EXTENSIONS
Edited and extended by Robert G. Wilson v and Vladeta Jovovic, Jun 17 2003
STATUS
approved