login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A069021 Start of the first occurrence of n consecutive numbers divisible by a square greater than 1. 3

%I #9 Aug 21 2022 21:31:53

%S 1,8,48,242,844,22020,217070,1092747,8870024,221167422,221167422,

%T 47255689915,82462576220,1043460553364,79180770078548,

%U 3215226335143218,23742453640900972

%N Start of the first occurrence of n consecutive numbers divisible by a square greater than 1.

%t a = {1, 1}; k = 4; Do[ While[ Min[a] < 2, k++; a = Drop[a, 1]; a = Append[ a, Max[ Transpose[ FactorInteger[k]] [[2]] ]]]; Print[k - n + 1]; k++; a = Append[ a, Max[ Transpose[ FactorInteger[k]] [[2]] ]], {n, 2, 9}]

%Y Apart from first term, identical to A045882.

%K nonn

%O 1,2

%A _Amarnath Murthy_, Apr 02 2002

%E Definition clarified by _Harvey P. Dale_, Aug 21 2022

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 06:44 EDT 2024. Contains 371265 sequences. (Running on oeis4.)