A113244 Prime differences of tetranacci numbers.

2, 3, 7, 11, 13, 41, 79, 107, 179, 193, 293, 397, 769, 1489, 2099, 2843, 2857, 5507, 5521, 9181, 10463, 10663, 10667, 19079, 39619, 76423, 126743, 146539, 147283, 147311, 281081, 283949, 547229, 771073, 3919171, 3919543, 3919943, 7555879, 7555927, 10644589, 14564477

Offset

1,1

Comments

A113188-A113194 deal with difference sets of Fibonacci numbers and Lucas numbers and primes in those difference sets. A113238-A113239 deal with the difference set of tribonacci numbers and primes in that difference set.

Links

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

Formula

{a(n)} = intersection of A000040 and A113243. {a(n)} = primes in the difference set of tetranacci sequence A000078, excluding prime tetranacci numbers A104535.

Example

a(1) = 2 because 4 - 2 = 2 where 4 and 2 are tetranacci numbers.
a(2) = 3 because 4 - 1 = 3 where 4 and 1 are tetranacci numbers.
a(3) = 7 because 8 - 1 = 7 where 8 and 1 are tetranacci numbers.
a(4) = 11 because 15 - 4 = 11 where 15 and 4 are tetranacci numbers.
a(5) = 13 because 15 - 2 = 13 where 15 and 2 are tetranacci numbers.

Maple

isA113244 := proc(n)
    isprime(n) and isA113243(n) ;
end proc:
for n from 1 do
    p := ithprime(n) ;
    if isA113244(p) then
        printf("%d\n", p) ;
    end if;
end do: # R. J. Mathar, Oct 04 2014

Crossrefs

Cf. A000040, A000078, A113188-A113194, A113238, A113239, A113243.

Sequence in context: A233769 A038895 A291657 * A040152 A323353 A188529

Adjacent sequences: A113241 A113242 A113243 * A113245 A113246 A113247

Keyword

easy,nonn

Author

Jonathan Vos Post, Oct 19 2005; corrected Oct 20 2005

Extensions

281081 inserted by R. J. Mathar, Oct 04 2014

Status

approved