|
|
A306666
|
|
Positive integers x such that x*(7-5*x+x^2)*(6-4*x+x^2) is a square.
|
|
0
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
No other terms below 10^6.
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range[1000], IntegerQ[Sqrt[#*(7 - 5*# + #^2)*(6 - 4*# + #^2)]] &] (* Vaclav Kotesovec, Mar 10 2019 *)
|
|
PROG
|
(PARI) isok(x)=issquare(x*(7-5*x+x^2)*(6-4*x+x^2));
(Python)
from sympy.ntheory.primetest import is_square
A306666_list = [n for n in range(1, 10**3) if is_square(n*(n*(n*(n*(n - 9) + 33) - 58) + 42))] # Chai Wah Wu, Nov 24 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|