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!)
A103678 Numbers m such that in binary representation m! contains 6!. 6
6, 20, 23, 30, 31, 32, 37, 43, 53, 55, 58, 65, 71, 74, 81, 86, 91, 94, 95, 99, 102, 106, 108, 111, 115, 116, 117, 118, 122, 123, 124, 127, 128, 129, 133, 134, 135, 139, 141, 143, 144, 145, 149, 153, 155, 157, 158, 159, 160, 162, 163, 166, 167, 168, 169, 170, 171 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
Complement of A103679: A103674(a(n))=1, A103674(A103679(n))=0.
All the numbers 803 <= n <= 500000 are in the sequence. - Giovanni Resta, Apr 07 2013
LINKS
MATHEMATICA
With[{c=IntegerDigits[6!, 2]}, Select[Range[180], SequenceCount[ IntegerDigits[ #!, 2], c]>0&]] (* The program uses the SequenceCount function from Mathematica version 10 *) (* Harvey P. Dale, Jul 26 2016 *)
PROG
(PARI) is(n)=n=n!; while(n>719, my(e=valuation(n, 2), e1=valuation((n>>=e)+1, 2)); n>>=e1; if(e>3 && e1==1 && bitand(n, 31)==22, return(1))); 0 \\ Charles R Greathouse IV, Apr 07 2013
CROSSREFS
Sequence in context: A237043 A243905 A062017 * A348713 A020889 A334817
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Feb 12 2005
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 1 15:55 EST 2024. Contains 370442 sequences. (Running on oeis4.)