cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Previous Showing 71-80 of 237 results. Next

A003393 Numbers that are the sum of 4 positive 9th powers.

Original entry on oeis.org

4, 515, 1026, 1537, 2048, 19686, 20197, 20708, 21219, 39368, 39879, 40390, 59050, 59561, 78732, 262147, 262658, 263169, 263680, 281829, 282340, 282851, 301511, 302022, 321193, 524290, 524801, 525312, 543972, 544483, 563654, 786433, 786944, 806115, 1048576, 1953128, 1953639
Offset: 1

Views

Author

Keywords

Comments

As the order of addition doesn't matter we can assume terms are in nondecreasing order. - David A. Corneth, Aug 01 2020

Examples

			From _David A. Corneth_, Aug 01 2020: (Start)
12964419872 is in the sequence as 12964419872 = 3^9 + 5^9 + 11^9 + 13^9.
59116436980 is in the sequence as 59116436980 = 5^9 + 6^9 + 14^9 + 15^9.
79254744137 is in the sequence as 79254744137 = 6^9 + 11^9 + 15^9 + 15^9. (End)
		

Crossrefs

A###### (x, y): Numbers that are the form of x nonzero y-th powers.
Cf. A000404 (2, 2), A000408 (3, 2), A000414 (4, 2), A003072 (3, 3), A003325 (3, 2), A003327 (4, 3), A003328 (5, 3), A003329 (6, 3), A003330 (7, 3), A003331 (8, 3), A003332 (9, 3), A003333 (10, 3), A003334 (11, 3), A003335 (12, 3), A003336 (2, 4), A003337 (3, 4), A003338 (4, 4), A003339 (5, 4), A003340 (6, 4), A003341 (7, 4), A003342 (8, 4), A003343 (9, 4), A003344 (10, 4), A003345 (11, 4), A003346 (12, 4), A003347 (2, 5), A003348 (3, 5), A003349 (4, 5), A003350 (5, 5), A003351 (6, 5), A003352 (7, 5), A003353 (8, 5), A003354 (9, 5), A003355 (10, 5), A003356 (11, 5), A003357 (12, 5), A003358 (2, 6), A003359 (3, 6), A003360 (4, 6), A003361 (5, 6), A003362 (6, 6), A003363 (7, 6), A003364 (8, 6), A003365 (9, 6), A003366 (10, 6), A003367 (11, 6), A003368 (12, 6), A003369 (2, 7), A003370 (3, 7), A003371 (4, 7), A003372 (5, 7), A003373 (6, 7), A003374 (7, 7), A003375 (8, 7), A003376 (9, 7), A003377 (10, 7), A003378 (11, 7), A003379 (12, 7), A003380 (2, 8), A003381 (3, 8), A003382 (4, 8), A003383 (5, 8), A003384 (6, 8), A003385 (7, 8), A003387 (9, 8), A003388 (10, 8), A003389 (11, 8), A003390 (12, 8), A003391 (2, 9), A003392 (3, 9), A003393 (4, 9), A003394 (5, 9), A003395 (6, 9), A003396 (7, 9), A003397 (8, 9), A003398 (9, 9), A003399 (10, 9), A004800 (11, 9), A004801 (12, 9), A004802 (2, 10), A004803 (3, 10), A004804 (4, 10), A004805 (5, 10), A004806 (6, 10), A004807 (7, 10), A004808 (8, 10), A004809 (9, 10), A004810 (10, 10), A004811 (11, 10), A004812 (12, 10), A004813 (2, 11), A004814 (3, 11), A004815 (4, 11), A004816 (5, 11), A004817 (6, 11), A004818 (7, 11), A004819 (8, 11), A004820 (9, 11), A004821 (10, 11), A004822 (11, 11), A004823 (12, 11), A047700 (5, 2).

Extensions

Removed incorrect program. - David A. Corneth, Aug 01 2020

A004803 Numbers that are the sum of 3 nonzero 10th powers.

Original entry on oeis.org

3, 1026, 2049, 3072, 59051, 60074, 61097, 118099, 119122, 177147, 1048578, 1049601, 1050624, 1107626, 1108649, 1166674, 2097153, 2098176, 2156201, 3145728, 9765627, 9766650, 9767673, 9824675, 9825698, 9883723, 10814202, 10815225, 10873250
Offset: 1

Views

Author

Keywords

Comments

As the order of addition doesn't matter we can assume terms are in nondecreasing order. - David A. Corneth, Aug 01 2020

Examples

			From _David A. Corneth_, Aug 01 2020: (Start)
17258390288153 is in the sequence as 17258390288153 = 14^10 + 14^10 + 21^10.
42930989049225 is in the sequence as 42930989049225 = 19^10 + 20^10 + 22^10.
323760702520401 is in the sequence as 323760702520401 = 23^10 + 26^10 + 26^10. (End)
		

Crossrefs

A###### (x, y): Numbers that are the form of x nonzero y-th powers.
Cf. A000404 (2, 2), A000408 (3, 2), A000414 (4, 2), A003072 (3, 3), A003325 (3, 2), A003327 (4, 3), A003328 (5, 3), A003329 (6, 3), A003330 (7, 3), A003331 (8, 3), A003332 (9, 3), A003333 (10, 3), A003334 (11, 3), A003335 (12, 3), A003336 (2, 4), A003337 (3, 4), A003338 (4, 4), A003339 (5, 4), A003340 (6, 4), A003341 (7, 4), A003342 (8, 4), A003343 (9, 4), A003344 (10, 4), A003345 (11, 4), A003346 (12, 4), A003347 (2, 5), A003348 (3, 5), A003349 (4, 5), A003350 (5, 5), A003351 (6, 5), A003352 (7, 5), A003353 (8, 5), A003354 (9, 5), A003355 (10, 5), A003356 (11, 5), A003357 (12, 5), A003358 (2, 6), A003359 (3, 6), A003360 (4, 6), A003361 (5, 6), A003362 (6, 6), A003363 (7, 6), A003364 (8, 6), A003365 (9, 6), A003366 (10, 6), A003367 (11, 6), A003368 (12, 6), A003369 (2, 7), A003370 (3, 7), A003371 (4, 7), A003372 (5, 7), A003373 (6, 7), A003374 (7, 7), A003375 (8, 7), A003376 (9, 7), A003377 (10, 7), A003378 (11, 7), A003379 (12, 7), A003380 (2, 8), A003381 (3, 8), A003382 (4, 8), A003383 (5, 8), A003384 (6, 8), A003385 (7, 8), A003387 (9, 8), A003388 (10, 8), A003389 (11, 8), A003390 (12, 8), A003391 (2, 9), A003392 (3, 9), A003393 (4, 9), A003394 (5, 9), A003395 (6, 9), A003396 (7, 9), A003397 (8, 9), A003398 (9, 9), A003399 (10, 9), A004800 (11, 9), A004801 (12, 9), A004802 (2, 10), A004803 (3, 10), A004804 (4, 10), A004805 (5, 10), A004806 (6, 10), A004807 (7, 10), A004808 (8, 10), A004809 (9, 10), A004810 (10, 10), A004811 (11, 10), A004812 (12, 10), A004813 (2, 11), A004814 (3, 11), A004815 (4, 11), A004816 (5, 11), A004817 (6, 11), A004818 (7, 11), A004819 (8, 11), A004820 (9, 11), A004821 (10, 11), A004822 (11, 11), A004823 (12, 11), A047700 (5, 2).

Programs

  • Mathematica
    kmax = 9*10^15; (* max term *)
    m = kmax^(1/10) // Ceiling;
    Table[k = x^10 + y^10 + z^10; If[k <= kmax, k, Nothing], {x, 1, m}, {y, x, m}, {z, y, m}] // Flatten // Union (* Jean-François Alcover, Jul 19 2017, updated May 02 2023 *)

Extensions

Removed incorrect program. - David A. Corneth, Aug 01 2020

A004804 Numbers that are the sum of 4 nonzero 10th powers.

Original entry on oeis.org

4, 1027, 2050, 3073, 4096, 59052, 60075, 61098, 62121, 118100, 119123, 120146, 177148, 178171, 236196, 1048579, 1049602, 1050625, 1051648, 1107627, 1108650, 1109673, 1166675, 1167698, 1225723, 2097154, 2098177, 2099200, 2156202, 2157225
Offset: 1

Views

Author

Keywords

Comments

As the order of addition doesn't matter we can assume terms are in nondecreasing order. - David A. Corneth, Aug 01 2020

Examples

			From _David A. Corneth_, Aug 01 2020: (Start)
65969099123 is in the sequence as 65969099123 = 7^10 + 7^10 + 9^10 + 12^10.
1099804917226 is in the sequence as 1099804917226 = 4^10 + 5^10 + 7^10 + 16^10.
1164925542026 is in the sequence as 1164925542026 = 5^10 + 9^10 + 12^10 + 16^10. (End)
		

Crossrefs

A###### (x, y): Numbers that are the form of x nonzero y-th powers.
Cf. A000404 (2, 2), A000408 (3, 2), A000414 (4, 2), A003072 (3, 3), A003325 (3, 2), A003327 (4, 3), A003328 (5, 3), A003329 (6, 3), A003330 (7, 3), A003331 (8, 3), A003332 (9, 3), A003333 (10, 3), A003334 (11, 3), A003335 (12, 3), A003336 (2, 4), A003337 (3, 4), A003338 (4, 4), A003339 (5, 4), A003340 (6, 4), A003341 (7, 4), A003342 (8, 4), A003343 (9, 4), A003344 (10, 4), A003345 (11, 4), A003346 (12, 4), A003347 (2, 5), A003348 (3, 5), A003349 (4, 5), A003350 (5, 5), A003351 (6, 5), A003352 (7, 5), A003353 (8, 5), A003354 (9, 5), A003355 (10, 5), A003356 (11, 5), A003357 (12, 5), A003358 (2, 6), A003359 (3, 6), A003360 (4, 6), A003361 (5, 6), A003362 (6, 6), A003363 (7, 6), A003364 (8, 6), A003365 (9, 6), A003366 (10, 6), A003367 (11, 6), A003368 (12, 6), A003369 (2, 7), A003370 (3, 7), A003371 (4, 7), A003372 (5, 7), A003373 (6, 7), A003374 (7, 7), A003375 (8, 7), A003376 (9, 7), A003377 (10, 7), A003378 (11, 7), A003379 (12, 7), A003380 (2, 8), A003381 (3, 8), A003382 (4, 8), A003383 (5, 8), A003384 (6, 8), A003385 (7, 8), A003387 (9, 8), A003388 (10, 8), A003389 (11, 8), A003390 (12, 8), A003391 (2, 9), A003392 (3, 9), A003393 (4, 9), A003394 (5, 9), A003395 (6, 9), A003396 (7, 9), A003397 (8, 9), A003398 (9, 9), A003399 (10, 9), A004800 (11, 9), A004801 (12, 9), A004802 (2, 10), A004803 (3, 10), A004804 (4, 10), A004805 (5, 10), A004806 (6, 10), A004807 (7, 10), A004808 (8, 10), A004809 (9, 10), A004810 (10, 10), A004811 (11, 10), A004812 (12, 10), A004813 (2, 11), A004814 (3, 11), A004815 (4, 11), A004816 (5, 11), A004817 (6, 11), A004818 (7, 11), A004819 (8, 11), A004820 (9, 11), A004821 (10, 11), A004822 (11, 11), A004823 (12, 11), A047700 (5, 2).

Programs

  • Mathematica
    k = 4; p = 10; amax = 3*10^6; bmax = amax^(1/p) // Ceiling; Clear[b]; b[0] = 1; Select[Table[Total[Array[b, k]^p], {b[1], b[0], bmax}, Evaluate[ Sequence @@ Table[{b[j], b[j-1], bmax}, {j, 1, k}]]] // Flatten // Union, # <= amax&] (* Jean-François Alcover, Jul 19 2017 *)

Extensions

Removed incorrect program. - David A. Corneth, Aug 01 2020

A004805 Numbers that are the sum of 5 positive 10th powers.

Original entry on oeis.org

5, 1028, 2051, 3074, 4097, 5120, 59053, 60076, 61099, 62122, 63145, 118101, 119124, 120147, 121170, 177149, 178172, 179195, 236197, 237220, 295245, 1048580, 1049603, 1050626, 1051649, 1052672, 1107628, 1108651, 1109674, 1110697, 1166676, 1167699, 1168722, 1225724, 1226747
Offset: 1

Views

Author

Keywords

Comments

As the order of addition doesn't matter we can assume terms are in nondecreasing order. - David A. Corneth, Aug 01 2020

Examples

			From _David A. Corneth_, Aug 01 2020: (Start)
10352707051 is in the sequence as 10352707051 = 1^10 + 5^10 + 6^10 + 7^10 + 10^10.
59130893253 is in the sequence as 59130893253 = 7^10 + 9^10 + 9^10 + 11^10 + 11^10.
69011865378 is in the sequence as 69011865378 = 6^10 + 6^10 + 9^10 + 9^10 + 12^10. (End)
		

Crossrefs

A###### (x, y): Numbers that are the form of x nonzero y-th powers.
Cf. A000404 (2, 2), A000408 (3, 2), A000414 (4, 2), A003072 (3, 3), A003325 (3, 2), A003327 (4, 3), A003328 (5, 3), A003329 (6, 3), A003330 (7, 3), A003331 (8, 3), A003332 (9, 3), A003333 (10, 3), A003334 (11, 3), A003335 (12, 3), A003336 (2, 4), A003337 (3, 4), A003338 (4, 4), A003339 (5, 4), A003340 (6, 4), A003341 (7, 4), A003342 (8, 4), A003343 (9, 4), A003344 (10, 4), A003345 (11, 4), A003346 (12, 4), A003347 (2, 5), A003348 (3, 5), A003349 (4, 5), A003350 (5, 5), A003351 (6, 5), A003352 (7, 5), A003353 (8, 5), A003354 (9, 5), A003355 (10, 5), A003356 (11, 5), A003357 (12, 5), A003358 (2, 6), A003359 (3, 6), A003360 (4, 6), A003361 (5, 6), A003362 (6, 6), A003363 (7, 6), A003364 (8, 6), A003365 (9, 6), A003366 (10, 6), A003367 (11, 6), A003368 (12, 6), A003369 (2, 7), A003370 (3, 7), A003371 (4, 7), A003372 (5, 7), A003373 (6, 7), A003374 (7, 7), A003375 (8, 7), A003376 (9, 7), A003377 (10, 7), A003378 (11, 7), A003379 (12, 7), A003380 (2, 8), A003381 (3, 8), A003382 (4, 8), A003383 (5, 8), A003384 (6, 8), A003385 (7, 8), A003387 (9, 8), A003388 (10, 8), A003389 (11, 8), A003390 (12, 8), A003391 (2, 9), A003392 (3, 9), A003393 (4, 9), A003394 (5, 9), A003395 (6, 9), A003396 (7, 9), A003397 (8, 9), A003398 (9, 9), A003399 (10, 9), A004800 (11, 9), A004801 (12, 9), A004802 (2, 10), A004803 (3, 10), A004804 (4, 10), A004805 (5, 10), A004806 (6, 10), A004807 (7, 10), A004808 (8, 10), A004809 (9, 10), A004810 (10, 10), A004811 (11, 10), A004812 (12, 10), A004813 (2, 11), A004814 (3, 11), A004815 (4, 11), A004816 (5, 11), A004817 (6, 11), A004818 (7, 11), A004819 (8, 11), A004820 (9, 11), A004821 (10, 11), A004822 (11, 11), A004823 (12, 11), A047700 (5, 2).

Programs

  • Mathematica
    k = 5; p = 10; amax = 2*10^6; bmax = amax^(1/p) // Ceiling; Clear[b]; b[0] = 1; Select[Table[Total[Array[b, k]^p], {b[1], b[0], bmax}, Evaluate[ Sequence @@ Table[{b[j], b[j - 1], bmax}, {j, 1, k}]]] //Flatten // Union, # <= amax&] (* Jean-François Alcover, Jul 19 2017 *)

Extensions

Removed incorrect program. - David A. Corneth, Aug 01 2020

A004814 Numbers that are the sum of 3 positive 11th powers.

Original entry on oeis.org

3, 2050, 4097, 6144, 177149, 179196, 181243, 354295, 356342, 531441, 4194306, 4196353, 4198400, 4371452, 4373499, 4548598, 8388609, 8390656, 8565755, 12582912, 48828127, 48830174, 48832221, 49005273, 49007320, 49182419, 53022430
Offset: 1

Views

Author

Keywords

Comments

As the order of addition doesn't matter we can assume terms are in nondecreasing order. - David A. Corneth, Aug 01 2020

Examples

			From _David A. Corneth_, Aug 01 2020: (Start)
204800049005272 is in the sequence as 204800049005272 = 3^11 + 5^11 + 20^11.
2518268235958260 is in the sequence as 2518268235958260 = 16^11 + 19^11 + 25^11.
3786934745885995 is in the sequence as 3786934745885995 = 10^11 + 19^11 + 26^11. (End)
		

Crossrefs

A###### (x, y): Numbers that are the form of x nonzero y-th powers.
Cf. A000404 (2, 2), A000408 (3, 2), A000414 (4, 2), A003072 (3, 3), A003325 (3, 2), A003327 (4, 3), A003328 (5, 3), A003329 (6, 3), A003330 (7, 3), A003331 (8, 3), A003332 (9, 3), A003333 (10, 3), A003334 (11, 3), A003335 (12, 3), A003336 (2, 4), A003337 (3, 4), A003338 (4, 4), A003339 (5, 4), A003340 (6, 4), A003341 (7, 4), A003342 (8, 4), A003343 (9, 4), A003344 (10, 4), A003345 (11, 4), A003346 (12, 4), A003347 (2, 5), A003348 (3, 5), A003349 (4, 5), A003350 (5, 5), A003351 (6, 5), A003352 (7, 5), A003353 (8, 5), A003354 (9, 5), A003355 (10, 5), A003356 (11, 5), A003357 (12, 5), A003358 (2, 6), A003359 (3, 6), A003360 (4, 6), A003361 (5, 6), A003362 (6, 6), A003363 (7, 6), A003364 (8, 6), A003365 (9, 6), A003366 (10, 6), A003367 (11, 6), A003368 (12, 6), A003369 (2, 7), A003370 (3, 7), A003371 (4, 7), A003372 (5, 7), A003373 (6, 7), A003374 (7, 7), A003375 (8, 7), A003376 (9, 7), A003377 (10, 7), A003378 (11, 7), A003379 (12, 7), A003380 (2, 8), A003381 (3, 8), A003382 (4, 8), A003383 (5, 8), A003384 (6, 8), A003385 (7, 8), A003387 (9, 8), A003388 (10, 8), A003389 (11, 8), A003390 (12, 8), A003391 (2, 9), A003392 (3, 9), A003393 (4, 9), A003394 (5, 9), A003395 (6, 9), A003396 (7, 9), A003397 (8, 9), A003398 (9, 9), A003399 (10, 9), A004800 (11, 9), A004801 (12, 9), A004802 (2, 10), A004803 (3, 10), A004804 (4, 10), A004805 (5, 10), A004806 (6, 10), A004807 (7, 10), A004808 (8, 10), A004809 (9, 10), A004810 (10, 10), A004811 (11, 10), A004812 (12, 10), A004813 (2, 11), A004814 (3, 11), A004815 (4, 11), A004816 (5, 11), A004817 (6, 11), A004818 (7, 11), A004819 (8, 11), A004820 (9, 11), A004821 (10, 11), A004822 (11, 11), A004823 (12, 11), A047700 (5, 2).

Extensions

Removed incorrect program. - David A. Corneth, Aug 01 2020

A097268 Numbers that are both the sum of two nonzero squares and the difference of two nonzero squares.

Original entry on oeis.org

5, 8, 13, 17, 20, 25, 29, 32, 37, 40, 41, 45, 52, 53, 61, 65, 68, 72, 73, 80, 85, 89, 97, 100, 101, 104, 109, 113, 116, 117, 125, 128, 136, 137, 145, 148, 149, 153, 157, 160, 164, 169, 173, 180, 181, 185, 193, 197, 200, 205, 208, 212, 221, 225, 229, 232, 233
Offset: 1

Views

Author

Ray Chandler, Aug 19 2004

Keywords

Comments

Intersection of A000404 (sum of squares) and A024352 (difference of squares).
Also: Numbers of the form x^2+4y^2, where x and y are positive integers. Cf. A154777, A092572, A154778 for analogous sequences. - M. F. Hasler, Jan 24 2009

Crossrefs

Programs

  • PARI
    isA097268(n) = forstep( b=2,sqrtint(n-1),2, issquare(n-b^2) && return(1)) \\ M. F. Hasler, Jan 24 2009

A273812 Numbers that cannot be expressed as the sum of two nonzero squares and at most two powers of two.

Original entry on oeis.org

1, 535903, 1072327, 1594807, 1750111, 2025783, 2822151, 3304447, 3566119, 3697543, 3855319, 3982759, 4874439, 5832831, 5930775, 6642975, 7115791, 7536567, 7591447, 7885135, 8058399, 8225991, 8307879, 8357079, 8900583, 9339775, 10071879, 10626655, 11274735, 11334943, 12046807, 12229255
Offset: 1

Views

Author

David J. Platt, May 31 2016

Keywords

Comments

If up to three powers of 2 are allowed (instead of two), then the smallest n > 1 which cannot be expressed is larger than 10^10. - Giovanni Resta, Jun 08 2016
Smallest n > 1 that can't be written as the sum of two squares and at most three powers of two is larger than 2^36. - David J. Platt, Aug 11 2016

Crossrefs

A050801 Numbers k such that k^2 is expressible as the sum of two positive cubes in at least one way.

Original entry on oeis.org

3, 4, 24, 32, 81, 98, 108, 168, 192, 228, 256, 312, 375, 500, 525, 588, 648, 671, 784, 847, 864, 1014, 1029, 1183, 1225, 1261, 1323, 1344, 1372, 1536, 1824, 2048, 2187, 2496, 2646, 2888, 2916, 3000, 3993, 4000, 4200, 4225, 4536, 4563, 4644, 4704, 5184, 5324
Offset: 1

Views

Author

Patrick De Geest, Sep 15 1999

Keywords

Comments

Analogous solutions exist for the sum of two identical cubes z^2 = 2*r^3 (e.g., 864^2 = 2*72^3). Values of 'z' are the terms in A033430, values of 'r' are the terms in A001105.
First term whose square can be expressed in two ways is 77976; 77976^2 = 228^3 + 1824^3 = 1026^3 + 1710^3. - Jud McCranie
First term whose square can be expressed in three ways is 3343221000; 3343221000^2 = 279300^3 + 2234400^3 = 790020^3 + 2202480^3 = 1256850^3 + 2094750^3.
First term whose square can be expressed in four ways <= 42794271007595289; 42794271007595289^2 = 14385864402^3 + 122279847417^3 = 55172161278^3 + 118485773289^3 = 64117642953^3 + 116169722214^3 = 96704977369^3 + 97504192058^3.
First term whose square can be expressed in five ways <= 47155572445935012696000; 47155572445935012696000^2 = 94405759361550^3 + 1305070263601650^3 = 374224408544280^3 + 1294899176535720^3 = 727959282778000^3 + 1224915311765600^3 = 857010857812200^3 + 1168192425418200^3 = 1009237516560000^3 + 1061381454915600^3.
After a(1) = 3 this is always composite, because factorization of the polynomial a^3 + b^3 into irreducible components over Z is a^3 + b^3 = (b+a)*(b^2 - ab + b^2). They may be semiprimes, as with 671 = 11 * 61, and 1261 = 13 * 97. The numbers can be powers in various ways, as with 32 = 2^5, 81 = 3^4, 256 = 2^8, 784 = 2^4 * 7^2 , 1225 = 5^2 * 7^2, and 2187 = 3^7. - Jonathan Vos Post, Feb 05 2011
If n is a term then n*b^3 is also a term for any b, e.g., 3 is a term hence 3*2^3 = 24, 3*3^3 = 81 and also 3*4^3 = 192 are terms. Sequence of primitive terms may be of interest. - Zak Seidov, Dec 11 2013
First noncubefree primitive term is 168 = 21*2^3 (21 is not a term of the sequence). - Zak Seidov, Dec 16 2013
From XU Pingya, Apr 10 2021: (Start)
Every triple (a, b, c) (with a^2 = b^3 + c^3) can produce a nontrivial parametric solution (x, y, z) of the Diophantine equation x^2 + y^3 + z^3 = d^4.
For example, to (1183, 65, 104), there is such a solution (d^2 - (26968032*d)*t^3 + 1183*8232^3*t^6, (376*d)*t - 65*8232^2*t^4, (92*d)*t - 104*8232^2*t^4).
To (77976, 228, 1824), there is (d^2 - (272916*d)*t^3 + 77976*57^3*t^6, (52*d)*t - 228*57^2*t^4, (74*d)*t - 1824*57^2*t^4).
Or to (77976, 1026, 1719), there is (d^2 - (25992*d)*t^3 + 77976*19^3*t^6, (37*d)*t - 1026*19^2*t^4, (11*d)*t - 1710*19^2*t^4). (End)

Examples

			1183^2 = 65^3 + 104^3.
		

References

  • Ian Stewart, "Game, Set and Math", Chapter 8, 'Close Encounters of the Fermat Kind', Penguin Books, Ed. 1991, pp. 107-124.

Crossrefs

Programs

  • Maple
    A050801 := proc(n)
        option remember ;
        local a,x,y ;
        if n =1 then
            3
        else
            for a from procname(n-1)+1 do
                for x from 1 do
                    if x^3 >= a^2 then
                        break ;
                    end if;
                    for y from 1 to x do
                        if x^3+y^3 = a^2 then
                            return a ;
                        end if;
                    end do:
                end do:
            end do:
        end if;
    end proc:
    seq(A050801(n),n=1..20) ; # R. J. Mathar, Jan 22 2025
  • Mathematica
    Select[Range[5350], Reduce[0 < x <= y && #^2 == x^3 + y^3, {x,y}, Integers] =!= False &] (* Jean-François Alcover, Mar 30 2011 *)
    Sqrt[#]&/@Union[Select[Total/@(Tuples[Range[500],2]^3),IntegerQ[ Sqrt[ #]]&]] (* Harvey P. Dale, Mar 06 2012 *)
    Select[Range@ 5400, Length@ DeleteCases[PowersRepresentations[#^2, 2, 3], w_ /; Times @@ w == 0] > 0 &] (* Michael De Vlieger, May 20 2017 *)
  • PARI
    is(n)=my(N=n^2); for(k=sqrtnint(N\2,3),sqrtnint(N-1,3), if(ispower(N-k^3,3), return(n>1))); 0 \\ Charles R Greathouse IV, Dec 13 2013

Formula

a(n) = sqrt(A050802(n)). - Jonathan Sondow, Oct 28 2013

Extensions

More terms from Michel ten Voorde and Jud McCranie

A007692 Numbers that are the sum of 2 nonzero squares in 2 or more ways.

Original entry on oeis.org

50, 65, 85, 125, 130, 145, 170, 185, 200, 205, 221, 250, 260, 265, 290, 305, 325, 338, 340, 365, 370, 377, 410, 425, 442, 445, 450, 481, 485, 493, 500, 505, 520, 530, 533, 545, 565, 578, 580, 585, 610, 625, 629, 650, 680, 685, 689, 697, 725, 730, 740, 745, 754, 765
Offset: 1

Views

Author

Keywords

Comments

A025426(a(n)) > 1. - Reinhard Zumkeller, Aug 16 2011
For the question that is in the link AskNRICH Archive: It is easy to show that (a^2 + b^2)*(c^2 + d^2) = (a*c + b*d)^2 + (a*d - b*c)^2 = (a*d + b*c)^2 + (a*c - b*d)^2. So terms of this sequence can be generated easily. 5 is the least number of the form a^2 + b^2 where a and b distinct positive integers and this is a list sequence. This is the why we observe that there are many terms which are divisible by 5. - Altug Alkan, May 16 2016
Square roots of square terms: {25, 50, 65, 75, 85, 100, 125, 130, 145, 150, 169, 170, 175, 185, 195, 200, 205, 221, 225, 250, 255, 260, 265, 275, 289, 290, 300, 305, ...}. They are also listed by A009177. - Michael De Vlieger, May 16 2016

Examples

			50 is a term since 1^2 + 7^2 and 5^2 + 5^2 equal 50.
25 is not a term since though 3^2 + 4^2 = 25, 25 is square, i.e., 0^2 + 5^2 = 25, leaving it with only one possible sum of 2 nonzero squares.
625 is a term since it is the sum of squares of {0,25}, {7,24}, and {15,20}.
		

References

  • Ming-Sun Li, Kathryn Robertson, Thomas J. Osler, Abdul Hassen, Christopher S. Simons and Marcus Wright, "On numbers equal to the sum of two squares in more than one way", Mathematics and Computer Education, 43 (2009), 102 - 108.
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
  • D. Wells, The Penguin Dictionary of Curious and Interesting Numbers. Penguin Books, NY, 1986, 125.

Crossrefs

Subsequence of A001481. A subsequence is A025285 (2 ways).

Programs

  • Haskell
    import Data.List (findIndices)
    a007692 n = a007692_list !! (n-1)
    a007692_list = findIndices (> 1) a025426_list
    -- Reinhard Zumkeller, Aug 16 2011
    
  • Mathematica
    Select[Range@ 800, Length@ Select[PowersRepresentations[#, 2, 2], First@ # != 0 &] > 1 &] (* Michael De Vlieger, May 16 2016 *)
  • PARI
    isA007692(n)=nb = 0; lim = sqrtint(n); for (x=1, lim, if ((n-x^2 >= x^2) && issquare(n-x^2), nb++); ); nb >= 2; \\ Altug Alkan, May 16 2016
    
  • PARI
    is(n)=my(t); if(n<9, return(0)); for(k=sqrtint(n\2-1)+1,sqrtint(n-1), if(issquare(n-k^2)&&t++>1, return(1))); 0 \\ Charles R Greathouse IV, Jun 08 2016

A155716 Numbers of the form N = a^2 + 6b^2 for some positive integers a,b.

Original entry on oeis.org

7, 10, 15, 22, 25, 28, 31, 33, 40, 42, 49, 55, 58, 60, 63, 70, 73, 79, 87, 88, 90, 97, 100, 103, 105, 106, 112, 118, 121, 124, 127, 132, 135, 145, 150, 151, 154, 159, 160, 166, 168, 175, 177, 186, 193, 196, 198, 199, 202, 214, 217, 220, 223, 225, 231, 232, 240
Offset: 1

Views

Author

M. F. Hasler, Jan 25 2009

Keywords

Comments

Subsequence of A002481 (which allows for a and b to be zero).
Primes are in A033199. - Bernard Schott, Sep 20 2019

Crossrefs

Programs

  • Mathematica
    With[{upto=240},Select[Union[#[[1]]^2+6#[[2]]^2&/@Tuples[ Range[Sqrt[ upto]], 2]],#<=upto&]] (* Harvey P. Dale, Aug 05 2016 *)
  • PARI
    isA155716(n,/* optional 2nd arg allows us to get other sequences */c=6) = { for(b=1,sqrtint((n-1)\c), issquare(n-c*b^2) & return(1))}
    for( n=1,999, isA155716(n) & print1(n","))
    
  • PARI
    upto(n) = my(res=List()); for(i=1,sqrtint(n),for(j=1, sqrtint((n - i^2) \ 6), listput(res, i^2 + 6*j^2))); listsort(res,1); res \\ David A. Corneth, Sep 18 2019
Previous Showing 71-80 of 237 results. Next