OFFSET
1,2
COMMENTS
a(prime(n)-1) = prime(n) for n>1, so this sequence includes all odd primes. - Jon Perry, Oct 10 2012, edited & corrected by M. F. Hasler, Oct 11 2012
MATHEMATICA
RecurrenceTable[{a[n]==a[n-2]+LCM[n-1, a[n-2]], a[1]==2, a[2]==2}, a{n, 3, 51}] /RecurrenceTable[{a[n]==a[n-2]+LCM[n-1, a[n-2]], a[1]==2, a[2]==2}, a, {n, 1, 49}]-1
t = {2, 2}; Do[AppendTo[t, t[[-2]] + LCM[n - 1, t[[-2]]]], {n, 3, 100}]; Drop[t, 2]/Drop[t, -2] - 1 (* T. D. Noe, Oct 10 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Pedja Terzic, Oct 10 2012
STATUS
approved