(MAGMAMagma) /* After the Greathouse's comment: */ [n: n in [0..1200] | forall{10*n+i: i in [1, 3, 7, 9, 11, 13, 17, 19] | not IsPrime(10*n+i)}]; // Bruno Berselli, Sep 14 2012
(MAGMAMagma) /* After the Greathouse's comment: */ [n: n in [0..1200] | forall{10*n+i: i in [1, 3, 7, 9, 11, 13, 17, 19] | not IsPrime(10*n+i)}]; // Bruno Berselli, Sep 14 2012
_Charles R Greathouse IV_, , <a href="/A216288/b216288.txt">Table of n, a(n) for n = 1..10000</a>
_Charles R Greathouse IV, _, <a href="/A216288/b216288.txt">Table of n, a(n) for n = 1..10000</a>
proposed
approved
editing
proposed
(PARI) for(i=2, 1200, if(isprime(10*i+1)==0&&isprime(10*i+3)==0&&isprime(10*i+7)==0&&isprime(10*i+9)==0
Cf. A219998 (upper decade).
approved
editing
editing
approved
nonn,base
approved
editing
editing
approved
(MAGMA) /* After the Greathouse's comment: */ [n: n in [0..1200] | forall{10*n+i: i in [1, 3, 7, 9, 11, 13, 17, 19] | not IsPrime(10*n+i)}]; // Bruno Berselli, Sep 14 2012
approved
editing