The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A228849 Number of distinct 12th powers modulo n. 12
 1, 2, 2, 2, 2, 4, 2, 2, 2, 4, 6, 4, 2, 4, 4, 2, 5, 4, 4, 4, 4, 12, 12, 4, 6, 4, 4, 4, 8, 8, 6, 3, 12, 10, 4, 4, 4, 8, 4, 4, 11, 8, 8, 12, 4, 24, 24, 4, 8, 12, 10, 4, 14, 8, 12, 4, 8, 16, 30, 8, 6, 12, 4, 5, 4, 24, 12, 10, 24, 8, 36, 4, 7, 8, 12, 8, 12, 8, 14, 4, 10 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS R. J. Mathar, Table of n, a(n) for n = 1..10000 MAPLE A228849 := proc(n)     {seq(i^12 mod n, i=0..n-1)} ;     nops(%) ; end proc: # R. J. Mathar, Sep 21 2017 MATHEMATICA a[n_] := Table[PowerMod[i, 12, n], {i, 0, n - 1}] // Union // Length; Array[a, 100] (* Jean-François Alcover, Mar 24 2020 *) PROG (MAGMA) [#Set([k^12 mod n : k in [1..n]]) : n in [1..81]] (PARI) a(n)=my(f=factor(n)); prod(i=1, #f[, 1], my(k=f[i, 1]^f[i, 2]); #vecsort(vector(k, i, i^12%k), , 8)) \\ Charles R Greathouse IV, Sep 05 2013 CROSSREFS Cf. A000224 (squares), A046530 (cubic residues), A052273 (4th powers), A052274 (5th powers), A052275 (6th powers), A085310 (7th powers), A085311 (8th powers), A085312 (9th powers), A085313 (10th powers), A085314 (11th powers). Sequence in context: A127973 A300654 A023157 * A069733 A187467 A081755 Adjacent sequences:  A228846 A228847 A228848 * A228850 A228851 A228852 KEYWORD nonn,mult AUTHOR Arkadiusz Wesolowski, Sep 05 2013 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified July 25 20:59 EDT 2021. Contains 346294 sequences. (Running on oeis4.)