proposed

approved

editing

proposed

(PARI) a(n)=if(isprime(n), n, #Set(vector(n, i, (, lift(Mod(i-1, n)^n))) \\ _)))) \\ _Charles R Greathouse IV_, Jul 31 2016

approved

editing

Andrew Howroyd: Obvious fix to PARI

editing

approved

0, 1, 4, 9, 4, 1, 0, 1, 4, 9, , 4, , 1;

a:= n-> nops ({({seq ((k&^n mod n, k=0..n-1)}):

seq ((a(n), n=1..100);

approved

editing

proposed

approved

editing

proposed

0;

0, 1;

0, 1, 2;

0, 1, 0, 1;

0, 1, 2, 3, 4;

0, 1, 4, 3, 4, 1;

0, 1, 2, 3, 4, 5, 6;

0, 1, 0, 1, 0, 1, 0, 1;

0, 1, 8, 0, 1, 8, 0, 1, 8;

0, 1, 4, 9, 6, 5, 6, 9, 4, 1;

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10;

0, 1, 4, 9, 4, 1, 0, 1, 4, 9, 4, 1;

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12;

proposed

editing

editing

proposed

(Python)

def A195637(n): return len({pow(x, n, n) for x in range(n)}) # Chai Wah Wu, Aug 22 2023

approved

editing