login
Numbers divisible by prime(d) for each digit d in their base-7 representation, none of which may be zero.
1

%I #11 Jun 29 2019 03:55:17

%S 8,10,114,120,195,264,286,400,408,450,456,500,650,744,750,780,792,

%T 1100,1170,1200,1804,1870,2802,2808,2850,2886,3144,3198,3600,4290,

%U 4524,5202,5280,5610,5655,5742,6000,6798,7020,7710,8010,8340,12804,13200,14820,14846,15210,19608,19610

%N Numbers divisible by prime(d) for each digit d in their base-7 representation, none of which may be zero.

%C Base-7 analog of A256786. See A256874 - A256879 for the base-4, ..., base-9 analogs.

%C See A256867 for a variant where divisibility by prime(d+1) is required instead.

%o (PARI) is(n,b=7)=!for(i=1,#d=Set(digits(n,b)),(!d[i]||n%prime(d[i]))&&return)

%Y Cf. A256786, A256874 - A256879, A256867, A256882 - A256884, A256865 - A256870.

%K nonn,base

%O 1,1

%A _M. F. Hasler_, Apr 11 2015