{ Mugurel Ionut Andreica - Bucuresti, ROMANIA }

{$S-,I-,R-,Q-,N+}
{$M 10000,0,655360}
Program SubSet;

var fin,fout:text;
    nsub:array[0..60] of extended;
    i,j,k,n:integer;
    m:comp;

begin
assign(fin,'subset.in');
reset(fin);
readln(fin,n,m);
close(fin);

fillchar(nsub,sizeof(nsub),0);
nsub[n]:=1;

for i:=n-1 downto 1 do
  nsub[i]:=2*nsub[i+1];

assign(fout,'subset.out');
rewrite(fout);

k:=1;
while (m>0) do
  begin
    for i:=k to n do
      if m<=nsub[i] then
        break
      else
        m:=m-nsub[i];

      m:=m-1;

      k:=i+1;
      write(fout,i,' ');
  end;

writeln(fout);
close(fout);
end.