login
A293878
Numbers having '18' as substring of their digits / decimal expansion.
12
18, 118, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 218, 318, 418, 518, 618, 718, 818, 918, 1018, 1118, 1180, 1181, 1182, 1183, 1184, 1185, 1186, 1187, 1188, 1189, 1218, 1318, 1418, 1518, 1618, 1718, 1800, 1801, 1802, 1803, 1804, 1805, 1806, 1807, 1808, 1809, 1810, 1811, 1812
OFFSET
1,1
COMMENTS
Row 16 of A292690 and A293869. A121038 lists the terms which are divisible by 18.
FORMULA
a(n) ~ n. - Charles R Greathouse IV, Nov 02 2022
MATHEMATICA
Select[Range[2000], StringContainsQ[IntegerString[#], "18"] &] (* Paolo Xausa, Feb 25 2024 *)
PROG
(PARI) is_A293878 = has(n, p=18, m=10^#Str(p))=until(p>n\=10, n%m==p&&return(1))
CROSSREFS
Cf. A121041, A121022, A121023, A121024, A121025, A121026, A121027, A121028, A121029, A121030, A121031, A121032, A121033, A121034, A121035, A121036, A121037, A121038, A121039, A121040: subsequences of the above, containing only multiples of the pattern p.
Sequence in context: A207103 A101089 A022678 * A044350 A044731 A190705
KEYWORD
nonn,base,easy
AUTHOR
M. F. Hasler, Oct 18 2017
STATUS
approved