[R] Compress (gzip) a pdf device - [ ] Message is from an unknown sender

[Duncan Temple Lang]

The latest version of the Rcompression package (www.omegahat.org/Rcompression)
provides a gzip() function that does this. The example in the help page shows
how.

There is a source version of the package in the Omegahat repository (and on the package's
Web site), but no binaries at this point.

 D.

Daniele Amberti wrote:
> system() invokes the OS command specified by command, in the example you gave it means that gzip is installed and (assuming Windows OS) it is in your search path.
> 
> I'd like to have a solution that do not use external programs.
> 
> Thanks
> Daniele
> 
> -----Original Message-----
> From: Ista Zahn [mailto:istazahn at gmail.com]
> Sent: 01 October 2009 17:11
> To: Daniele Amberti
> Cc: r-help at r-project.org; Rainer M Krug
> Subject: Re: [R] Compress (gzip) a pdf device - [ ] Message is from an unknown sender
> 
> I guess I don't understand what your're trying to do. gzip-ing a file
> from within R is easy enough:
> 
> pdf(file="CompressMe.pdf")
> plot(rnorm(100))
> dev.off()
> system("gzip CompressMe.pdf")
> 
> I think you want something more complicated, but I'm not sure what.
> 
> -Ista
> 
> On Thu, Oct 1, 2009 at 6:41 AM, Daniele Amberti <daniele.amberti at ors.it> wrote:
>> By now It seems nobody have idea.
>>
>> zz <- gzfile("C:/gzpdftest.gz", "wb")
>> pdf(file = zz)
>> plot(USArrests)
>> dev.off()
>> close(zz)
>>
>> produce a file named "3" without any extension in my working directory.
>>
>> Also I don't have any news on how to gzip the pdf afterward (without using an external executable).
>>
>> Daniele
>>
>>
>> From: Rainer M Krug [mailto:r.m.krug at gmail.com]
>> Sent: 30 September 2009 10:26
>> To: Daniele Amberti
>> Cc: r-help at r-project.org
>> Subject: Re: [R] Compress (gzip) a pdf device - [ ] Message is from an unknown sender
>>
>>
>> 2009/9/30 Daniele Amberti <daniele.amberti at ors.it<mailto:daniele.amberti at ors.it>>
>> I have not found an easy way to compress a file on filesystem.
>> Especially I'd like to compress a pdf from pdf() function/device. Is it possible to compress It on the flight?
>> I'd like to do something like:
>> pdf(gzipconnection())
>> dev.off()
>>
>> I guess this boils down to a question I asked some time ago concerning getting the filename of a pdf() device, as I wanted to create a compressed pdf from the uncompressed pdf created by R (not "zipping" the pdf).
>> It does not seem to be possible, at least I did not get any response which I could use to implement my idea (create my dev.off(), which calls dev.off() and afterwards compresses the pdf by using the file name).
>>
>> If you find a solution, please let me know.
>>
>> Cheers,
>>
>> Rainer
>> If It is not possible, how can I create a gzip with the pdf?
>>
>> Thanks
>> Daniele A.
>>
>>
>>
>> ________________________________
>>
>>
>>
>> ________________________________
>> ORS Srl
>>
>> Via Agostino Morando 1/3 12060 Roddi (Cn) - Italy
>> Tel. +39 0173 620211
>> Fax. +39 0173 620299 / +39 0173 433111
>> Web Site www.ors.it
>>
>> ------------------------------------------------------------------------------------------------------------------------
>> Qualsiasi utilizzo non autorizzato del presente messaggio e dei suoi allegati ? vietato e potrebbe costituire reato.
>> Se lei avesse ricevuto erroneamente questo messaggio, Le saremmo grati se provvedesse alla distruzione dello stesso
>> e degli eventuali allegati.
>> Opinioni, conclusioni o altre informazioni riportate nella e-mail, che non siano relative alle attivit? e/o
>> alla missione aziendale di O.R.S. Srl si intendono non attribuibili alla societ? stessa, n? la impegnano in alcun modo.
>>
>>        [[alternative HTML version deleted]]
>>
>> ______________________________________________
>> R-help at r-project.org mailing list
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
>> and provide commented, minimal, self-contained, reproducible code.
>>
> 
> 
> 
> --
> Ista Zahn
> Graduate student
> University of Rochester
> http://yourpsyche.org
> 
> ORS Srl
> 
> Via Agostino Morando 1/3 12060 Roddi (Cn) - Italy
> Tel. +39 0173 620211
> Fax. +39 0173 620299 / +39 0173 433111
> Web Site www.ors.it
> 
> ------------------------------------------------------------------------------------------------------------------------
> Qualsiasi utilizzo non autorizzato del presente messaggio e dei suoi allegati è vietato e potrebbe costituire reato.
> Se lei avesse ricevuto erroneamente questo messaggio, Le saremmo grati se provvedesse alla distruzione dello stesso
> e degli eventuali allegati.
> Opinioni, conclusioni o altre informazioni riportate nella e-mail, che non siano relative alle attività e/o
> alla missione aziendale di O.R.S. Srl si intendono non  attribuibili alla società stessa, né la impegnano in alcun modo.
> 
> ______________________________________________
> R-help at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.