[go: up one dir, main page]

login
A073250
Nonprime squarefree numbers n such that n+1 is also squarefree and nonprime, but not n-1 and n+2.
4
14, 21, 38, 57, 65, 69, 77, 105, 110, 114, 118, 122, 129, 133, 145, 154, 158, 165, 177, 182, 194, 205, 209, 221, 230, 237, 246, 258, 273, 290, 298, 309, 318, 326, 329, 334, 345, 354, 357, 365, 370, 381, 385, 390, 398, 402, 406, 410, 417, 426, 429, 434, 437
OFFSET
1,1
LINKS
MATHEMATICA
tQ[n_]:=!PrimeQ[n+1]&&SquareFreeQ[n+1]&&(PrimeQ[n-1]||!SquareFreeQ[n-1])&&(PrimeQ[n+2]||!SquareFreeQ[n+2])
Select[Select[Complement[Range[500], Prime[Range[PrimePi[500]]]], SquareFreeQ], tQ] (* Harvey P. Dale, Feb 14 2011 *)
SequencePosition[Table[If[SquareFreeQ[n]&&!PrimeQ[n], 1, 0], {n, 500}], {0, 1, 1, 0}][[;; , 1]]+1 (* Harvey P. Dale, Feb 27 2023 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jul 22 2002
STATUS
approved