|
|
A127104
|
|
Numbers n such that n^2 divides 4^n-1.
|
|
27
|
|
|
1, 3, 21, 903, 2667, 7077, 113799, 114681, 304311, 389193, 898779, 932799, 4893357, 6099429, 8131683, 8776257, 14452473, 38350263, 38647497, 40647747, 49427511, 99583113, 118465473, 128794323, 131158041, 152643813
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
a(n) is a subset of A014945(n) = {1, 3, 9, 21, 27, 63, 81, 147, 171, 189, 243, 441, 513, 567, 657, 729, ...} Numbers n such that n divides 4^n-1.
3 divides a(n) for n>1. 7 divides a(n) for n>2. 43 divides a(n) for n = {4,8,9,10,12,13,16,...}. 127 divides a(n) for n = {5,8,11,14,15,17,...}. Prime factors of a(n) in order of their appearance in a(n) are {3,7,43,127,337,5419,431,1033,5419,2287,3049,9719,...}. - Alexander Adamchuk, Jan 11 2007
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[30000], IntegerQ[(PowerMod[4, #, #^2 ]-1)/#^2 ]&]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|