Search: id:A096784 Results 1-1 of 1 results found. %I A096784 %S A096784 8,9,14,15,20,21,26,33,35,39,44,48,50,51,54,56,63,65,68,69,74,75,81,86, %T A096784 90,95,98,99,105,111,114,116,119,120,125,128,134,135,140,141,146,153, %U A096784 155,158,165,168,174,176,183,186,189,194,200,204,209,215,216,219,221 %N A096784 Numbers n such that both n and n+1 are composite numbers that sum up to a prime. %F A096784 Equals (A060254 -1)/2. %t A096784 Select[ Range[ 225], PrimeQ[ # ] == PrimeQ[ # + 1] == False && PrimeQ[2# + 1] == True &] (from Robert G. Wilson v Jul 11 2004) %o A096784 (PARI) nextcomposite(k)=if(k<3,4,if(isprime(k),k+1,k)); %o A096784 {m=230;n=4;while(n