[go: up one dir, main page]

login
A293870
Numbers having '10' as substring of their digits.
12
10, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 210, 310, 410, 510, 610, 710, 810, 910, 1000, 1001, 1002, 1003, 1004, 1005, 1006, 1007, 1008, 1009, 1010, 1011, 1012, 1013, 1014, 1015, 1016, 1017, 1018, 1019, 1020, 1021, 1022, 1023, 1024, 1025, 1026, 1027, 1028, 1029, 1030, 1031
OFFSET
1,1
COMMENTS
Row 10 of A292690 and A293869.
FORMULA
a(n) ~ n. - Charles R Greathouse IV, Nov 02 2022
MATHEMATICA
Select[Range[1100], SequenceCount[IntegerDigits[#], {1, 0}]>0&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 07 2019 *)
PROG
(PARI) is_A293870 = has(n, p=10, 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: A309390 A341692 A323708 * A305701 A107411 A297065
KEYWORD
nonn,base,easy
AUTHOR
M. F. Hasler, Oct 18 2017
STATUS
approved