%I
%S 25,28,32,38,46,58,60,62,72,77,80,85,88,92,93,94,102,104,108,110,118,
%T 122,123,124,130,133,143,144,145,148,150,152,160,161,162,164,170,171,
%U 172,178,182,185,188,196,202,203,206,207,208,212,213,214,218,226,235
%N Numbers n with property that n, 2n1 and 2n+1 are composite.
%C In A000027, if n, n+(n1) and n+(n+1) are composite, then n is a term of this sequence.
%C Suggestion: there are arbitrarily long sets of consecutive integers, e.g., 632..637, 665..672, 6428..6443.
%t Select[Range[2,1000],!PrimeQ[2#1]&&!PrimeQ[#]&&!PrimeQ[2#+1]&]
%t Select[Range[250],AllTrue[{#,2#1,2#+1},CompositeQ]&] (* _Harvey P. Dale_, Feb 26 2022 *)
%K nonn
%O 1,1
%A _Zak Seidov_, Sep 21 2011
