|
%I #12 Aug 06 2023 01:53:29
%S 19,43,101,197,457,461,643,743,859,883,937,1301,1483,1579,1877,1949,
%T 1997,2083,2129,2141,2221,2237,2251,2381,2539,2609,2617,2659,2663,
%U 3019,3221,3389,3461,3701,4003,4157,4517,4637,5573,5741,5783,6763,6899,6907,7349,7757,7877
%N Intersection of A205302 and A205511.
%C Both Hamming's distances between a(n) and the previous prime and between a(n) and the next prime equal 1.
%H Amiram Eldar, <a href="/A205533/b205533.txt">Table of n, a(n) for n = 1..10000</a>
%t Select[Partition[Prime[Range[1000]], 3, 1], DigitCount[BitXor[#[[1]], #[[2]]], 2, 1] == DigitCount[BitXor[#[[2]], #[[3]]], 2, 1] == 1 &] [[;; , 2]] (* _Amiram Eldar_, Aug 06 2023 *)
%Y Cf. A205302, A205511, A205510, A205509, A001097, A001359, A006512.
%K nonn,base
%O 1,1
%A _Vladimir Shevelev_ and _Peter J. C. Moses_, Jan 28 2012
%E More terms from _Amiram Eldar_, Aug 06 2023
|
