Table[isprime[prime[n]*prime[n+3]+prime[n]+prime[n+3]],{n,101,200}]