cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A293877 Numbers having '17' as substring of their digits / decimal expansion.

This page as a plain text file.
%I A293877 #24 Feb 26 2024 09:20:54
%S A293877 17,117,170,171,172,173,174,175,176,177,178,179,217,317,417,517,617,
%T A293877 717,817,917,1017,1117,1170,1171,1172,1173,1174,1175,1176,1177,1178,
%U A293877 1179,1217,1317,1417,1517,1617,1700,1701,1702,1703,1704,1705,1706,1707,1708,1709,1710,1711,1712,1713
%N A293877 Numbers having '17' as substring of their digits / decimal expansion.
%C A293877 Row 17 of A292690 and A293869. A121037 lists the terms which are divisible by 17.
%H A293877 Paolo Xausa, <a href="/A293877/b293877.txt">Table of n, a(n) for n = 1..10000</a>
%H A293877 <a href="/index/Ar#10-automatic">Index entries for 10-automatic sequences</a>
%F A293877 a(n) ~ n. - _Charles R Greathouse IV_, Nov 02 2022
%t A293877 Select[Range[2000], StringContainsQ[IntegerString[#], "17"] &] (* _Paolo Xausa_, Feb 25 2024 *)
%o A293877 (PARI) is_A293877 = has(n, p=17, m=10^#Str(p))=until(p>n\=10, n%m==p&&return(1))
%Y A293877 Cf. A292690, A293869.
%Y A293877 Cf. A011540, A011531, A011532, A011533, A011534, A011535, A011536, A011537, A011538, A011539: analog for '0' - '9'.
%Y A293877 Cf. A293870, A293871, A293872, A293873, A293874, A293875, A293876, A293878, A293879, A293880: same for '10' - '20'.
%Y A293877 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.
%K A293877 nonn,base,easy
%O A293877 1,1
%A A293877 _M. F. Hasler_, Oct 18 2017