\TeXXeTstate=1
\everypar\expandafter{\the\everypar \beginR}
\everydisplay\expandafter{\the\everydisplay\predisplaydirection=0 }
\abovedisplayskip=2cm
\belowdisplayskip=2cm
This is a test as you can see This is a test as you can see This is a tThis is a test as you can see This is a test as you can see This is a t This is a test as you can see This is a test as you can see This is a t
$$1+2=3\eqno(1)$$
This is a test as you can see

\end{document}