単独$1$位を奪った。たぶん出題時はまだdcが導入されてなかったのだろう。

dc -e2o?2+[?1+prdz<c]dscx|cut -c2-|tr 01 LR

rubyの部に関して、putsは外に出して空白を削れたので反省している。

gets;$<.map{|s|puts (s.to_i+1).to_s(2)[1..-1].tr'01','LR'}