Taxicab numbers: Difference between revisions

Line 1,193:

main = mapM_ print $ take 25 xs ++ take 6 (drop 1999 xs)</lang>

<pre>[(1729,(1,1728)),(1729,(729,1000))]

<pre>[(1729,((1,1),(1728,12))),(1729,((729,9),(1000,10)))]

[(4104,(8,4096)),(4104,(729,3375))]

[(4104,((8,2),(4096,16))),(4104,((729,9),(3375,15)))]

[(13832,(8,13824)),(13832,(5832,8000))]

[(13832,((8,2),(13824,24))),(13832,((5832,18),(8000,20)))]

[(20683,(1000,19683)),(20683,(6859,13824))]

[(20683,((1000,10),(19683,27))),(20683,((6859,19),(13824,24)))]

[(32832,(64,32768)),(32832,(5832,27000))]

[(32832,((64,4),(32768,32))),(32832,((5832,18),(27000,30)))]

[(39312,(8,39304)),(39312,(3375,35937))]

[(39312,((8,2),(39304,34))),(39312,((3375,15),(35937,33)))]

[(40033,(729,39304)),(40033,(4096,35937))]

[(40033,((729,9),(39304,34))),(40033,((4096,16),(35937,33)))]

[(46683,(27,46656)),(46683,(19683,27000))]

[(46683,((27,3),(46656,36))),(46683,((19683,27),(27000,30)))]

[(64232,(4913,59319)),(64232,(17576,46656))]

[(64232,((4913,17),(59319,39))),(64232,((17576,26),(46656,36)))]

[(65728,(1728,64000)),(65728,(29791,35937))]

[(65728,((1728,12),(64000,40))),(65728,((29791,31),(35937,33)))]

[(110656,(64,110592)),(110656,(46656,64000))]

[(110656,((64,4),(110592,48))),(110656,((46656,36),(64000,40)))]

[(110808,(216,110592)),(110808,(19683,91125))]

[(110808,((216,6),(110592,48))),(110808,((19683,27),(91125,45)))]

[(134379,(1728,132651)),(134379,(54872,79507))]

[(134379,((1728,12),(132651,51))),(134379,((54872,38),(79507,43)))]

[(149389,(512,148877)),(149389,(24389,125000))]

[(149389,((512,8),(148877,53))),(149389,((24389,29),(125000,50)))]

[(165464,(8000,157464)),(165464,(54872,110592))]

[(165464,((8000,20),(157464,54))),(165464,((54872,38),(110592,48)))]

[(171288,(4913,166375)),(171288,(13824,157464))]

[(171288,((4913,17),(166375,55))),(171288,((13824,24),(157464,54)))]

[(195841,(729,195112)),(195841,(10648,185193))]

[(195841,((729,9),(195112,58))),(195841,((10648,22),(185193,57)))]

[(216027,(27,216000)),(216027,(10648,205379))]

[(216027,((27,3),(216000,60))),(216027,((10648,22),(205379,59)))]

[(216125,(125,216000)),(216125,(91125,125000))]

[(216125,((125,5),(216000,60))),(216125,((91125,45),(125000,50)))]

[(262656,(512,262144)),(262656,(46656,216000))]

[(262656,((512,8),(262144,64))),(262656,((46656,36),(216000,60)))]

[(314496,(64,314432)),(314496,(27000,287496))]

[(314496,((64,4),(314432,68))),(314496,((27000,30),(287496,66)))]

[(320264,(5832,314432)),(320264,(32768,287496))]

[(320264,((5832,18),(314432,68))),(320264,((32768,32),(287496,66)))]

[(327763,(27000,300763)),(327763,(132651,195112))]

[(327763,((27000,30),(300763,67))),(327763,((132651,51),(195112,58)))]

[(373464,(216,373248)),(373464,(157464,216000))]

[(373464,((216,6),(373248,72))),(373464,((157464,54),(216000,60)))]

[(402597,(74088,328509)),(402597,(175616,226981))]

[(402597,((74088,42),(328509,69))),(402597,((175616,56),(226981,61)))]

[(1671816384,(78402752,1593413632)),(1671816384,(830584000,841232384))]

[(1671816384,((78402752,428),(1593413632,1168))),(1671816384,((830584000,940),(841232384,944)))]

[(1672470592,(24389,1672446203)),(1672470592,(252435968,1420034624))]

[(1672470592,((24389,29),(1672446203,1187))),(1672470592,((252435968,632),(1420034624,1124)))]

[(1673170856,(96071912,1577098944)),(1673170856,(567663552,1105507304))]

[(1673170856,((96071912,458),(1577098944,1164))),(1673170856,((567663552,828),(1105507304,1034)))]

[(1675045225,(142236648,1532808577)),(1675045225,(411830784,1263214441))]

[(1675045225,((142236648,522),(1532808577,1153))),(1675045225,((411830784,744),(1263214441,1081)))]

[(1675958167,(119095488,1556862679)),(1675958167,(359425431,1316532736))]

[(1675958167,((119095488,492),(1556862679,1159))),(1675958167,((359425431,711),(1316532736,1096)))]

[(1676926719,(250047,1676676672)),(1676926719,(363994344,1312932375))]~~</pre>~~

[(1676926719,((250047,63),(1676676672,1188))),(1676926719,((363994344,714),(1312932375,1095)))]

</pre>

=={{header|J}}==