Taxicab numbers: Difference between revisions
Content deleted Content added
Line 1,887: | Line 1,887: | ||
]; |
]; |
||
Take[findTaxiNumbers[100], 25] |
Take[findTaxiNumbers[100], 25] |
||
findTaxiNumbers[1200][[2000 ;; 2005]] |
found=findTaxiNumbers[1200][[2000 ;; 2005]] |
||
Map[Reduce[x^3 + y^3 == # && x >= y && x > 0 && y > 0, {x, y}, Integers] &, found]</lang> |
|||
{{out}} |
{{out}} |
||
{1729, 4104, 13832, 20683, 32832, 39312, 40033, 46683, 64232, 65728, 110656, 110808, 134379, 149389, 165464, 171288, 195841, 216027, 216125, 262656, 314496, 320264, 327763, 373464, 402597} |
<pre>{1729, 4104, 13832, 20683, 32832, 39312, 40033, 46683, 64232, 65728, 110656, 110808, 134379, 149389, 165464, 171288, 195841, 216027, 216125, 262656, 314496, 320264, 327763, 373464, 402597} |
||
{1671816384, 1672470592, 1673170856, 1675045225, 1675958167, 1676926719} |
{1671816384, 1672470592, 1673170856, 1675045225, 1675958167, 1676926719} |
||
{(x == 944 && y == 940) || (x == 1168 && y == 428), |
|||
(x == 1124 && y == 632) || (x == 1187 && y == 29), |
|||
(x == 1034 && y == 828) || (x == 1164 && y == 458), |
|||
(x == 1081 && y == 744) || (x == 1153 && y == 522), |
|||
(x == 1096 && y == 711) || (x == 1159 && y == 492), |
|||
(x == 1095 && y == 714) || (x == 1188 && y == 63)}</pre> |
|||
=={{header|PARI/GP}}== |
=={{header|PARI/GP}}== |