($N,$M)=glob<>;
$,=$/;print$M>($a=$N>>1)*($b=$N-$a)|$M<$N-1?NO:(YES,1..$N,map{$_%$a+1,$a+1+($_%$a+$_/$a)%$b}0..$M-1)