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.

A103584 Numbers in A103543 not congruent to 3 mod 4.

This page as a plain text file.
%I A103584 #16 Mar 28 2015 22:05:14
%S A103584 62,126,190,254,318,382,446,510,574,638,702,766,830,894,958,1021,1022,
%T A103584 1086,1150,1214,1278,1342,1406,1470,1534,1598,1662,1726,1790,1854,
%U A103584 1918,1982,2045,2046,2110,2174,2238,2302,2366,2430,2494,2558,2622,2686,2750
%N A103584 Numbers in A103543 not congruent to 3 mod 4.
%H A103584 David Applegate, Benoit Cloitre, Philippe Deléham and N. J. A. Sloane, Sloping binary numbers: a new sequence related to the binary numbers [<a href="http://neilsloane.com/doc/slopey.pdf">pdf</a>, <a href="http://neilsloane.com/doc/slopey.ps">ps</a>], J. Integer Seq. 8 (2005), no. 3, Article 05.3.6, 15 pp.
%t A103584 f[n_] := Block[{k = 1, s = 0, l = Max[2, Floor[Log[2, n + 1] + 2]]}, While[k < l, If[ Mod[n + k, 2^k] == 0, s = s + 2^k]; k++ ]; s]; Select[ Complement[ Range[2750], Select[ Range[11000], f[ # ] == 0 &]/4], Mod[ #, 4] != 3 &] (* _Robert G. Wilson v_, Mar 26 2005 *)
%K A103584 nonn
%O A103584 1,1
%A A103584 _Benoit Cloitre_ and _Philippe Deléham_, Mar 24 2005
%E A103584 More terms from _Robert G. Wilson v_, Mar 26 2005