OFFSET
1,1
COMMENTS
From Robert Israel, Jun 08 2018: (Start)
All terms are even.
Are 2, 8 and 560 the only terms == 2 (mod 6)? There are no others up to 3*10^9. (End)
LINKS
Robert Israel, Table of n, a(n) for n = 1..2559
EXAMPLE
a(1) = 2 because (8^2 - 1)/(2^2 - 1) = 21.
MAPLE
A272062:=n->`if`((8^n-1) mod (n^2-1) = 0, n, NULL): seq(A272062(n), n=2..5*10^4); # Wesley Ivan Hurt, Apr 21 2016
MATHEMATICA
Select[Range[2, 22100], Divisible[8^# - 1, #^2 - 1] &] (* Michael De Vlieger, Apr 19 2016 *)
PROG
(Magma) [0] cat [n: n in [2..30000] | Denominator((8^n-1)/(n^2-1)) eq 1];
(PARI) is(n)=Mod(8, n^2-1)^n==1 \\ Charles R Greathouse IV, Apr 19 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Apr 19 2016
STATUS
approved