%I A063747
%S A063747 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
%T A063747 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,
%U A063747 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1
%V A063747 1,-1,-1,1,1,1,-1,-1,-1,1,1,1,-1,-1,-1,-1,1,1,1,-1,-1,-1,-1,1,1,1,1,-1,
               -1,-1,1,1,1,1,
%W A063747 -1,-1,-1,-1,1,1,1,1,1,-1,-1,-1,1,-1,1,1,1,-1,-1,1,1,-1,-1,-1,1,1,-1,-1,
               -1,-1,1,1,-1,
%X A063747 -1,1,1,1,-1,-1,-1,1,1,-1,1,1,-1,1,1,1,-1,-1,-1,1,1,-1,-1,1,1,-1,-1,-1,
               1,1,-1,-1,1
%N A063747 Sign of n-th coefficient of power series for 1/Gamma(1-x) where Gamma 
               is the Gamma function.
%e A063747 1/Gamma(1-x) = 1 - gamma*x - 0.6558...*x^2 + 0.042...*x^3 + 0.1665...*x^4 
               + 0.0421...*x^5 - 0.0096..*x^6 +.... hence sequence begins 1,-1,-1,
               1,1,1,-1,
%o A063747 (PARI) a(n)=sign(polcoeff(1/(gamma(1-x)+O(x^(n+1))),n))
%Y A063747 Sequence in context: A057077 A162511 A157895 this_sequence A077008 A158387 
               A087960
%Y A063747 Adjacent sequences: A063744 A063745 A063746 this_sequence A063748 A063749 
               A063750
%K A063747 sign
%O A063747 0,1
%A A063747 Benoit Cloitre (benoit7848c(AT)orange.fr), Jan 16 2004