OFFSET
1,2
COMMENTS
Every term from a(4) on is a multiple of 6.
MAPLE
A175305 := proc(n) option remember ; local wrks ; if n = 1 then 1; else for a from procname(n-1)+1 do wrks := true; for i from 1 to n-1 do if gcd(a-1, procname(i)) <> 1 or gcd(a+1, procname(i)) <> 1 then wrks := false; end if; end do: if wrks then return a; end if; end do: end if; end proc: seq(A175305(n), n=1..80) ; # R. J. Mathar, Apr 15 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Apr 11 2010
EXTENSIONS
More terms from R. J. Mathar, Apr 15 2010
STATUS
approved