Hi Roger,
There's a typo on your source block header, it should be "output graphics",
this would probably produce the output you're getting now.
Thanks,
Pedro
Le dim. 15 août 2021 à 10:17, Roger Mason <rma...@mun.ca> a écrit :
> Hello,
>
> I want graphics output from R:
>
> #+begin_src R :results output grahics file :file coa_vs_a.pdf :exports
> results
> library(tidyverse)
> library(RPostgreSQL)
> drv <- dbDriver("PostgreSQL")
> con <- dbConnect(drv, user="rmason",dbname="test")
> rs <- dbSendQuery(con,"with CTE as (select
> split_part(split_part(lattice_out, E'\n', 13), ' ', 18) as c,
> split_part(split_part(lattice_out, E'\n', 11), ' ', 11) as a
> from results where timestamp like '20210814-071%' order by a)
> select cast(a as double precision), cast(c as double precision)/ cast(a
> as float) as coa from CTE;")
> df <- fetch(rs)
> theplot <- ggplot(df,aes(x=a,y=coa)) + geom_point()
> theplot
> #+end_src
>
> What I expect is a file 'coa_vs_a.pdf' on my filesystem & a link to it
> in the org buffer. What I get is a file 'Rplots.pdf' and an empty file
> 'coa_vs_a.pdf' with a link to the latter in the org buffer.
>
> I've searched this topic and I _think_ the invocation above, one of many
> I've tried, should work.
>
> GNU Emacs 27.2 (build 1, amd64-portbld-freebsd11.4, X toolkit, cairo
> version 1.16.0, Xaw3d scroll bars)
>
> Org mode version 9.2.3 (release_9.2.3-390-gfb5091 @
> /home/rmason/.emacs.d/org-git/lisp/)
>
> Thanks for your help.
>
> Roger
>
>
