return plot and values from a function together [duplicate]

Question

I have a function like this:

fun <- function(dataset){
  require(ggplot2)
  g <- ggplot(dataset, aes(x = x, y = y)) + geom_smooth(method = "lm") + geom_point()

l<-lm(y~x)
return (list(l, g))
    }

and I want to return both plot and the values, but it doesn't return the plot and I face this error:

Error in .Call.graphics(C_palette2, .Call(C_palette2, NULL)) :
invalid graphics state

What can I do?

Please first provide a Minimal Complete and Verifiable Example. Without that, it's quite hard to figure out the problem. I do see a typo though in the return statement (g instead of p), but this shouldn't be the main issue, I figure. — pr140
– pr140, Commented Jul 1, 2017 at 9:21
It would be much better, but my question was about that print the values in the console — minoo
– minoo, Commented Jul 1, 2017 at 9:33

kangaroo_cliff · Accepted Answer · 2017-07-01 09:32:03Z

3

The following works, and you can get the plot. However, R warns that's not the way to do it.

fun <- function(dataset){
  require(ggplot2)
  p <- ggplot(dataset, aes(x = x, y = y)) + 
       geom_smooth(method = "lm") + geom_point()

  l <- lm(y~x, data=dataset)
  return (list(l, p))
}

dataset <- data.frame(x= 1:10, y=1:10)
out <- fun(dataset)

Edit: I've had a look about the warning, it seems like something you can ignore. See link https://stat.ethz.ch/pipermail/r-devel/2016-December/073554.html

edited Jul 1, 2017 at 9:32

answered Jul 1, 2017 at 9:20

kangaroo_cliff

6,2523 gold badges33 silver badges45 bronze badges

Sign up to request clarification or add additional context in comments.

8 Comments

minoo Over a year ago

I tried and it returns this [[1]] Call: lm(formula = df[, 2] ~ df[, 1]) Coefficients: (Intercept) df[, 1] 3.898e-16 -7.059e-01 [[2]] Error in .Call.graphics(C_palette2, .Call(C_palette2, NULL)) : invalid graphics state

minoo Over a year ago

I did not draw the plot

kangaroo_cliff Over a year ago

To get plot, you need to type out$p at the command prompt. The function only returns the plot.

kangaroo_cliff Over a year ago

I've tested the code I've given. It works. So, it seems something else is the matter.

minoo Over a year ago

No it did not unfortunately. it pasted it NULL for out$p

|

Collectives™ on Stack Overflow

return plot and values from a function together [duplicate]

1 Answer 1

8 Comments

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

8 Comments

Linked

Related