A003273, A051532

[T. D. Noe]

>Can someone send me lists of congruent numbers (A003273)
>and/or abelian numbers (A051532) up to 1001?  I don't know
>how to generate these programmatically for myself.

Using the Mathematica code given in the sequence, here is A003273 up to 1001:

5, 6, 7, 13, 14, 15, 21, 22, 23, 29, 30, 31, 34, 37, 38, 39, 41, 46, 47, 53, \
55, 61, 62, 65, 69, 70, 71, 77, 78, 79, 85, 86, 87, 93, 94, 95, 101, 102, \
103, 109, 110, 111, 118, 119, 127, 133, 134, 137, 138, 141, 142, 143, 145, \
149, 151, 154, 157, 158, 159, 161, 165, 166, 167, 173, 174, 181, 182, 183, \
190, 191, 194, 197, 199, 205, 206, 210, 213, 214, 215, 219, 221, 222, 223, \
226, 229, 230, 231, 237, 238, 239, 246, 247, 253, 254, 255, 257, 262, 263, \
265, 269, 271, 277, 278, 285, 286, 287, 291, 293, 295, 299, 301, 302, 303, \
309, 310, 311, 313, 317, 318, 319, 323, 326, 327, 330, 334, 335, 341, 349, \
353, 357, 358, 359, 365, 366, 367, 371, 373, 374, 381, 382, 383, 386, 389, \
390, 391, 395, 397, 398, 399, 406, 407, 410, 413, 415, 421, 422, 426, 429, \
430, 431, 434, 437, 438, 439, 442, 445, 446, 447, 453, 454, 455, 457, 461, \
462, 463, 465, 469, 470, 471, 478, 479, 485, 487, 493, 494, 501, 502, 503, \
505, 509, 510, 511, 514, 517, 518, 519, 526, 527, 533, 534, 535, 541, 542, \
543, 546, 551, 557, 559, 561, 565, 566, 573, 574, 581, 582, 583, 589, 590, \
591, 597, 598, 599, 602, 606, 607, 609, 613, 614, 615, 622, 623, 629, 631, \
638, 645, 646, 647, 651, 653, 654, 655, 658, 661, 662, 663, 669, 670, 671, \
674, 677, 678, 679, 685, 687, 689, 694, 695, 701, 703, 709, 710, 717, 718, \
719, 721, 723, 727, 731, 733, 734, 741, 742, 743, 749, 751, 757, 758, 759, \
761, 766, 767, 773, 777, 781, 782, 789, 790, 791, 793, 797, 798, 799, 805, \
806, 807, 813, 814, 815, 821, 822, 823, 829, 830, 831, 838, 839, 853, 854, \
861, 862, 863, 866, 869, 870, 871, 877, 878, 879, 885, 886, 887, 889, 890, \
893, 894, 895, 901, 902, 903, 905, 910, 911, 915, 917, 919, 926, 933, 934, \
935, 941, 942, 943, 949, 951, 957, 958, 959, 965, 966, 967, 973, 974, 982, \
983, 985, 987, 989, 991, 995, 997, 998

Tony