login
A335778
The square roots of the perfect squares produced by A335410 in the order in which they appear.
1
12, 12, 24, 36, 60, 84, 84, 132, 96, 372, 144, 408, 168, 180, 732, 468, 348, 1032, 408, 1392, 528, 1704, 612, 1956, 948, 744, 2316, 1092, 816, 1212, 1236, 2724, 912, 2616, 2820, 948, 1092, 1548, 1188, 1200, 1716
OFFSET
1,1
EXAMPLE
11 is in sequence A335410. 2*(11^2 - 7^2) = 144 = 12^2. Therefore, 12 is in this sequence.
MATHEMATICA
Select[IntegerQ][Table[Sqrt[2*Prime[n]^2 - 2*Prime[n-1]^2], {n, 17000}]]
PROG
(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
CROSSREFS
Cf. A335410.
Sequence in context: A092538 A354571 A309772 * A022346 A174020 A173549
KEYWORD
nonn
AUTHOR
Jeff Brown, Jun 22 2020
STATUS
approved