The OEIS is supported by the many generous donors to the OEIS Foundation.

 Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 60th year, we have over 367,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”). Other ways to Give
 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A023705 Numbers with no 0's in base-4 expansion. 15
 1, 2, 3, 5, 6, 7, 9, 10, 11, 13, 14, 15, 21, 22, 23, 25, 26, 27, 29, 30, 31, 37, 38, 39, 41, 42, 43, 45, 46, 47, 53, 54, 55, 57, 58, 59, 61, 62, 63, 85, 86, 87, 89, 90, 91, 93, 94, 95, 101, 102, 103, 105, 106, 107, 109, 110, 111, 117, 118, 119, 121, 122, 123 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS A032925 is the intersection of this sequence and A023717; cf. A179888. - Reinhard Zumkeller, Jul 31 2010 LINKS R. Zumkeller, Table of n, a(n) for n = 1..10000 Index entries for 10-automatic sequences. FORMULA G.f. g(x) satisfies g(x) = (x+2*x^2+3*x^3)/(1-x^3) + 4*(x+x^2+x^3)*g(x^3). - Robert Israel, Oct 04 2018 MAPLE R:= [1, 2, 3]: A:= 1, 2, 3: for i from 1 to 4 do R:= map(t -> (4*t+1, 4*t+2, 4*t+3), R); A:= A, op(R); od: A; # Robert Israel, Oct 04 2018 MATHEMATICA Select[ Range[ 120 ], (Count[ IntegerDigits[ #, 4 ], 0 ]==0)& ] Select[Range[200], DigitCount[#, 4, 0]==0&] (* Harvey P. Dale, Dec 23 2015 *) PROG (Haskell) a023705 n = a023705_list !! (n-1) a023705_list = iterate f 1 where f x = 1 + if r < 3 then x else 4 * f x' where (x', r) = divMod x 4 -- Reinhard Zumkeller, Mar 06 2015, Oct 19 2011 (PARI) isok(n) = vecmin(digits(n, 4)); \\ Michel Marcus, Jul 04 2015 (Magma) [n: n in [1..130] | not 0 in Intseq(n, 4)]; // Vincenzo Librandi, Oct 04 2018 (C) uint32_t a_next(uint32_t a_n) { return (a_n + 1) | ((a_n & (a_n + 0xaaaaaaab)) >> 1); } /* Falk Hüffner, Jan 22 2022 */ CROSSREFS Cf. A003754, A007090. Zeroless numbers in some other bases <= 10: A000042 (base 2), A032924 (base 3), A248910 (base 6), A255805 (base 8), A255808 (base 9), A052382 (base 10). Cf. A100968 (subsequence). Sequence in context: A083347 A137217 A367625 * A188070 A305847 A248565 Adjacent sequences: A023702 A023703 A023704 * A023706 A023707 A023708 KEYWORD nonn,base,easy AUTHOR Olivier Gérard STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified December 8 15:23 EST 2023. Contains 367680 sequences. (Running on oeis4.)