A293869 -id:A293869 - cp's OEIS frontend

A293873 Numbers having '13' as substring of their digits.

13, 113, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 213, 313, 413, 513, 613, 713, 813, 913, 1013, 1113, 1130, 1131, 1132, 1133, 1134, 1135, 1136, 1137, 1138, 1139, 1213, 1300, 1301, 1302, 1303, 1304, 1305, 1306, 1307, 1308, 1309, 1310, 1311, 1312, 1313, 1314, 1315

Offset: 1

M. F. Hasler, Oct 18 2017

Row 13 of A292690 and A293869. A121033 is the subsequence of multiples of 13.

Index entries for 10-automatic sequences

Cf. A292690, A293869.
Cf. A011540, A011531, A011532, A011533, A011534, A011535, A011536, A011537, A011538, A011539: analog for '0' - '9'.
Cf. A293870, A293871, A293872, A293874, A293875, A293876, A293877, A293878, 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.

Select[Range[1350],SequenceCount[IntegerDigits[#],{1,3}]>0&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Dec 31 2017 *)

is_A293873 = has(n, p=13, m=10^#Str(p))=until(p>n\=10, n%m==p&&return(1))

a(n) ~ n. - Charles R Greathouse IV, Nov 02 2022

A293880 Numbers having '20' as substring of their digits.

Original entry on oeis.org

20, 120, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 220, 320, 420, 520, 620, 720, 820, 920, 1020, 1120, 1200, 1201, 1202, 1203, 1204, 1205, 1206, 1207, 1208, 1209, 1220, 1320, 1420, 1520, 1620, 1720, 1820, 1920, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010

Offset: 1

M. F. Hasler, Oct 18 2017

Row 20 of A292690 and A293869. A121040 lists the terms which are divisible by 19.

Index entries for 10-automatic sequences

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, A293878, A293879: same for '10' - '19'.
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.

Select[Range[2100],SequenceCount[IntegerDigits[#],{2,0}]>0&] (* Harvey P. Dale, Jul 25 2021 *)

is_A293880 = has(n, p=20, m=10^#Str(p))=until(p>n\=10, n%m==p&&return(1))

a(n) ~ n. - Charles R Greathouse IV, Nov 02 2022

A072484 Triangle in which the n-th row contains the n smallest numbers containing the string of digits of n in increasing order.

Original entry on oeis.org

1, 2, 12, 3, 13, 23, 4, 14, 24, 34, 5, 15, 25, 35, 45, 6, 16, 26, 36, 46, 56, 7, 17, 27, 37, 47, 57, 67, 8, 18, 28, 38, 48, 58, 68, 78, 9, 19, 29, 39, 49, 59, 69, 79, 89, 10, 100, 101, 102, 103, 104, 105, 106, 107, 108, 11, 110, 111, 112, 113, 114, 115, 116, 117, 118

Offset: 1

Amarnath Murthy, Jul 07 2002

			The triangle begins
1
2 12
3 13 23
4 14 24 34
.....
The 13th row is 13,113,130,131,132,133,134,135,136,137,138,139,213

Rémy Sigrist, Table of n, a(n) for n = 1..10011
Rémy Sigrist, Perl program for A072484

Cf. A072483, A072485, A293869, A337918.

Perl
```
See Links section.
```

T(n, k) = A293869(n, k) for any n > 0 and k = 1..n. - Rémy Sigrist, Jan 29 2021

Edited by T. D. Noe, Apr 23 2009
Example corrected by Robert Israel, Sep 25 2019
Offset changed to 1 by Rémy Sigrist, Jan 29 2021

cp's OEIS Frontend

A293873 Numbers having '13' as substring of their digits.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

Formula

A293880 Numbers having '20' as substring of their digits.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

Formula

A072484 Triangle in which the n-th row contains the n smallest numbers containing the string of digits of n in increasing order.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Perl

Formula

Extensions