change the flow

unfinish
the R