A293875 Numbers having '15' as substring of their digits.
15, 115, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, 215, 315, 415, 515, 615, 715, 815, 915, 1015, 1115, 1150, 1151, 1152, 1153, 1154, 1155, 1156, 1157, 1158, 1159, 1215, 1315, 1415, 1500, 1501, 1502, 1503, 1504, 1505, 1506, 1507, 1508, 1509, 1510, 1511, 1512, 1513, 1514, 1515
Offset: 1
Links
Crossrefs
Programs
-
Mathematica
Select[Range[2000], StringContainsQ[IntegerString[#], "15"] &] (* Paolo Xausa, Feb 25 2024 *)
-
PARI
is_A293875 = has(n, p=15, m=10^#Str(p))=until(p>n\=10, n%m==p&&return(1))
Formula
a(n) ~ n. - Charles R Greathouse IV, Nov 02 2022
Comments