如何在tables :: tabular（）输出中添加水平线？

Question

如果表格的一侧有两个因素，我想在中等复杂的Hline()输出中添加一条水平线（使用tables::tabular()）。

考虑一下：

require(tables)
require(car)
latex(
    tabular( (Factor(partner.status, "Status") +  1) 
         * (Factor(fcategory, "Authoritarianism") + 1)
         * ((Pct=Percent()))*Format(digits=1) 
         ~ 1, data=Moore) 
)

将产生：

\begin{tabular}{lllc}
\hline
Status & Authoritarianism &  & \multicolumn{1}{c}{All} \\ 
\hline
high & high & Pct  & $\phantom{0}16$ \\
 & low & Pct  & $\phantom{0}11$ \\
 & medium & Pct  & $\phantom{0}24$ \\
 & All & Pct  & $\phantom{0}51$ \\
low & high & Pct  & $\phantom{0}18$ \\
 & low & Pct  & $\phantom{0}22$ \\
 & medium & Pct  & $\phantom{00}9$ \\
 & All & Pct  & $\phantom{0}49$ \\
All & high & Pct  & $\phantom{0}33$ \\
 & low & Pct  & $\phantom{0}33$ \\
 & medium & Pct  & $\phantom{0}33$ \\
 & All & Pct  & $100$ \\
\hline 
\end{tabular}

编译（在\usepackage{booktabs}的帮助下）：

在上面的输出中，我想在All列的第一个和第二个Authoritarianism字段之后放置一条水平线（即low行之前的一行和All行之前的另一行。我可以这样做吗？

我尝试使用Hline()，如下所示，但结果代码无法由LaTeX编译：

latex(
    tabular( (Factor(partner.status, "Status") +  1) 
             * (Factor(fcategory, "Authoritarianism") + 1 + Hline())
             * ((Pct=Percent()))*Format(digits=1) 
             ~ 1, data=Moore) 
)