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 A076694 #6 Feb 11 2014 19:05:32
%S A076694 1,0,0,2,0,1,0,6,6,3,0,7,0,5,7,14,0,13,0,13,11,9,0,19,20,11,24,19,0,
%T A076694 20,0,30,19,15,23,31,0,17,23,33,0,30,0,31,37,21,0,43,42,43,31,37,0,49,
%U A076694 39,47,35,27,0,50,0,29,53,62,47,50,0,49,43,56,0,67,0,35,67,55,59,60,0,73
%N A076694 a(n) = n - sum of the distinct prime factors of n.
%F A076694 a(n) = n - A008472(n).
%e A076694 a(1) = 1 - 0 = 1; a(6) = 6 - (2 + 3) = 1.
%t A076694 Join[{1},Rest[Table[n-Total[Transpose[FactorInteger[n]][[1]]],{n,80}]]] (* _Harvey P. Dale_, May 13 2012 *)
%Y A076694 Cf. A075254, A075255, A075653.
%K A076694 easy,nonn
%O A076694 1,4
%A A076694 _Joseph L. Pe_, Oct 25 2002