|
|
A175490
|
|
a(n) = Product_{k=1..n} b(k,n), where b(k,n) is the largest positive integer that, when written in binary, occurs as a substring in both binary k and binary n.
|
|
2
|
|
|
1, 2, 3, 8, 20, 144, 63, 256, 1152, 1600, 118800, 995328, 8424000, 12192768, 178605, 1048576, 8912896, 21233664, 27572576256, 13107200000, 537600000, 2032335360000, 30928035600000, 760840571584512, 13541327555788800
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MAPLE
|
A175488 := proc(n, m) for a from m to 1 by -1 do abin := convert(a, base, 2) ; nbin := convert(n, base, 2) ; mbin := convert(m, base, 2) ; if verify(abin, nbin, 'sublist') and verify(abin, mbin, 'sublist') then return a; end if; end do: end proc:
|
|
PROG
|
(PARI) See Links section.
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|