\documentclass{article}
\newcommand\beginR{\bgroup\textdir TRT}
\newcommand\endR{\egroup}
\begin{document}
Test
\end{document}
