A116957 Lynch-Bell numbers n such that 5 is a digit of n.
5, 15, 135, 175, 315, 735, 1395, 1935, 3195, 3915, 9135, 9315
Offset: 1
Examples
a(3)=135 since 135 is the third Lynch-Bell number that contains a 5.
Programs
-
Mathematica
lbn5Q[n_]:=Module[{idn=IntegerDigits[n]},MemberQ[idn,5]&&FreeQ[idn,0]&&Max[DigitCount[n]]==1&&AllTrue[n/idn,IntegerQ]]; Select[Range[ 10000],lbn5Q] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Aug 19 2019 *)
Comments