From df2a1019a962134937d19ac90c62a04bd760c530 Mon Sep 17 00:00:00 2001
From: Suraj Yerramilli
Date: Tue, 17 May 2016 12:19:40 +0530
Subject: minor syntax corrections

---
 R/idframe.R | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/R/idframe.R b/R/idframe.R
index 59a57eb..f38b94e 100644
--- a/R/idframe.R
+++ b/R/idframe.R
@@ -232,7 +232,6 @@ plot.idfrd <- function(x,col="steelblue",lwd=1){
 # 3 will go all the way across the bottom.
 #
 multiplot <- function(..., plotlist=NULL, file, cols=1, layout=NULL) {
-  library(grid)
   
   # Make a list from the ... arguments and plotlist
   plots <- c(list(...), plotlist)
@@ -253,8 +252,8 @@ multiplot <- function(..., plotlist=NULL, file, cols=1, layout=NULL) {
     
   } else {
     # Set up the page
-    grid.newpage()
-    pushViewport(viewport(layout = grid.layout(nrow(layout), ncol(layout))))
+    grid::grid.newpage()
+    grid::pushViewport(viewport(layout = grid.layout(nrow(layout), ncol(layout))))
     
     # Make each plot, in the correct location
     for (i in 1:numPlots) {
-- 
cgit