From 32712750209803f4575247e5cddd86a9e1e201d0 Mon Sep 17 00:00:00 2001
From: Suraj Yerramilli
Date: Sat, 17 Jan 2015 18:07:41 +0530
Subject: Added skeleton for the idframe class

---
 R/idframe.R | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100644 R/idframe.R

diff --git a/R/idframe.R b/R/idframe.R
new file mode 100644
index 0000000..522f351
--- /dev/null
+++ b/R/idframe.R
@@ -0,0 +1,26 @@
+# class idframe
+idframe <- function(output=data.frame(numeric(0)),input=data.frame(numeric(0)),
+                     type=c("time","freq")[1],Ts = 1,
+                     outputnames = colnames(output),inputnames = colnames(input),
+                     t.start=0,t.end=NA, timeUnit = "seconds", 
+                     frequencies = NA, freqUnit= NA){
+  out <- list(output=output,input=input,type=type,Ts=Ts)
+  class(out) <- "idframe"
+  return(out)
+}
+
+# print method for idframe class
+print.idframe <- function(object,...){
+  
+}
+
+# plot method for idframe object
+plot.idframe <- function(object,...){
+  
+}
+
+# summary method for idframe object
+summary.idframe <- function(object,...){
+  
+}
+
-- 
cgit