version 0.4-3

DESCRIPTION

@@ -1,17 +1,15 @@
 Package: rtf
-Version: 0.4-2
-Date: 2011-09-05
+Version: 0.4-3
+Date: 2011-10-03
 Title: Rich Text Format (RTF) Output
 Author: Michael E. Schaffer
 Maintainer: Michael E. Schaffer <mschaff@gmail.com>
 Depends: R (>= 2.10.1), R.oo (>= 1.7.4)
 Imports: methods
-Suggests: lattice
-Description: A set of R functions to output Rich Text Format (RTF)
-        files with high resolution tables and graphics that may be
-        edited with a standard word processor such as Microsoft Word.
+Suggests: lattice, grid
+Description: A set of R functions to output Rich Text Format (RTF) files with high resolution tables and graphics that may be edited with a standard word processor such as Microsoft Word.
 License: BSD
 LazyLoad: TRUE
-Date/Publication: 2011-09-07 06:39:17
-Packaged: 2011-09-07 01:25:24 UTC; mschaff
+Date/Publication: 2011-11-02 17:26:40
+Packaged: 2011-10-30 15:41:29 UTC; mschaff
 Repository: CRAN

MD5

@@ -1,28 +1,30 @@
-b312c8436e9122ab30548e8ac01b77aa *DESCRIPTION
+a2b81d04f8f3b52a8e52adf14dcd30fe *DESCRIPTION
 6a15a3469549adaf6fee5ac9c2d05a93 *LICENSE
-7f26f9938d9d49305ed0c4db0931de98 *NEWS
+012592abf4b40a8d741b299df2ded05a *NAMESPACE
+8795199f0a00f4ee29a2fe6e664c74b5 *NEWS
 f890a6cd328b6d5b7329b59ca53cd47f *R/000.R
-cc49dd2c9c42f60811c5c7aa631a7dcb *R/999.NonDocumentedObjects.R
+40e9627b336738df97fbcf1218934f9a *R/999.NonDocumentedObjects.R
 e8a3d5d61e56d96501584618f59e23c0 *R/999.package.R
-4612c7c3318671d00ebb9a67ddb7f0ca *R/forest.plot.R
-5e7a4235e26d0bd7fa260c4631bd48b5 *R/rtf.R
-921bf10b625ac6be8f0c52729f6e005f *man/Non-documented_objects.Rd
-e646da10c6ed962a6eccb40010527de5 *man/RTF.Rd
+57a165421cc7bd4f4c12dde2178f05de *R/forest.plot.R
+d7d895f0bd14452aa4130f6245c6e386 *R/rtf.R
+363e08e49496a0954cf87c1f8d4dd60d *man/Non-documented_objects.Rd
+63f3a830e802aa6dcd5a158c657ebc9d *man/RTF.Rd
 886727132906e6c2a63db3c4ae0f589e *man/addHeader.RTF.Rd
 fb35cefcded0a44e28c42e7f9fb6ddb3 *man/addNewLine.RTF.Rd
-a9a3fbf3c6166b5521c8323d97a428d0 *man/addPageBreak.RTF.Rd
+e86a7edb843a38b01ad6acd03a906133 *man/addPageBreak.RTF.Rd
 172142af3efdbb7cd86824f5de43dedc *man/addParagraph.RTF.Rd
-1b563960d43fb27de8cc6bf69a5d3b2e *man/addPlot.RTF.Rd
-c8b3c85290b6fc63b168bd3fb75656a6 *man/addTable.RTF.Rd
-05be82fe51ec36ba1d50ecd3f29c78c0 *man/addText.RTF.Rd
-0a0fa094a1ee8e9e45420afafc64832b *man/addTrellisObject.RTF.Rd
+6bde274eaa5545742e8d47fa18597282 *man/addPlot.RTF.Rd
+566ce79c3a3207761eab7540812ab702 *man/addSessionInfo.RTF.Rd
+985d3bdcf247dfd763d596f9ae7bdbc5 *man/addTable.RTF.Rd
+1575c4e13e225453f67ba37fe84af76d *man/addText.RTF.Rd
+87d120c25de6790f9b47b87df410120e *man/addTrellisObject.RTF.Rd
 5e650b12eeaf21d06d75641555e91c9a *man/decreaseIndent.RTF.Rd
 46523c858a9087ad261cbbd336f47974 *man/done.RTF.Rd
 a24b38a04d6d5bf5bfb00daf57bccaca *man/endParagraph.RTF.Rd
 107401fb48ef31a22e51470c3ccf57a5 *man/increaseIndent.RTF.Rd
 465ff3fe0b9f807f932da69470458287 *man/rtf-package.Rd
-e8b8eed19589caa5e2f4ad2dc96ad7b6 *man/rtf.forest.plot.Rd
+75768f1ea7dea5f743b479b22d8db576 *man/rtf.forest.plot.Rd
 1019bdd11f883d4e8101dbe5d45882f8 *man/setFontSize.RTF.Rd
 6996405d7499ca51fd3bf9c001a730cf *man/startParagraph.RTF.Rd
 f6396c7b326935a6b56da44ca56b6545 *man/view.RTF.Rd
-970c6d5dd28d08c4e51f9da35e7ff5b8 *tests/tests.R
+d9a21a91edb71aa2d29a15cef516e2bb *tests/tests.R

NAMESPACE

@@ -0,0 +1 @@
+exportPattern("^[^\\.]")

NEWS

@@ -1,3 +1,10 @@
+CHANGES IN 0.4-3 (2011-10-03)
+-----------------------------
+Added NAMESPACE as required for packages in R-2.14.0.
+Added parameter to rotate lattice plots in RTF output.
+Added parameter for automatic column width detection in tables.
+Fixed output of data.frame row names in addTable method.
+
 CHANGES IN 0.4-2 (2011-09-05)
 -----------------------------
 Updates to documentation.  Added forest plot code.

R/999.NonDocumentedObjects.R

@@ -16,6 +16,7 @@
 # @alias setFontSize
 # @alias addPlot
 # @alias addTrellisObject
+# @alias addSessionInfo
 #
 # @alias rtf.forest.plot.xscale
 #

R/forest.plot.R

@@ -52,7 +52,7 @@
 # tab<-rbind(tab,list("","","","",xscale))
 #
 # # write the RTF output
-# rtf<-RTF("output.doc",width=8.5,height=11,font.size=10,omi=c(1,1,1,1))
+# rtf<-RTF("test_rtf.forest.plot.doc",width=8.5,height=11,font.size=10,omi=c(1,1,1,1))
 # addTable(rtf,tab,col.widths=c(0.75,0.75,0.75,0.75,3))
 # done(rtf)
 # }
@@ -61,12 +61,23 @@
 #*/#########################################################################
 rtf.forest.plot<-function(x=1.25,min=0.5,max=2,xlim=c(0.1,12),
 	width=3.0,height=0.3,cex=1,lwd=0.75,res=300) {
-	.rtf.plot(.forest.plot,width=width,height=height,res=res,x=x,min=min,max=max,xlim=xlim,cex=cex,lwd=lwd)
+
+	tmp.file<-tempfile("temp_forest_plot")
+	ret<-.rtf.plot(.forest.plot,tmp.file=tmp.file,width=width,height=height,res=res,x=x,min=min,max=max,xlim=xlim,cex=cex,lwd=lwd)
+	if(file.exists(tmp.file) ) {
+		unlink(tmp.file)
+	}
+	ret
 }
 
 rtf.forest.plot.xscale<-function(xlim=c(0.1,12),
 	width=3.0,height=0.3,cex=1,lwd=0.75,res=300) {
-	.rtf.plot(.forest.plot.scale,width=width,height=height,res=res,xlim=xlim,cex=cex,lwd=lwd)
+	tmp.file<-tempfile("temp_forest_xscale")
+	ret<-.rtf.plot(.forest.plot.scale,tmp.file=tmp.file,width=width,height=height,res=res,xlim=xlim,cex=cex,lwd=lwd)
+	if(file.exists(tmp.file) ) {
+		unlink(tmp.file)
+	}
+	ret
 }
 
 ######################################################################################