Here is the full repair for the latex functions in Hmisc to make pdflatex
work in Windows.
This version is still slightly awkward.  I hope that Charles and Frank will
smooth it out
and put it in their next release.

I added two new options() and revised show.dvi so it will use them.

Rich



library(Hmisc)

show.dvi <-
function (object, width = 5.5, height = 7)
{
    viewer <- optionsCmds("xdvi")
    cmd <- if (viewer == "yap") {
        paste(viewer, object$file)
    }
    else if (viewer == "kdvi") {
        paste(viewer, object$file)
    }
    else if (viewer == "xdvi") {
        paste(viewer, " -paper ", width, "x", height, "in -s 0 ",
            object$file, sep = "")
    }
    else if (basename(viewer) == "AcroRd32") {
      object$file <- sub("dvi", "pdf", object$file)
        paste(viewer, object$file)
    }
    else {
        paste(viewer, object$file)
    }
    system(cmd, intern = TRUE, wait = TRUE)
    invisible(NULL)
}
environment(show.dvi) <- environment(print.dvi)

options(latexcmd="pdflatex",
        xdvicmd="c:/Progra~1/Adobe/Reader~1.0/Reader/AcroRd32")

x <- matrix(1:24, 6,4, dimnames=list(letters[1:6], LETTERS[1:4]))
show.dvi(dvi(x.tex <- latex(x)))
paste(getwd(), x.tex$file, sep="/")  ## location of the table itself
## The tex file with headers and the pdf file are in the directory
## given in the printed output from dvi().

	[[alternative HTML version deleted]]

