A256868 Numbers divisible by prime(d+1) for each digit d of their base-8 representation.

0, 9, 33, 57, 72, 130, 210, 264, 456, 570, 576, 585, 660, 969, 1040, 1050, 1170, 1365, 1540, 1680, 1995, 2112, 2145, 2508, 2600, 2730, 2860, 2925, 3366, 3648, 3705, 4047, 4104, 4170, 4356, 4488, 4560, 4608, 4620, 4680, 4683, 4809, 4998, 5130, 5250, 5265, 5280, 6825, 7752, 8210, 8320, 8400, 8850, 9240, 9350, 9360, 9555

Offset

1,2

Comments

The base-8 variant of A256882 - A256884, A256866 - A256870 in bases 2, ..., 10.

A variant of A256878 where digits 0 are forbidden and divisibility by prime(d) is required.

Links

Table of n, a(n) for n=1..57.

Mathematica

Select[Range[0, 10000], And@@Divisible[#, Prime[IntegerDigits[#, 8]+1]]&] (* Harvey P. Dale, May 06 2015 *)

Prog

is(n, b=8)=!for(i=1, #d=Set(digits(n, b)), n%prime(d[i]+1)&&return)

Crossrefs

Cf. A256882, A256883, A256884, A256865 - A256870, A256874 - A256879, A256786.

Sequence in context: A065064 A337234 A075812 * A146262 A161430 A175369

Adjacent sequences: A256865 A256866 A256867 * A256869 A256870 A256871

Keyword

nonn,base

Author

M. F. Hasler, Apr 11 2015

Status

approved