|
%I
%S 0,1,2,3,0,5,6,7,8,9,10,11,12,13,1,15,16,17,18,19,20,21,22,23,2,25,26,
%T 27,28,29,30,31,32,33,3,35,36,37,38,39,0,1,2,3,0,5,6,7,8,9,50,51,52,
%U 53,5,55,56,57,58,59,60,61,62,63,6,65,66,67,68,69,70,71,72,73,7
%N Omit 4's from n.
%o (PARI) a(n)=subst(Pol(select(k->k-4,digits(n))),'x,10) \\ _Charles R Greathouse IV_, Oct 16 2012
%K nonn,base,easy
%O 0,3
%A _N. J. A. Sloane_.
|
