A214323 - OEIS

%I #11 Jul 24 2012 11:16:01

%S 1,1,1,1,1,1,2,3,2,3,2,1,1,1,1,7,3,2,3,4,1,1,1,1,1,1,4,1,5,1,1,1,1,8,

%T 1,2,1,6,1,4,5,4,5,1,1,1,1,11,36,1,1,1,7,5,1,8,3,4,3,2,7,2,1,1,1,3,1,

%U 1,2,1,1,1,3,1,1,2,1,1,1,1,1

%N a(n) = gcd( A214551(n-1), A214551(n-3) ) with a(0) = a(1) = a(2) = 1.

%C A214551(n) = A214322(n)/A214323(n).

%C A214323(A214653(n)) = 1. - _Reinhard Zumkeller_, Jul 24 2012

%H N. J. A. Sloane, <a href="/A214323/b214323.txt">Table of n, a(n) for n = 0..10000</a>

%o (Haskell)

%o a214323 n = a214323_list !! n

%o a214323_list = 1 : 1 : 1 : zipWith gcd a214551_list (drop 2 a214551_list)

%o -- _Reinhard Zumkeller_, Jul 24 2012

%Y Cf. A214551, A214322; A214324, A214325 (record values and where they occur).

%K nonn

%O 0,7

%A _N. J. A. Sloane_, Jul 23 2012