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 A218860 #12 Dec 18 2018 15:23:46 %S A218860 6,10,34,84,194,228,386,1282,1538,3084,147468,1956,1046532,24578,3252, %T A218860 4548,638978,5844,28524,26626,229378,44076,24636,59628,117948,18804, %U A218860 75778,83604,30468 %N A218860 Unique integers appearing in A066135, in order of appearance. %t A218860 f[n_]:=(m = 2; While[Mod[DivisorSigma[n, m], m] > 0, m++]; m); s={}; Do[m=f[n]; If[!MemberQ[s,m],AppendTo[s,m]],{n,1,1000}]; s (* _Amiram Eldar_, Dec 18 2018 after _T. D. Noe_ at A066135 *) %Y A218860 Cf. A218861 (first position of these numbers in A066135). %K A218860 nonn,more %O A218860 1,1 %A A218860 _T. D. Noe_, Nov 24 2012 %E A218860 More terms from _Amiram Eldar_, Dec 18 2018