From 775ff64e30c5ad5827acf4ee9c6cf24a6a4ff6b2 Mon Sep 17 00:00:00 2001
From: Suraj Yerramilli
Date: Wed, 28 Jan 2015 13:54:26 +0530
Subject: minor correction in the summary function

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

diff --git a/R/idframe.R b/R/idframe.R
index 39b1414..a0a6035 100644
--- a/R/idframe.R
+++ b/R/idframe.R
@@ -84,7 +84,7 @@ summary.idframe <- function(object,...){
   in_sum <- summary(object$input)
   
   out <- list(outputs=out_sum,inputs=in_sum,Ts=object$Ts,type=object$type,
-              tUnit=object$tUnit,no_of_samples = dim(outputs)[1])
+              tUnit=object$tUnit,no_of_samples = dim(object$output)[1])
   if(object$type=="time"){
     out$tStart <- object$tStart;out$tEnd <- object$tEnd
   } else{
-- 
cgit