\usepackage[hiragino-pron,jis2004,deluxe,expert,nfssonly]{luatexja-preset}
\begin{document}
\makeatletter
\def\r#1#2{ \csname #1family \endcsname \csname #2series \endcsname
%\addjfontfeature {CJKShape=JIS1983}
\usepackage[hiragino-pron,jis2004,deluxe,expert,nfssonly]{luatexja-preset}
\begin{document}
\makeatletter
\def\r#1#2{ \csname #1family \endcsname \csname #2series \endcsname
%\addjfontfeature {CJKShape=JIS1983}
{\tt#1, #2\ \ \ \ \ }: あいうえおabc漢字,あ!い,辻\\
{\tt#1, #2 (rb)}: {\rubyfamily あいうえおabc漢字,あ!い,辻}
}
{\tt#1, #2\ \ \ \ \ }: あいうえおabc漢字,あ!い,辻\\
{\tt#1, #2 (rb)}: {\rubyfamily あいうえおabc漢字,あ!い,辻}
}