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 A338189 #6 Oct 15 2020 10:52:08 %S A338189 1,77,161,209,231,253,329,377,385,413,437,473,483,497,517,539,581,589, %T A338189 627,649,689,713,737,749,759,805,817,869,893,913,917,987,989,1045, %U A338189 1073,1081,1121,1127,1133,1155,1169,1177,1197,1239,1253,1265,1273,1309,1311,1313,1333 %N A338189 Integers m such that A337454(m) = 1. %o A338189 (PARI) f(n) = sumdiv(n, d, n % (sum(m=0, n-1, Mod(m, n)^d == m)/sum(m=0, n-1, -Mod(m, n)^d == m)) == 0); \\ A337454 %o A338189 isok(n) = f(n) == 1; %Y A338189 Cf. A337454, A338190. %K A338189 nonn %O A338189 1,2 %A A338189 _Michel Marcus_, Oct 15 2020