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!)
A121514 Row 7 of array in A105272. 1

%I #9 Aug 26 2019 16:28:28

%S 2,2,4,14,6,12,30,4,4,20,15,70,30,18,10,10,48,72,24,25,133,7,7,42,240,

%T 40,33,182,6,6,66,126,24,104,84,6,6,84,260,24,44,4,4,4,276,660,21,390,

%U 57,3,3,102,72,1680,1232,6006,8,8,6552,1440,5698,40,1380,70,70,54,6048

%N Row 7 of array in A105272.

%t k = 7;

%t Table[fp = {};

%t For[col = k, col > 0, col--,

%t For[row = 0, col + row*k <= n, row++,

%t AppendTo[fp, col + row*k]]];

%t LCM @@ Length /@ First[FindPermutation[Range[n], fp]], {n, k,

%t 76}] (* _Robert Price_, Aug 26 2019 *)

%K nonn

%O 7,1

%A _N. J. A. Sloane_, Aug 10 2008, based on email from Samuel Minter (abulsme(AT)abulsme.com0, May 08 2008, Aug 10 2008

%E Extended beyond a(16) by _R. J. Mathar_, Aug 12 2008

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 July 13 18:16 EDT 2024. Contains 374285 sequences. (Running on oeis4.)