Search: id:A016041
Results 1-1 of 1 results found.
%I A016041
%S A016041 3,5,7,17,31,73,107,127,257,313,443,1193,1453,1571,1619,1787,1831,1879,
%T A016041 4889,5113,5189,5557,5869,5981,6211,6827,7607,7759,7919,8191,17377,
%U A016041 18097,18289,19433,19609,19801,21157,22541,22669,22861,23581,24029
%N A016041 Primes that are palindromic in base 2 (but written here in base 10).
%H A016041 Zak Seidov, Table of n, a (n) for n = 1..1000
a>
%H A016041 K. S. Brown, On
General Palindromic Numbers
%H A016041 P. De Geest, World!Of
Palindromic Primes
%t A016041 lst = {}; Do[ If[ PrimeQ@n, t = IntegerDigits[n, 2]; If[ FromDigits@t
== FromDigits@ Reverse@ t, AppendTo[lst, n]]], {n, 3, 50000, 2}];
lst
%Y A016041 Intersection of A000040 & A006995. First row of A095749. A095741 gives
the number of terms in range [2^(2n), 2^(2n+1)]. Cf. A095730 for
primes whose Zeckendorf-expansion is palindromic and A029971 for
those whose ternary (base-3) expansion is.
%Y A016041 Sequence in context: A032496 A002092 A057476 this_sequence A140797 A038893
A075227
%Y A016041 Adjacent sequences: A016038 A016039 A016040 this_sequence A016042 A016043
A016044
%K A016041 nonn,easy
%O A016041 1,1
%A A016041 Robert G. Wilson v (rgwv(AT)rgwv.com)
%E A016041 More terms from Patrick De Geest (pdg(AT)worldofnumbers.com).
%E A016041 More terms from Antti Karttunen (Antti.Karttunen(AT)iki.fi), Jun 12 2004
%E A016041 I corrected the syntax of the Mathematica coding Robert G. Wilson v (rgwv(AT)rgwv.com),
Aug 10 2009
Search completed in 0.001 seconds