OFFSET
1,1
EXAMPLE
The sequence of terms begins:
13 = prime(6)
29 = prime(10)
43 = prime(14)
47 = prime(15)
73 = prime(21)
79 = prime(22)
101 = prime(26)
113 = prime(30)
137 = prime(33)
139 = prime(34)
149 = prime(35)
163 = prime(38)
167 = prime(39)
169 = prime(6)^2
181 = prime(42)
199 = prime(46)
233 = prime(51)
257 = prime(55)
269 = prime(57)
271 = prime(58)
293 = prime(62)
313 = prime(65)
317 = prime(66)
347 = prime(69)
349 = prime(70)
373 = prime(74)
377 = prime(6)*prime(10)
MATHEMATICA
Select[Range[1, 100, 2], With[{f=PrimePi/@First/@FactorInteger[#]}, And[And@@SquareFreeQ/@f, And@@Not/@PrimeQ/@f]]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Oct 18 2018
STATUS
approved