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 A344731 #5 May 28 2021 00:55:37 %S A344731 1,275,277,3337,3353,3359,39675,39689,472467,797806459,9501109507 %N A344731 Numbers k such that k divides A306069(k). %C A344731 The corresponding quotients A306069(k)/k are 1, 5, 5, 7, 7, 7, 9, 9, 11, 17, 19, ... %C A344731 a(12) > 7.5*10^10, if it exists. %e A344731 a(1) = 1 since A306069(1) = 1 is divisible by 1. %e A344731 a(2) = 275 since A306069(275) = 1375 = 5 * 275 is divisible by 275. %t A344731 f[p_, e_] := If[Mod[e, 2] == 1, (e + 1), e]; s[1] = 1; s[n_] := s[n] = s[n - 1] + Times @@ f @@@ FactorInteger[n]; Select[Range[40000], Divisible[s[#], #] &] %Y A344731 Cf. A286324, A306069. %Y A344731 The bi-unitary version of A050226. %Y A344731 Similar sequences: A064610, A344732, A344733. %K A344731 nonn,more %O A344731 1,2 %A A344731 _Amiram Eldar_, May 27 2021