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 A124391 #19 Feb 27 2021 21:37:10
%S A124391 1,2,3,4,6,7,8,9,11,12,14,16,18,20,21,22,23,24,27,28,31,32,33,36,40,
%T A124391 42,43,44,46,47,48,49,54,56,59,60,62,63,64,66,67,69,71,72,77,79,80,81,
%U A124391 83,84,86,88,92,93,94,96,98,99,100,103
%N A124391 Numbers m that divide A123269(m) = Sum_{i=1..m, j=1..m, k=1..m} i^j^k.
%C A124391 A123269(m) = Sum_{i=1..m, j=1..m, k=1..m} i^j^k = {1, 28, 7625731729896, ...}.
%C A124391 Primes terms are listed in A039787.
%t A124391 Do[f=Sum[Mod[Sum[Mod[Sum[PowerMod[i,j^k,n], {i, 1, n}],n], {j, 1, n}],n], {k, 1, n}];If[IntegerQ[f/n],Print[n]],{n,1,103}]
%Y A124391 Cf. A123269, A039787, A086787.
%K A124391 hard,more,nonn
%O A124391 1,2
%A A124391 _Alexander Adamchuk_, Oct 30 2006