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

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A152834 Numbers of form 6k+1 that use only digits 2 and 3. 3
223, 2233, 2323, 3223, 22333, 23233, 23323, 32233, 32323, 33223, 222223, 223333, 232333, 233233, 233323, 322333, 323233, 323323, 332233, 332323, 333223, 2222233, 2222323, 2223223, 2232223, 2233333, 2322223, 2323333, 2332333, 2333233, 2333323, 3222223 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Equivalently, sequences of 2's and 3's, ending with 3, where the number of 2's is congruent to 2 mod 3. - Franklin T. Adams-Watters, Dec 14 2008
LINKS
MAPLE
(Maple program from Robert Israel:)
M:= proc(n) option remember; (map(t -> 2*10^n+t, M(n-1)) union map(t ->
3*10^n+t, M(n-1))) end proc;
M(0):= {2, 3};
select(t -> (t mod 6 = 1), `union`(seq(M(n), n=1..9)));
MATHEMATICA
Do[If[Union[IntegerDigits[6k+1]]=={2, 3}, Print[6k+1]], {k, 100000}]
Select[Flatten[Table[FromDigits/@Tuples[{2, 3}, n], {n, 7}]], Mod[#, 6]==1&] (* Harvey P. Dale, Aug 02 2015 *)
PROG
(PARI) is(n)=n%30==13 && Set(digits(n))==[2, 3] \\ Charles R Greathouse IV, Feb 15 2017
CROSSREFS
Subsequence of A152824.
Sequence in context: A253953 A205273 A205266 * A139233 A205265 A153165
KEYWORD
nonn,base,easy
AUTHOR
Zak Seidov, Dec 14 2008
EXTENSIONS
Extended by Robert Israel, Dec 14 2008
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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 06:15 EDT 2024. Contains 371265 sequences. (Running on oeis4.)