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 A084693 #13 Sep 04 2015 03:27:26
%S A084693 1,2,3,4,5,6,8,9,13,7,11,10,12,14,17,15,18,19,16,20,21,22,24,25,27,26,
%T A084693 28,23,29,30,32,33,31,34,36,38,37,35,40,41,39,42,43,45,46,44,48,49,51,
%U A084693 50,47,52,55,53,56,57,54,58,59,60,61,63,64,65,62,66,67,68,69,70,72,73
%N A084693 a(n) is smallest positive integer not already in the sequence such that every partial sum is squarefree.
%C A084693 Does every positive integer occur in the sequence?
%C A084693 The longest string of consecutive numbers is 6.
%H A084693 Michael De Vlieger, <a href="/A084693/b084693.txt">Table of n, a(n) for n = 0..1000</a>
%t A084693 a = {1}; Do[k = 1; While[Nand[! MemberQ[a, k], SquareFreeQ[Sum[a[[i]], {i, n}] + k]], k++]; AppendTo[a, k], {n, 71}]; a (* _Michael De Vlieger_, Sep 03 2015 *)
%Y A084693 Cf. A121644 (strictly increasing version).
%K A084693 nonn
%O A084693 0,2
%A A084693 _Amarnath Murthy_, Jun 04 2003
%E A084693 More terms from _David Wasserman_, Dec 30 2004