OFFSET
1,1
MATHEMATICA
Select[Table[n Boole[Length[Select[IntegerDigits[n, 7], #==5&]]==1], {n, 235}], Positive] (* Stefano Spezia, Apr 23 2023 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
EXTENSIONS
More terms from Stefano Spezia, Apr 23 2023
STATUS
approved