### R code from vignette source '/home/pauljohn/tmp/lyxtmp/lyx_tmpdir.XM6259/lyx_tmpbuf2/1_home_pauljohn_TrueMounted_ps_SVN-guides_stat_____Interaction-Categorical-1-lecture-problems.Rnw' ################################################### ### code chunk number 1: 1_home_pauljohn_TrueMounted_ps_SVN-guides_stat_____Interaction-Categorical-1-lecture-problems.Rnw:1-3 ################################################### unlink("plots", recursive=T) dir.create("plots", showWarnings=T) ################################################### ### code chunk number 2: Roptions ################################################### options(width=100, prompt=" ", continue=" ") options(useFancyQuotes = FALSE) set.seed(12345) op <- par() pjmar <- c(5.1, 5.1, 1.5, 2.1) #pjmar <- par("mar") options(SweaveHooks=list(fig=function() par(mar=pjmar, ps=12))) pdf.options(onefile=F,family="Times",pointsize=12)