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.

A164124 First differences of A016041.

This page as a plain text file.
%I A164124 #11 Aug 17 2024 17:58:23
%S A164124 0,2,2,10,14,42,34,20,130,56,130,750,260,118,48,168,44,48,3010,224,76,
%T A164124 368,312,112,230,616,780,152,160,272,9186,720,192,1144,176,192,1356,
%U A164124 1384,128,192,720,448,1718,192,1240,624,320,96,588,864,720,792,544
%N A164124 First differences of A016041.
%C A164124 Differences between successive primes that are palindromic in base 2.
%C A164124 3, 5, 7, 17, 31, 73, 107, 127, 257, 313, 443, 1193, 1453, 1571, 1619, 1787, 1831, 1879, ...
%t A164124 f[n_]:=FromDigits[RealDigits[n,2][[1]]]==FromDigits[Reverse[RealDigits[n,2][[1]]]]; a=3;lst={};Do[p=Prime[n];If[f[p],AppendTo[lst,p-a];a=p],{n,2,8!,1}];lst
%t A164124 Join[{0},Differences[Select[Prime[Range[5000]],IntegerDigits[#,2]== Reverse[ IntegerDigits[ #,2]]&]]] (* _Harvey P. Dale_, Aug 17 2024 *)
%Y A164124 Cf. A029971, A016041, A164125. - _Vladimir Joseph Stephan Orlovsky_, Aug 10 2009
%K A164124 nonn,less,base
%O A164124 1,2
%A A164124 _Vladimir Joseph Stephan Orlovsky_, Aug 10 2009
%E A164124 Definition corrected by _Charles R Greathouse IV_, Oct 08 2009