login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

The square roots of the perfect squares produced by A335410 in the order in which they appear.
1

%I #14 Jul 05 2020 12:24:06

%S 12,12,24,36,60,84,84,132,96,372,144,408,168,180,732,468,348,1032,408,

%T 1392,528,1704,612,1956,948,744,2316,1092,816,1212,1236,2724,912,2616,

%U 2820,948,1092,1548,1188,1200,1716

%N The square roots of the perfect squares produced by A335410 in the order in which they appear.

%e 11 is in sequence A335410. 2*(11^2 - 7^2) = 144 = 12^2. Therefore, 12 is in this sequence.

%t Select[IntegerQ][Table[Sqrt[2*Prime[n]^2 - 2*Prime[n-1]^2], {n,17000}]]

%o (PARI) lista(nn) = {my(pp=2, s); forprime (p=3, nn, if (issquare(s=2*(p^2 - pp^2)), print1(sqrtint(s), ", ")); pp = p;);} \\ _Michel Marcus_, Jun 25 2020

%Y Cf. A335410.

%K nonn

%O 1,1

%A _Jeff Brown_, Jun 22 2020