Nothing Special   »   [go: up one dir, main page]

login
A083482
Square root of smallest square of the type n(n+1)*k.
3
2, 6, 6, 10, 30, 42, 28, 12, 30, 110, 66, 78, 182, 210, 60, 68, 102, 114, 190, 210, 462, 506, 276, 60, 130, 234, 126, 406, 870, 930, 248, 264, 1122, 1190, 210, 222, 1406, 1482, 780, 820, 1722, 1806, 946, 330, 690, 2162, 564, 84, 70, 510, 1326, 1378, 954, 990
OFFSET
1,1
COMMENTS
Squares pertaining to A083481.
a(n) == (p*q*r... ) where p,q,r are prime factors of n(n+1).
LINKS
FORMULA
a(n) = sqrt(A002378(n)*A083481(n)) = sqrt(A002378(n)*A007913(A002378(n))). a(n) = A019554(A002378(n)). - David Wasserman, Nov 16 2004
MATHEMATICA
Table[Times @@ ((a = Transpose[FactorInteger[n (n + 1)]])[[1]]^Quotient[a[[2]] + 1, 2]), {n, 54}] (* Ivan Neretin, May 20 2015 *)
PROG
(PARI) a(n)=sqrt(n*(n+1)*core(n*(n+1)))
(Python)
from math import prod
from sympy import factorint
def A083482(n): return n*(n+1)//prod(p**(q>>1) for p, q in factorint(n*(n+1)).items()) # Chai Wah Wu, Mar 20 2023
CROSSREFS
Cf. A083481.
Sequence in context: A245486 A147298 A078636 * A290701 A200579 A200809
KEYWORD
nonn
AUTHOR
Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 03 2003
EXTENSIONS
More terms from Benoit Cloitre, May 04 2003
More terms from David Wasserman, Nov 16 2004
STATUS
approved