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 A338936 #7 Nov 17 2020 01:35:17 %S A338936 5,5,23,17,23,71,37,29,41,103,113,71,47,101,53,359,227,293,71,79,67, %T A338936 83,709,89,271,149,643,107,113,401,97,257,137,227,149,1051,167,577, %U A338936 263,173,127,269,839,263,191,599,359,1399,401,709,659,1213,157,233,359,239,223,577,353,727,251,677,257 %N A338936 Primes in A338935. %H A338936 Robert Israel, <a href="/A338936/b338936.txt">Table of n, a(n) for n = 1..10000</a> %F A338936 a(n) = A338935(A338930(n)). %e A338936 a(3) = A338935(18) = 23 is the third prime in A338935. %p A338936 f:= n -> add(t^2 mod n, t = numtheory:-divisors(n)): %p A338936 select(isprime, map(f, [$1..1000])); %Y A338936 Cf. A338930, A338935. %K A338936 nonn %O A338936 1,1 %A A338936 _J. M. Bergot_ and _Robert Israel_, Nov 16 2020