A256150 -id:A256150 - cp's OEIS frontend

A256151 Triangular numbers n such that sigma(n) is a square number.

1, 3, 66, 210, 820, 2346, 4278, 22578, 27966, 32131, 35511, 51681, 53956, 102378, 169653, 173755, 177906, 223446, 241860, 256686, 306153, 310866, 349866, 431056, 434778, 470935, 491536, 512578, 567645, 579426, 688551, 799480, 845650, 893116, 963966, 1031766, 1110795, 1200475, 1613706, 1719585

Offset: 1

Antonio Roldán, Mar 16 2015

nonn

This sequence is the intersection of A000217 and A006532.

The corresponding triangular indices are in A116990. - Michel Marcus, Mar 17 2015

			3 is in the sequence because 3=2*3/2 is triangular, and sigma(3)=1+3=4=2^2 is square.

Amiram Eldar, Table of n, a(n) for n = 1..10000

Cf. A000290, A000217, A006532, A074285, A116990, A256149, A256150, A256152.

[n*(n+1) div 2: n in [1..2000] | IsSquare(SumOfDivisors(n*(n+1) div 2))]; // Vincenzo Librandi, Mar 17 2015

Select[Accumulate[Range[0, 2000]], IntegerQ@Sqrt@DivisorSigma[1, #] &] (* Michael De Vlieger, Mar 17 2015 *)

{for(i=1,2*10^3,n=i*(i+1)/2;if(issquare(sigma(n)),print1(n,", ")))}

A256152 Numbers k such that k is the product of two distinct primes and sigma(k) is a square number.

Original entry on oeis.org

22, 94, 115, 119, 214, 217, 265, 382, 497, 517, 527, 679, 745, 862, 889, 1174, 1177, 1207, 1219, 1393, 1465, 1501, 1649, 1687, 1915, 1942, 2101, 2159, 2201, 2359, 2899, 2902, 2995, 3007, 3143, 3383, 3401, 3427, 3937, 4039, 4054, 4097, 4315, 4529, 4537, 4702, 4741, 5029, 5065, 5398, 5587

Offset: 1

Antonio Roldán, Mar 16 2015

nonn

This sequence is the intersection of A006881 and A006532.

			199 is in the sequence because 119=7*17 (the product of two distinct primes) and sigma(119)=8*18=144=12^2 (a square number).

Reinhard Zumkeller, Table of n, a(n) for n = 1..1000

Cf. A006881, A006532, A256149, A256150, A256151.

Cf. A020639, A010052.

a256152 n = a256152_list !! (n-1)
256152_list = filter f a006881_list where
   f x = a010052' ((spf + 1) * (x `div` spf + 1)) == 1
         where spf = a020639 x
-- Reinhard Zumkeller, Apr 06 2015

f[n_] := Block[{pf = FactorInteger@ n}, Max @@ Last /@ pf == 1 && Length@ pf == 2]; Select[Range@ 6000, IntegerQ@ Sqrt@ DivisorSigma[1, #] && f@ # &] (* Michael De Vlieger, Mar 17 2015 *)

{for(i=1,10^4,if(omega(i)==2&&issquarefree(i)&&issquare(sigma(i)),print1(i,", ")))}

A256149 Square numbers n such that sigma(n) is a triangular number.

Original entry on oeis.org

1, 36, 441, 5625, 6084, 407044, 8444836, 17388900, 35070084, 40729924, 57790404, 80138304, 537822481, 588159504, 659821969, 918999225, 1820387556, 2179862721, 2599062361, 5110963081, 28816420516, 36144473689, 46082779561, 55145598561, 147225690000, 163405126756

Offset: 1

Antonio Roldán, Mar 16 2015

nonn

This sequence is the intersection of A000290 and A045746.

			441 is in the sequence because 441 = 21^2 is square number, and sigma(441) = 441 + 147 + 63 + 49 + 21 + 9 + 7 + 3 + 1 = 741 = 38*39/2 is triangular number.

Amiram Eldar, Table of n, a(n) for n = 1..72

Cf. A000290, A000217, A045746, A083674, A256150, A256151, A256152.

t = Accumulate[Range@ 10000]; Select[Range[10000]^2, MemberQ[t, DivisorSigma[1, #]] &] (* Michael De Vlieger, Mar 17 2015 *)
Select[Range[500000]^2,OddQ[Sqrt[8DivisorSigma[1,#]+1]]&] (* Harvey P. Dale, Feb 25 2017 *)

{for(i=1,10^6,n=i*i;if(ispolygonal(sigma(n), 3),print1(n,", ")))}

cp's OEIS Frontend

A256151 Triangular numbers n such that sigma(n) is a square number.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Magma

Mathematica

PARI

A256152 Numbers k such that k is the product of two distinct primes and sigma(k) is a square number.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Haskell

Mathematica

PARI

A256149 Square numbers n such that sigma(n) is a triangular number.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI