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.
%I A256867 #19 Dec 13 2024 13:20:06 %S A256867 0,15,57,100,168,182,396,450,624,700,750,800,840,1050,1176,1190,1274, %T A256867 1485,1540,1716,2520,2652,2760,2772,2814,2850,2898,2970,3150,3486, %U A256867 3570,3861,4173,4368,4488,4860,4900,4940,4970,5160,5250,5490,5595,5600,5880,5950,6435,6630,7224,7350,7560,7602,7910,8050,8232,8330 %N A256867 Numbers divisible by prime(d+1) for each digit d of their base-7 representation. %C A256867 The base-7 variant of A256882 - A256884, A256865 - A256870 in bases 2, ..., 10. %C A256867 A variant of A256877 where digits 0 are forbidden and divisibility by prime(d) is required. %H A256867 Harvey P. Dale, <a href="/A256867/b256867.txt">Table of n, a(n) for n = 1..1000</a> %t A256867 Select[Range[0,9000],AllTrue[#/Prime[IntegerDigits[#,7]+1],IntegerQ]&] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Sep 17 2020 *) %o A256867 (PARI) is(n,b=7)=!for(i=1,#d=Set(digits(n,b)),n%prime(d[i]+1)&&return) %Y A256867 Cf. A256882, A256883, A256884, A256865 - A256870, A256874 - A256879, A256786. %K A256867 nonn,base %O A256867 1,2 %A A256867 _M. F. Hasler_, Apr 11 2015