|
| |
|
|
A152219
|
|
Numbers n such that n! - 1 is divisible by a square.
|
|
1
| | |
|
|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| Primes p such that p^2 divides m!-1 for some integer m<p see A152220.
a(6)=4929 [From Artur Jasinski (grafix(AT)csl.pl), Nov 30 2008]
|
|
|
MATHEMATICA
| aa = {}; Do[If[(Sqrt[n! - 1] /. Sqrt[_] -> 1) > 1, Print[n]; AppendTo[aa, n], {n, 1, 1000}]; aa (*Artur Jasinski*)
|
|
|
CROSSREFS
| A064237
Sequence in context: A043917 A037378 A100663 * A173037 A029712 A136353
Adjacent sequences: A152216 A152217 A152218 * A152220 A152221 A152222
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Artur Jasinski (grafix(AT)csl.pl), Nov 29 2008
|
| |
|
|
