jhp_report 함수 실행결과가 책과 다릅니다. 무엇이 문제일까요?

[worldinyj]

책에 명시된 순서대로 쭉 진행하면서 아래의 스크립트를 실행하면 콘솔창에만 저렇게 나타납니다. 이 스크립트 뿐만 아니라 다른 것도 마찬가지입니다. 왜 그럴까요?

(script) reg1 <- lm(prestige ~ education, data=Prestige) jhp_report(reg1, title="직업별 명성과 교육수준의 관계", label="tab:prestige1", dep.var.labels = "prestige")

(콘솔창) \begin{table}[!htbp] \centering \caption{직업별 명성과 교육수준의 관계} \label{tab:prestige1} \begin{tabular}{@{\extracolsep{5pt}}lc} \[-1.8ex]\hline \hline \[-1.8ex] & \multicolumn{1}{c}{\textit{Dependent variable:}} \ \cline{2-2} \[-1.8ex] & prestige \ \hline \[-1.8ex] education & 5.388$^{}$ \ & (0.317) \ & \ Constant & $-$10.841$^{}$ \ & (3.528) \ & \ \hline \[-1.8ex] Observations & 98 \ R$^{2}$ & 0.751 \ Adjusted R$^{2}$ & 0.748 \ \hline \hline \[-1.8ex] \textit{Note:} & \multicolumn{1}{r}{$^{}$p$<$0.1; $^{}$p$<$0.05; $^{}$p$<$0.01} \ \end{tabular} \end{table}