OFFSET
1,1
COMMENTS
Related to hyperperfect numbers of a certain form (form 1, theorem 1 in "A Study of Hyperperfect Numbers").
LINKS
J. S. McCranie, A study of hyperperfect numbers, J. Int. Seqs. Vol. 3 (2000) #P00.1.3.
MATHEMATICA
Select[Range[5, 2000, 6], AllTrue[{#, 2#+3}, PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Jul 27 2019 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
EXTENSIONS
Definition corrected by Jud McCranie, Jul 26 2019
STATUS
approved