login
A115744
Triangular numbers that are the product of 2 palindromes greater than 1.
3
6, 10, 15, 21, 28, 36, 45, 55, 66, 231, 528, 666, 1128, 2016, 2211, 2628, 2775, 3003, 3570, 3916, 4095, 5995, 6105, 6216, 6903, 8646, 21736, 31878, 34980, 37950, 43956, 45753, 52003, 58653, 65703, 66066, 73153, 83028, 89676, 93528, 116886
OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..83 (* All terms less than 1 million *)
EXAMPLE
6903=T(117) and 6903=9*767.
MATHEMATICA
Module[{upto=120000, pals}, pals=Select[Range[2, upto/2], PalindromeQ]; Select[ Times@@@Tuples[pals, 2], OddQ[Sqrt[8#+1]]&&#<=upto&]]//Union (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 13 2018 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Giovanni Resta, Jan 31 2006
STATUS
approved