OFFSET
1,1
EXAMPLE
Det[{4, prime(4)}, {5, prime(5)}] = Det[{4,7}, {5,11}] = 44 - 35 = 9, an integer square, so 4 is a term of the sequence.
MATHEMATICA
Select[Range[10^4], IntegerQ[Sqrt[Det[{{#, Prime[ # ]}, {# + 1, Prime[ # + 1]}}]]] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Joseph L. Pe, Feb 07 2002
STATUS
approved