A177004 - OEIS

%I #2 Mar 31 2012 12:38:36

%S 1516128,7026352,7929128,10296372,10449948,12045128

%N Numbers n such that 2 nearest neighbors had largest prime factor equals to 1, next 2 neighbors had largest prime factor of 2 and next 2 neighbors had largest prime factor of 3.

%C 1516128-3=3*5^3*13*311; 1516128-2=2*47*127^2; 1516128-1=1516127; 1516128+1=1516129; 1516128+2=2*5*7*11^2*179; 1516128+3=3^3*233*241,..

%t f[n_]:=Max[Last/@FactorInteger[n]]; lst={};Do[If[f[n-1]==1&&f[n-2]==2&&f[n-3]==3&&f[n+1]==1&&f[n+2]==2&&f[n+3]==3,Print[n];AppendTo[lst,n]],{n,4*9!,4*10!}];lst

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Apr 30 2010