cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A208448 Greatest common divisors of consecutive floor-factorial numbers (A010786).

This page as a plain text file.
%I A208448 #17 Feb 11 2025 06:59:35
%S A208448 1,1,1,2,2,6,2,8,24,60,12,288,96,84,60,3840,384,15552,576,14400,20160,
%T A208448 221760,576,331776,552960,224640,51840,20321280,2903040,108864000,
%U A208448 345600,17694720,145981440,51701760,1935360,11287019520,1254113280,2978519040,10782720
%N A208448 Greatest common divisors of consecutive floor-factorial numbers (A010786).
%H A208448 Reinhard Zumkeller, <a href="/A208448/b208448.txt">Table of n, a(n) for n = 1..1000</a>
%F A208448 a(n) = GCD(A010786(n+1),A010786(n)).
%t A208448 GCD @@@ Partition[#, 2, 1] & [Array[Product[Quotient[#, k], {k, #}] &, 30]] (* _Paolo Xausa_, Feb 11 2025 *)
%o A208448 (Haskell)
%o A208448 a208448 n = a208448_list !! (n-1)
%o A208448 a208448_list = zipWith gcd a010786_list $ tail a010786_list
%o A208448 (PARI) f(n) = prod(k=1, n, n\k); \\ A010786
%o A208448 a(n) = gcd(f(n+1), f(n)); \\ _Michel Marcus_, Feb 03 2022
%Y A208448 Cf. A010786, A208449, A208450.
%K A208448 nonn
%O A208448 1,4
%A A208448 _Reinhard Zumkeller_, Feb 26 2012