%I A023976
%S A023976 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
%T A023976 0,0,0,0,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 A023976 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
%N A023976 First bit in fractional part of binary expansion of 9-th root of n.
%t A023976 Array[Function[n, RealDigits[N[Power[n, 1/9 ], 10 ], 2 ]// (#[[1, #[[2 
               ] ]+1 ] ])& ], 110 ]
%Y A023976 Sequence in context: A000004 A112316 this_sequence A025469 A025466 A072769
%Y A023976 Adjacent sequences: A023973 A023974 A023975 this_sequence A023977 A023978 
               A023979
%K A023976 nonn,base
%O A023976 1,1
%A A023976 N. J. A. Sloane (njas(AT)research.att.com), Olivier Gerard (olivier.gerard(AT)gmail.com)