latex() 函数不使用 R "rms" 包提供渲染输出

Question

latex() 函数不在带有 R“rms”包的代码块之间提供渲染输出。我该如何解决这个问题？

代码

library(rms)
getHdata(kprats)

#data
kprats$group = factor(kprats$group, 0:1, c('Group 1', 'Group 2'))
dd = datadist(kprats); options (datadist ="dd")

S = with(kprats, Surv (t, death ))
f = npsurv(S ~ group, stype = 1, ctype = 1, data = kprats)

#model
fw = psm(S ~ group, data =kprats, dist ='weibull')

#code for output
latex(fw, fi = "")

输出

[{\rm Prob}{T\geq t} = \exp[-\exp( \frac{\log(t)-X\beta}{0.1832976} )]{\rm \ \ where} \ ] \begin{eqnarray*} X\hat{\beta}= & & \ & & 5.450859 \ & & +0.131983[{\rm Group\ 2}] \ \end{eqnarray*} 和([c]=1) 如果受试者在组 (c) 中，否则为 0

输出应如下所示

R版

           _                           
platform       x86_64-w64-mingw32          
arch           x86_64                      
os             mingw32                     
system         x86_64, mingw32             
status                                     
major          3                           
minor          6.1                         
year           2019                        
month          07                          
day            05                          
svn rev        76782                       
language       R                           
version.string R version 3.6.1 (2019-07-05)
nickname       Action of the Toes

Answer 1

将results='asis'放入块头并执行

require(rms)
options(prType='latex')

fw <- psm(...)
fw     # LaTeX output with fit statistics in a table
latex(fw)   # formula

prType 只影响 print(fw) 不影响 latex(fw).

latex() 函数不使用 R "rms" 包提供渲染输出

latex() function not giving rendered output with R "rms" package

latex

rendering

r

r-markdown