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 A132426 #8 Sep 16 2015 13:57:39
%S A132426 1,2,4,6,7,3,8,10,9,12,14,11,16,13,15,18,5,20,21,22,24,26,28,30,32,34,
%T A132426 35,42,49,36,38,37,17,19,25,23,31,27,33,39,45,40,29,44,52,48,51,46,50,
%U A132426 54,56,58,57,60,63,62,64,41,43,66,65,78,55,68,70,69,72,75,74,76,77,88
%N A132426 a(n) = A132425(n+1) - A132425(n).
%C A132426 Is this sequence a permutation of the positive integers?
%t A132426 a = {1, 2}; For[n = 1, n < 1000, n++, n = a[[ -1]]; c = 0; While[c == 0, n++; If[GCD[n, a[[ -1]]] > 1, b = 0; For[j = 1, j < Length[a], j++, If[a[[j + 1]] - a[[j]] == n - a[[ -1]], b = 1]]; If[b == 0, AppendTo[a, n]; c = 1]]]]; b = {}; For[k = 1, k < Length[a], k++, AppendTo[b, a[[k + 1]] - a[[k]]]]; b (* _Stefan Steinerberger_, Oct 21 2007 *)
%Y A132426 Cf. A132425.
%K A132426 nonn
%O A132426 1,2
%A A132426 _Leroy Quet_, Aug 20 2007
%E A132426 More terms from _Stefan Steinerberger_, Oct 21 2007