OFFSET
1,2
COMMENTS
PROG
(PARI) {sgr(m)=local(a, b, rec, c); c=0; a=0; b=4; rec=0; for(n=5, m, if(bigomega(n)==2, c++; a=n; if(a-b>rec, rec=a-b; print1(c", "); b=a, b=a; )))}
(Haskell)
a085809 n = a085809_list !! (n-1)
-- See A215231 for definition of a085809_list.
-- Reinhard Zumkeller, Mar 23 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Jason Earls, Jul 24 2003
EXTENSIONS
a(19)-a(26) from Donovan Johnson, Jan 28 2009
a(27)-a(31) from Donovan Johnson, Apr 14 2010
STATUS
approved