OFFSET
1,1
COMMENTS
All terms of this sequence are in sequence A073606.
EXAMPLE
20 is divisible by the primes 2 and 5. q(2) = 3, and q(5)=7. 20+1 = 21 is divisible by both 3 and 7, so 20 is in this sequence.
MATHEMATICA
depQ[n_]:=With[{c=NextPrime[FactorInteger[n][[;; , 1]]]}, AllTrue[(n+1)/c, IntegerQ]]; Select[Range[ 2, 350000], depQ] (* Harvey P. Dale, Jun 10 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Aug 01 2009
EXTENSIONS
More terms from Sean A. Irvine, Oct 04 2009
STATUS
approved