A106275 Numbers k for which the absolute value of the discriminant of the polynomial x^k - x^(k-1) - ... - x - 1 is a prime times 2^m for some m >= 0.
2, 3, 4, 5, 6, 7, 21, 26, 99, 158, 405
Offset: 1
Links
- Eric Weisstein's World of Mathematics, Fibonacci n-Step Number.
Crossrefs
Cf. A106273 (discriminant of the polynomial x^n - x^(n-1) - ... - x - 1).
Programs
-
PARI
f(n) = poldisc('x^n-sum(k=0, n-1, 'x^k)); \\ A106273 isok(k) = my(x=abs(f(k))); ispseudoprime(x) || ispseudoprime(x/2^valuation(x, 2)); \\ Michel Marcus, Mar 26 2024
Comments