OFFSET
1,3
EXAMPLE
595 is in the sequence because (1) it is a triangular number and (2) the product of its digits 5*9*5=225 is an octagonal number.
MATHEMATICA
Select[Accumulate[Range[0, 200]], DigitCount[#, 10, 0]>0||IntegerQ[(1+ Sqrt[ 1+3*Times@@ IntegerDigits[ #]])/3]&] (* Harvey P. Dale, Jul 24 2016 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 30 2006
EXTENSIONS
Corrected by Harvey P. Dale, Jul 24 2016
STATUS
approved