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 A249244 #6 Oct 28 2014 00:12:12 %S A249244 3,7,11,15,19,22,26,30,34,38,41,45,49,53,56,60,64,68,72,75,79,83,87, %T A249244 91,94,98,102,106,109,113,117,121,125,128,132,136,140,144,147,151,155, %U A249244 159,162,166,170,174,178,181,185,189,193,197,200,204,208,212,215 %N A249244 Numbers k such that A249243(k+1) = A249243(k). %C A249244 A249244 and A249245 are a complementary pair, analogous to the pair A247785 and A247786. %H A249244 Clark Kimberling, <a href="/A249244/b249244.txt">Table of n, a(n) for n = 1..1000</a> %t A249244 u = Floor[Table[1/((1 + 1/n)^(n + 1) - E), {n, 1, 1000}]]; (* A249243 *) %t A249244 d = Differences[u] %t A249244 Flatten[Position[d, 0]] (* A249244 *) %t A249244 Flatten[Position[d, 1]] (* A249245 *) %Y A249244 Cf. A247784, A247785, A249243, A249245. %K A249244 nonn,easy %O A249244 1,1 %A A249244 _Clark Kimberling_, Oct 23 2014