%I A031883
%S A031883 2,4,2,4,2,6,4,6,2,4,6,6,2,12,4,2,4,2,4,8,6,6,6,6,4,12,2,4,2,6,10,8,4,
6,
%T A031883 2,18,4,2,6,4,6,8,4,8,4,2,4,18,2,6,6,10,2,4,8,6,4,12,2,6,4,8,10,8,4,6,
%U A031883 18,6,2,6,10,6,6,6,2,4,18,12,12,2,6,4,2,6,16,6,2,10,6,2,4,12,6,18,2,4,
8
%N A031883 First differences of lucky numbers.
%H A031883 T. D. Noe, <a href="b031883.txt">Table of n, a(n) for n=1..10000</a>
%t A031883 lst = Range[1, 600, 2]; i = 2; While[ i <= (len = Length@lst) && (k =
lst[[i]]) <= len, lst = Drop[lst, {k, len, k}]; i++ ]; Rest@lst -
Most@lst (from Robert G. Wilson v (rgwv(at)rgwv.com), May 12 2006)
%Y A031883 Cf. A000959.
%Y A031883 Sequence in context: A056672 A037201 A128886 this_sequence A086152 A163894
A032059
%Y A031883 Adjacent sequences: A031880 A031881 A031882 this_sequence A031884 A031885
A031886
%K A031883 nonn,easy
%O A031883 1,1
%A A031883 Patrick De Geest (pdg(AT)worldofnumbers.com)
|