OFFSET
1,1
COMMENTS
Numbers k such that A063086(k) = 6. - Andrew Howroyd, Dec 10 2024
LINKS
Harry J. Smith, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[ Range[400], GCD[ Prime[ # + 1] + 1, Prime[ # ] + 1] == 6 & ]
Drop[Position[Partition[Prime[Range[400]], 2, 1], _?(GCD@@(#+1)==6&)], 2]//Flatten (* Harvey P. Dale, Nov 08 2022 *)
PROG
(PARI) isok(k) = { gcd(prime(k+1) + 1, prime(k) + 1) == 6 } \\ Harry J. Smith, Apr 10 2010
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Jan 24 2002
EXTENSIONS
Edited by Robert G. Wilson v, Feb 01 2002
STATUS
approved
