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 A174030 #10 Nov 05 2024 03:10:47
%S A174030 1,3,7,13,21,33,49,67,91,123,159,207,261,325,397,493,601,729,873,1035,
%T A174030 1227,1443,1699,1987,2311,2695,3127,3613,4125,4701,5349,6117,6981,
%U A174030 7953,8977,10129,11425,12883,14419,16147,18091,20139,22443,25035,27951,31023
%N A174030 Partial sums of A007694.
%C A174030 Partial sums of numbers k such that phi(k) divides k.
%H A174030 Amiram Eldar, <a href="/A174030/b174030.txt">Table of n, a(n) for n = 1..1000</a>
%F A174030 a(n) = Sum_{i=1..n} A007694(i).
%F A174030 a(n) = 2*A259823(n-1) + 1. - _Amiram Eldar_, Nov 05 2024
%t A174030 Accumulate[Select[Range[5000], Divisible[#, EulerPhi[#]] &]] (* _Amiram Eldar_, Nov 05 2024 *)
%Y A174030 Cf. A000010, A007694, A259823.
%K A174030 nonn
%O A174030 1,2
%A A174030 _Jonathan Vos Post_, Mar 06 2010