login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Numbers such that A231563(n)=0.
3

%I #8 Oct 05 2023 10:58:00

%S 1,3,5,7,9,10,11,13,14,15,17,19,21,22,23,25,26,27,28,29,31,33,34,35,

%T 37,38,39,41,43,44,45,46,47,49,50,51,52,53,55,56,57,58,59,61,62,63,65,

%U 67,68,69,70,71,73,74,75,76,77,78,79,81,82,83,85,86,87,88

%N Numbers such that A231563(n)=0.

%C This sequence contains the odd primes.

%t S[n_] := Mod[Sum[If[GCD[i, n] == 1, PowerMod[i, n, n], 0], {i, 1, n}], n];Select[Range[100],S[#]==0&]

%Y Cf. A231563, A231565.

%K nonn

%O 1,2

%A _José María Grau Ribas_, Dec 09 2013