R函数使用ifelse绘制返回​​数据和绘图

Question

可再现的例子

require(ggplot2)

A <- data.frame(x = 1:5, y = 1:5)
B <- data.frame(x = 1:5, y = (1:5)^2)

plotA <- ggplot(data = A, aes(x = x, y = y)) + geom_line()
plotB <- ggplot(data = B, aes(x = x, y = y)) + geom_line()

myfn <- function(){print(plotA)}
myfn()

myfn2 <- function(printA = TRUE){ifelse(printA, print(plotA), print(plotB))}
myfn2(TRUE)

myfn()完全返回我期望的内容，特别是plotA。另一方面myfn2(TRUE)会返回plotA，但它也会返回绘图后面的数据。我该如何归还情节？ （对于更复杂的图，返回的数据量可能很大）