A113501 Indices of prime NSW numbers A088165.

1, 2, 3, 9, 14, 23, 29, 81, 128, 210, 468, 473, 746, 950, 3344, 4043, 4839, 14376, 39521, 64563, 72984, 82899, 84338, 85206, 86121, 139160

Offset

1,2

Comments

Very closely related to indices of prime Pell-Lucas numbers (A099088).

a(27) > 221400. - Robert Price, Mar 29 2019

Links

Table of n, a(n) for n=1..26.

H. Li, T. MacHenry, Permanents and Determinants, Weighted Isobaric Polynomials, and Integer Sequences, J. Int. Seq. 16 (2013) #13.3.5, example 47.

Eric Weisstein's World of Mathematics, NSW Number

Eric Weisstein's World of Mathematics, Integer Sequence Primes

Example

NSW(1) = 7, NSW(2) = 41, NSW(3) = 239, NSW(9) = 9369319, ...

Mathematica

nsw = LinearRecurrence[{6, -1}, {7, 41}, 1000]; Position[nsw, _?(PrimeQ[#] &)] // Flatten (* Amiram Eldar, Dec 07 2018 *)

Prog

(PARI) isok(n) = my(w=3+quadgen(32)); isprime(imag((1+w)*w^n)); \\ Michel Marcus, Dec 07 2018

Crossrefs

Cf. A002315, A088165, A099088.

Sequence in context: A116222 A338234 A048038 * A101067 A056645 A295857

Adjacent sequences: A113498 A113499 A113500 * A113502 A113503 A113504

Keyword

nonn,more

Author

Eric W. Weisstein, Jan 09 2006

Extensions

a(19)-a(20) from Eric W. Weisstein, May 22 2006

a(21) from Eric W. Weisstein, Aug 29 2006

a(22) from Eric W. Weisstein, Nov 11 2006

a(23) from Eric W. Weisstein, Nov 26 2006

a(24) from Eric W. Weisstein, Dec 10 2006

a(25) from Eric W. Weisstein, Jan 25 2007

a(26) from Robert Price, Dec 07 2018

Status

approved