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.
%I A171401 #3 Mar 30 2012 18:51:05 %S A171401 0,1,4,6,9,10,12,16,18,21,22,25,28,30,33,36,40,42,45,46,49,52,57,58, %T A171401 60,65,66,69,70,72,75,77,78,81,82,88,96,100,102,105,106,108,112,119, %U A171401 123,125,126,129,130,136,138,145,148,150,153,156,161,162,165,166,169,172 %N A171401 Numbers m such that exactly one editing step (insert or substitute) is necessary to transform the binary representation of m into the least prime not less than m. %C A171401 A171400(a(n))=1; BinaryLevenshteinDistance(a(n),A007918(a(n)))=1; %C A171401 A006093 is a subsequence apart from the second term A006093(2)=2; %C A171401 A036987((a(n) XOR A007918(a(n))) - 1) = 1 for n<>2. %H A171401 R. Zumkeller, <a href="/A171401/b171401.txt">Table of n, a(n) for n = 1..700</a> %H A171401 Michael Gilleland, <a href="http://www.merriampark.com/ld.htm">Levenshtein Distance</a> %H A171401 Wikipedia, <a href="http://en.wikipedia.org/wiki/Levenshtein_distance">Levenshtein Distance</a> %K A171401 base,nonn %O A171401 1,3 %A A171401 _Reinhard Zumkeller_, Dec 08 2009