|
|
7, 8, 100, 113, 117, 123, 136, 145, 155, 156, 163, 165, 168, 179, 186, 203, 245, 247, 248, 259, 265, 275, 283, 289, 293, 294, 296, 305, 307, 309, 311, 318, 328, 330, 341, 342, 343, 346, 352, 355, 360, 375, 384, 386, 399, 402, 405, 408, 410, 413, 415, 419
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Complement of A103681: A103675(a(n))=1, A103675(A103681(n))=0.
All the numbers from 5154 to 5*10^5 belong to the sequence. - Giovanni Resta, Apr 07 2013
|
|
|
LINKS
|
Table of n, a(n) for n=1..52.
Index entries for sequences related to factorial numbers
Index entries for sequences related to binary expansion of n
|
|
|
PROG
|
(PARI) is(n)=n=n!; while(n>5039, my(e=valuation(n, 2), e1=valuation((n>>=e)+1, 2)); n>>=e1; if(e>3 && e1==2 && bitand(n, 127)==78, return(1))); 0 \\ Charles R Greathouse IV, Apr 07 2013
|
|
|
CROSSREFS
|
Cf. A102730, A036603, A007088, A000142, A103676, A103678.
Sequence in context: A041108 A137145 A192373 * A219518 A029496 A041109
Adjacent sequences: A103677 A103678 A103679 * A103681 A103682 A103683
|
|
|
KEYWORD
|
base,nonn
|
|
|
AUTHOR
|
Reinhard Zumkeller, Feb 12 2005
|
|
|
STATUS
|
approved
|
|
