proposed
approved
proposed
approved
editing
proposed
R. Reinhard Zumkeller, <a href="/A069483/b069483.txt">Table of n, a(n) for n = 1..1000</a>
(PARI) a(n) = my(f=factor(prime(n+1)^2 - prime(n)^2)); f[#f~, 1]; \\ Michel Marcus, Nov 12 2023
approved
editing
editing
approved
FactorInteger[#[[2]]-#[[1]]][[-1, 1]]&/@Partition[Prime[Range[80]]^2, 2, 1] (* Harvey P. Dale, Jan 17 2016 *)
approved
editing
_Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), _, Mar 29 2002, Aug 05 2007
R. Zumkeller, <a href="/A069483/b069483.txt">Table of n, a(n) for n = 1..1000</a>
nonn,new
nonn
R. Zumkeller, <a href="http://www.research.att.com/~njas/sequences/b069483.txt">Table of n, a(n) for n = 1..1000</a>
nonn,new
nonn
nonn,new
nonn
Reinhard Zumkeller (reinhard.zumkeller(AT)lhsystemsgmail.com), Mar 29 2002, Aug 05 2007
5, 2, 3, 3, 3, 5, 3, 7, 13, 5, 17, 13, 7, 5, 5, 7, 5, 3, 23, 3, 19, 3, 43, 31, 11, 17, 7, 3, 37, 7, 43, 67, 23, 5, 5, 11, 5, 11, 17, 11, 5, 31, 3, 13, 11, 41, 31, 5, 19, 11, 59, 5, 41, 127, 13, 19, 5, 137, 31, 47, 5, 7, 103, 13, 7, 7, 167, 19, 29, 13, 89, 11, 37, 47, 127, 193, 131, 19
R. Zumkeller, <a href="http://www.research.att.com/~njas/sequences/b069483.txt">Table of n, a(n) for n = 1..1000</a>
nonn,new
nonn
Reinhard Zumkeller (reinhard.zumkeller(AT)lhsystems.com), Mar 29 2002, Aug 05 2007