A293878 Numbers having '18' as substring of their digits / decimal expansion.

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.

Links

Paolo Xausa, Table of n, a(n) for n = 1..10000

Index entries for 10-automatic sequences

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. A292690, A293869.

Cf. A011540, A011531, A011532, A011533, A011534, A011535, A011536, A011537, A011538, A011539: analog for '0' - '9'.

Cf. A293870, A293871, A293872, A293873, A293874, A293875, A293876, A293877, A293879, A293880: same for '10' - '20'.

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

Adjacent sequences: A293875 A293876 A293877 * A293879 A293880 A293881

Keyword

nonn,base,easy

Author

M. F. Hasler, Oct 18 2017

Status

approved