From 0b25aed6c241ec05c0501165c9a4fc53772e4012 Mon Sep 17 00:00:00 2001
From: Suraj Yerramilli
Date: Sat, 21 May 2016 19:03:55 +0530
Subject: loading ggplot2 namespace

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

(limited to 'R/idframe.R')

diff --git a/R/idframe.R b/R/idframe.R
index f38b94e..c0fc2bf 100644
--- a/R/idframe.R
+++ b/R/idframe.R
@@ -66,6 +66,7 @@ idframe <- function(output,input=NULL,Ts = 1,start=0,end=NULL,
 #' 
 #' @export
 plot.idframe <- function(x,col="steelblue",lwd=1,main=NULL,size=12){
+  loadNamespace("ggplot2")
     if(nInputSeries(x)==0){
       data <- outputData(x)
     } else{
@@ -191,6 +192,7 @@ idfrd <- function(respData,freq,Ts,spec=NULL,covData=NULL,
 #' 
 #' @export
 plot.idfrd <- function(x,col="steelblue",lwd=1){
+  loadNamespace("ggplot2")
   nfreq <- dim(x$freq)[1]
   mag <- 20*log10(Mod(x$resp))
   nout <- dim(mag)[1]; nin <- dim(mag)[2]
-- 
cgit